Tela maximizada no XP
Tenho um sistema em Delphi, rodando em Win 98 e XP. Esse sistema, em determinado momento é fechado e ´chama´ outro em ambiente DOS.
Problema: no Win 98 quando chamado esse sistema DOS vem maximizado. No XP fica somente na barra de tarefas, sendo necessário acessá-lo com o mouse ou com o Enter.
Como faço para o XP maximizar a tela do sistema chamado?? :(
Problema: no Win 98 quando chamado esse sistema DOS vem maximizado. No XP fica somente na barra de tarefas, sendo necessário acessá-lo com o mouse ou com o Enter.
Como faço para o XP maximizar a tela do sistema chamado?? :(
Lucimar
Curtidas 0
Respostas
Fabioss
30/05/2005
Tente o seguinte código:
WinExec(´C:\caminho e nome do programa´,WM_MDIMAXIMIZE);
espero ter ajudado.
WinExec(´C:\caminho e nome do programa´,WM_MDIMAXIMIZE);
espero ter ajudado.
GOSTEI 0
Fabioss
30/05/2005
Ok!
Deu muito trabalho mas consegui...
declare a seguinte função:
procedure SwitchToThisWindow(h1: hWnd; x: bool); stdcall;
external user32 Name ´SwitchToThisWindow´;
Depois é só chamar a função:
SwitchToThisWindow(FindWindow(´notepad´, nil), True);
Obs.: Testei com o bloco de notas e funcionou perfeitamente;
Espero ter ajudado.
Deu muito trabalho mas consegui...
declare a seguinte função:
procedure SwitchToThisWindow(h1: hWnd; x: bool); stdcall;
external user32 Name ´SwitchToThisWindow´;
Depois é só chamar a função:
SwitchToThisWindow(FindWindow(´notepad´, nil), True);
Obs.: Testei com o bloco de notas e funcionou perfeitamente;
Espero ter ajudado.
GOSTEI 0