release _oAnchorEditor >public _oAnchorEditor >_oAnchorEditor = newobject('AnchorEditor', 'AnchorEditor.vcx') >if vartype(_oAnchorEditor) = 'O' > _oAnchorEditor.Show() >else > release _oAnchorEditor >endif vartype(_oAnchorEditor) = 'O'>
PUBLIC x,y x = CREATEOBJECT("formvcx") x.visible = .T. CHRSAW(10) y = CREATEOBJECT("formvcx") && after 10 seconds y return x.datetime y.visible = .T. DEFINE CLASS formvcx AS form opentime = (DATETIME()) ADD OBJECT text1 AS textbox WITH ; Alignment = 3, ; Value = (m.THISFORM.opentime), ; Height = 23, ; Left = 36, ; Top = 36, ; Width = 204, ; Name = "Text1" ENDDEFINEif you create the same example with a scx, the datetime it is the time when the scx is created.