Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Hide the main VFP Screen
Message
 
À
27/01/2006 12:38:05
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Novell 4.x
Database:
Visual FoxPro
Divers
Thread ID:
01090993
Message ID:
01091004
Vues:
21
Hi Tore - I tried your suggestion, but no dice. I'm stumped!

>_screen.visible=.F.
>
>Form activate: thisform.visible=.T.
>
>>Hello, I'm writing a quit utility app and I would like for the main VFP screen not to be showing when the program is executed. The problem is, whenever I run the exe, my form will not show either. What am I missing?? Thanks in advance for the help.
>>
>>In my config.fpw, I have the following statement:
>>SCREEN = OFF
>>
>>I have my form properties set as follows:
>>ALWAYSONTOP = .T.
>>MDIFORM = .F.
>>SHOWWINDOW = 2 (AS TOP LEVEL FORM)
>>WINDOWTYPE = 0 (MODELESS)
>>
>>
>>This is what my main.prg looks like:
>>
>>ON SHUTDOWN DO myShutDown
>>ON ERROR DO errhand WITH ;
>> ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM( ), LINENO(1)
>>
>>DO SysMenu.mpr
>>DO FORM SizeView
>>READ EVENTS
>>ON ShutDown
>>CLEAR EVENTS
>>QUIT
>>
>>*********************************************************
>>PROCEDURE myShutDown
>>CLEAR EVENTS
>>ON ShutDown
>>QUIT
>>*********************************************************
>>PROCEDURE errhand
>>PARAMETER merror, mess, mess1, mprog, mlineno
>> LOCAL myMessage
>> myMessage='Error number: ' + LTRIM(STR(merror))+ CHR(13) ;
>> + 'Error message: ' + mess + CHR(13) ;
>> + 'Line of code with error: ' + mess1 + CHR(13);
>> + 'Line number of error: ' + LTRIM(STR(mlineno)) + CHR(13) ;
>> + 'Program with error: ' + mprog
>> =MESSAGEBOX(myMessage,"ERROR !!!",16)
>>RETURN
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform