Einzelnen Beitrag anzeigen

bluescreen25

Registriert seit: 27. Nov 2005
Ort: Geldern
229 Beiträge
 
Delphi 7 Enterprise
 
#1

ext. Programmstart + maximieren

  Alt 24. Aug 2007, 08:20
ich habe ein kleines Problem mit dem Maximieren eines aus der Anwendung gestarteten Programmes.
der Reihenfolge nach:

1. Taskleiste verstecken

Delphi-Quellcode:
procedure TForm1.ShowTaskBar(AShow: Boolean); //Taskleiste ein/ausblenden
const
  cmdShow: array[Boolean] of Integer = (SW_HIDE, SW_SHOW);
var
  Handle: THandle;
begin
  repeat
    Handle := FindWindow('Shell_TrayWnd', nil);
    Sleep(200);
  until Handle <> 0;
  if Handle <> 0 then ShowWindow(Handle, cmdShow[AShow]);
end;
2. eigenes Programmfenster (onTop) liegt als eine Art Appbar über alles

SetWindowPos(Form1.Handle,HWND_TOPMOST,0, 0, 0, 0,SWP_NOMOVE or SWP_NOSIZE or SWP_SHOWWINDOW);
3. Start des ext. Programms , maximiert und Rahmenlos

Delphi-Quellcode:
RunProcess(appWithPath, SW_MAXIMIZE, FALSE, @ProcID);
setwindowlong(AppWindow, GWL_STYLE, getwindowlong(AppWindow, GWL_STYLE) and (not ws_dlgframe) and (not ws_border) and (not WS_SIZEBOX));

...

Alternativ auch als SW_Show gestartet und maximiert mit
ShowWindow(AppWindow,SW_MAXIMIZE);
Problem: die Taskleiste wird ausgeblendet, jedoch das ext. Programm maximiert nur bis auf oberhalb der ausgeblendeten Taskleiste.

Ich möchte gerne die ext. Anwendung Fullscreen-maximiert haben.

Gruß, bluescreen25
...und ich dachte, Delphi ist ein Programmgenerator mit nur einem Button......tzzz
  Mit Zitat antworten Zitat