PUBLIC oform1 > >oform1=NEWOBJECT("form1") >oform1.Show >RETURN > > > ************************************************** >*-- Form: form1 (c:\temp\temp.scx) >*-- ParentClass: form >*-- BaseClass: form >*-- Time Stamp: 09/07/01 09:20:05 AM >* >DEFINE CLASS form1 AS form > > > Top = 0 > Left = 0 > Height = 360 > Width = 793 > DoCreate = .T. > Caption = "Form1" > Name = "Form1" > > > ADD OBJECT cmdexit AS commandbutton WITH ; > Top = 3, ; > Left = 745, ; > Height = 40, ; > Width = 44, ; > FontName = "MS Sans Serif", ; > FontSize = 8, ; > Picture = "..\program files\microsoft visual studio\vfp98\wizards\wizbmps\wzclose.bmp", ; > Cancel = .T., ; > Caption = "Koniec", ; > TabIndex = 12, ; > ToolTipText = "Zatvorenie okna", ; > Name = "cmdExit" > > > ADD OBJECT text1 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 24, ; > Width = 100, ; > Name = "Text1" > > > ADD OBJECT text2 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 52, ; > Width = 100, ; > Name = "Text2" > > > ADD OBJECT text3 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 80, ; > Width = 100, ; > Name = "Text3" > > > ADD OBJECT text4 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 108, ; > Width = 100, ; > Name = "Text4" > > > ADD OBJECT text5 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 136, ; > Width = 100, ; > Name = "Text5" > > > ADD OBJECT text6 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 164, ; > Width = 100, ; > Name = "Text6" > > > ADD OBJECT text7 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 192, ; > Width = 100, ; > Name = "Text7" > > > ADD OBJECT text8 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 220, ; > Width = 100, ; > Name = "Text8" > > > ADD OBJECT text9 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 248, ; > Width = 100, ; > Name = "Text9" > > > ADD OBJECT text10 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 276, ; > Width = 100, ; > Name = "Text10" > > > ADD OBJECT text11 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 304, ; > Width = 100, ; > Name = "Text11" > > > ADD OBJECT text12 AS textbox WITH ; > Height = 23, ; > Left = 36, ; > Top = 332, ; > Width = 100, ; > Name = "Text12" > > >ENDDEFINE >* >*-- EndDefine: form1 >**************************************************