Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How Change Desktop Property for New class Instance?
Message
 
 
À
19/08/2003 03:51:28
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00821291
Message ID:
00821360
Vues:
23
Hi Roman,

You cannot change DeskTop property at runtime because it's read-only. You can subclass your form and use appropriate one at runtime.
PUBLIC frm
IF (6=MESSAGEB('Desktop?',4))
	frm = CREATEOBJECT('frmDT')
ELSE
	frm = CREATEOBJECT('frm')
ENDIF	
frm.SHOW()
RETURN

DEFINE CLASS frm AS FORM
	DESKTOP=.F.
ENDDEFINE

DEFINE CLASS frmDT AS frm
	DESKTOP=.T.
ENDDEFINE
>How Change Desktop Property for New class Instance?
>In this code messagebox executes only once.Why?
>
>publ frm,frm1
>frm=CREATEO('frm')
>frm.show()
>frm1=CREATEO('frm')
>frm1.show()
>define class frm as form
>  desktop=(6=MESSAGEB('Desktop?',4))
>  visible=.T.
>endefine
--sb--
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform