I put all the code in the Init method, but the second time i call the form the grid is empty......
In the Init my code is this:
Lparameters cTipoTab, cValue, cOrderIfPcount()>0DoDefault()This.TipoTab = cTipoTab Use wdfPath + "TaGen" In 0Select Code, Des1 From TaGen Where Tipo = This.TipoTab Order By Code Into Cursor Tab ReadWrite Use In TaGenWith .Grid1 .RecordSource = "Tab" .Column1.ControlSource = "Tab.Code" .Column2.ControlSource = "Tab.Des1" .SetFocusEndWithEndif