Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Quick form
Message
 
 
À
23/10/2001 15:09:28
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00572149
Message ID:
00572245
Vues:
50
>>>
>>>********************************************************************
>>>*  Description.......: FormBuilder
>>>*  Calling Samples...: 
>>>*  Parameter List....: 
>>>*  Created by........: Cetin Basoz 
>>>*  Modified by.......: Nadya Nosonovsky 10/23/2001 01:11:58 PM
>>>********************************************************************
>>>aselobj(aForm,1)
>>>for each oObj in aForm
>>> do case
>>>   case oObj.class = 'label'
>>>      oObj.class = 'wglabel'
>>>   case oObj.class = 'text'
>>>      oObj.class = 'wgtext'
>>>   endcase
>>>   *oObj.classlibrary = '..\commonwg\classes\wgcontrols.vcx'
>>>next
>>
>>CLASS is Read-Only property :((( So, this technique would not work, and I still have to hack :(
>
>Right, so you would have to form.addobject() a corresponding object of your own, copy all the non-default properties from your selected object, delete the original object (remember to release the reference to it, if any) and rename the new object to the name of the old object.

I probably would stick with my old approach :) I've half way done with the item 1 :)
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform