Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
OptionGroup Control
Message
De
12/05/1998 03:06:53
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
OptionGroup Control
Divers
Thread ID:
00098671
Message ID:
00098671
Vues:
59
01 MainForm=CREATEOBJECT("MyForm")
02 MainForm.AddObject("ObjOption","ClassServiceOption")
03
04 MainForm.ObjOption.Buttons(1).Caption="one"
05 MainForm.ObjOption.Buttons(2).Caption="two"
06 MainForm.ObjOption.Buttons(3).Caption="three"
07 MainForm.ObjOption.Buttons(1).Left=5
08 MainForm.ObjOption.Buttons(1).Top=25
09 MainForm.ObjOption.Buttons(2).Left=5
10 MainForm.ObjOption.Buttons(2).Top=45
11 MainForm.ObjOption.Buttons(3).Left=5
12 MainForm.ObjOption.Buttons(3).Top=65
13 MainForm.ObjOption.SetAll("Width",90)
14
15 MainForm.Show()
16 READ EVENTS
17
18 DEFINE CLASS ClassServiceOption AS OptionGroup
19 ButtonCount=4
20 Height=110
21 Left=650
22 Width=90
23 Top=315
24 Visible=.T.
25 ENDDEFINE

How can I group the line from 04 to 13 to my class ClassServiceOption?
Thank you!
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform