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" > >ENDDEFINE >>if you create the same example with a scx, the datetime it is the time when the scx is created.