Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Startup on .EXE
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00006809
Message ID:
00007175
Vues:
42
>This is a much asked question. One of the things I did was to use the Win32API to hide the window until I call all my menus, maximize, splash screens, etc.
>
>Try this to hide the window:
>
>DECLARE integer FindWindow IN Win32api integer, string
>DECLARE integer ShowWindow IN Win32api integer, integer
>PUBLIC FoxHWND SW_SHOWMAXIMIZED SW_SHOWNORMAL SW_SHOWMINIMIZED SW_SHOWGONE
>SW_SHOWMAXIMIZED = 3
>SW_SHOWNORMAL = 1
>SW_SHOWMINIMIZED = 2
>SW_SHOWGONE = 0
>FoxHWND = FindWindow(0,_SCREEN.Caption)
>FoxGone = ShowWindow(FoxHWND,SW_SHOWGONE)
>
>And then to show it again:
>
>FoxGone = ShowWindow(FoxHWND,SW_SHOWMAXIMIZED)
>
>HTH,
>Scot.

Hi Scot - I've been away and haven't had a chance to try this till now. Anyway, I can't get it to work. The EXE flashes the main screen for a second, then it disappears, partly reappears, then fully reappears. Am I doing something wrong?

I have all the Declare, etc stuff at the start of my main prg, and then I call the Foxgone fn in the Init of the first form I open.

Thanks
Bruce
The Anonymous Bureaucrat,
and frankly, quite content not to be
a member of either major US political party.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform