PUBLIC oForm oForm = CREATEOBJECT('MyForm') oForm.Show DEFINE CLASS myForm as Form DataSession = 2 ADD OBJECT txt1 as textbox WITH left=5,top = 5, controlsource='test.f1', nulldisplay="nada" ADD OBJECT txt2 as textbox WITH left=5,top = 45, controlsource='test.f2', nulldisplay="nada" ADD OBJECT txt3 as textbox WITH left=5,top = 85, value=.null., nulldisplay="nada" PROCEDURE Load CREATE CURSOR test (f1 i null, f2 i null) INSERT INTO test VALUES (1,.null.) ENDPROC enddefineCetin