Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VFP6, Why do I get command icons when building an EXE
Message
De
02/05/2001 19:39:40
 
 
À
02/05/2001 15:57:57
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00502724
Message ID:
00502826
Vues:
15
>I move an existing application from VFP 5 to VFP 6. When I build the application in to an excutable file I find it
>contains the command icons, new, open, print, spellchk, drop down for database, etc. First question is why?

Because you didn't turn it off, silly :-)

>Secondly how do I remove it (not have it include when building the EXE?

This code will hide, and later, restore all the VFP toolbars that might be visible when you start your app.
dimension aToolbar[13, 2]
aToolbar[ 1, 1] = 'Color Palette'
aToolbar[ 2, 1] = 'Database Designer'
aToolbar[ 3, 1] = 'Form Controls'
aToolbar[ 4, 1] = 'Form Designer'
aToolbar[ 5, 1] = 'Layout'
aToolbar[ 6, 1] = 'Print Preview'
aToolbar[ 7, 1] = 'Query Designer'
aToolbar[ 8, 1] = 'Report Controls'
aToolbar[ 9, 1] = 'Report Designer'
aToolbar[10, 1] = 'Standard'
aToolbar[11, 1] = 'View Designer'
aToolbar[12, 1] = 'Project Manager'
aToolbar[13, 1] = 'ars'

* Hide VFP's toolbars.

for lnI = 1 to alen(aToolbar, 1)
	aToolbar[lnI, 2] = wvisible(aToolbar[lnI, 1])
	if aToolbar[lnI, 2]
		hide window (aToolbar[lnI, 1])
	endif aToolbar[lnI, 2]
next lnI

*** The rest of the app goes here, and when the app is done executing, this code:

* Redisplay VFP's toolbars.
for lnI = 1 to alen(aToolbar, 1)
	if aToolbar[lnI, 2]
		show window (aToolbar[lnI, 1])
	endif aToolbar[lnI, 2]
next lnI
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform