>> >>************************************************** >>*-- Form: form1 (c:\cdbk90\amline\form1.scx) >>*-- ParentClass: form >>*-- BaseClass: form >>*-- Time Stamp: 04/15/05 05:52:01 PM >>* >>DEFINE CLASS form1 AS form >> >> >> DoCreate = .T. >> Caption = "Form1" >> Name = "Form1" >> >> >> ADD OBJECT text1 AS textbox WITH ; >> Format = "R", ; >> Height = 23, ; >> InputMask = "99H99", ; >> Left = 216, ; >> Top = 72, ; >> Width = 100, ; >> Name = "Text1" >> >> >>ENDDEFINE >>* >>*-- EndDefine: form1 >>************************************************** >> >>>>