Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Full screen with VFP
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 6 SP5
OS:
Windows 2000 SP4
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01043372
Message ID:
01043509
Vues:
11
This message has been marked as a message which has helped to the initial question of the thread.
Probably you are talking about Windows Task Bar. If so, then try this:
		
DECLARE LONG FindWindow IN "user32" STRING lpClassName, STRING lpWindowName
DECLARE integer SetWindowPos IN User32 ;
	integer Wnd_handler, integer Window_Order, ;
	integer X1, integer Y1, integer X2, integer Y2, integer wFlags

taskbarHwnd = FindWindow("Shell_TrayWnd", "")
setWindowPos(taskbarHwnd,0,0,0,250,250,0x80)  &&hide it

SUSPEND

setWindowPos(taskbarHwnd,0,0,0,250,250,0x40)  && show again

CLEAR dlls
>Frederico,
>
>As I said, I provided you with a simple EXAMPLE. It is up to you to review what else do you have on your FoxPro "windows main bar (with the start button)", what pieces of the window, menu, screen, or the form do you want to consider, how the pieces were defined in your environment/application; then you will be able to write a code to manipulate those pieces.
>
>If you wish, I could work with you step by step in case you give details.
>
>>Ok Yuri, but only setting the _screen.TitleBar I don´t occult the windows main bar (with the start button)
>>
>>I´d like to occult the main bar too (only to my system).
>>
>>Thanks in advance
>>
>>
>>>You could define the custom on key F11 routine where you modify settings for the sysmenu, titlebar, etc.. as needed.
>>>
>>>Here is the example:
>>>
>>>
>>>on key kable F11 do i1
>>>
>>>*--------------
>>>Procedure i1
>>>if _screen.TitleBar= 0
>>>     _screen.TitleBar= 1
>>>else
>>>     _screen.TitleBar= 0
>>>endif
>>>
>>>
>>>
>>>>Hello *.*
>>>>
>>>>I´d like to do the same full screen effect of F11 in internet explorer (press F11 to see) using VFP 6.
>>>>
>>>>Is it possible?
>>>>
>>>>Thanks in advance.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform