Einzelnen Beitrag anzeigen

NicoDE
(Gast)

n/a Beiträge
 
#8

Re: Form.WindowState := wsMaximized mit/ohne Maximize-Button

  Alt 9. Mai 2005, 12:23
Zitat von Sharky:
Du meinst doch so wie im Anhang oder?
Sieht eher so aus, als ob die Form hinter der Taskbar ist...

Workaround für primären Monitor...
Delphi-Quellcode:
procedure TForm1.FormShow(Sender: TObject);

{$IFDEF WIN32}
var
  WorkArea: TRect;
{$ENDIF}
begin
{$IFDEF WIN32}
  if SystemParametersInfo(SPI_GETWORKAREA, 0, Addr(WorkArea), 0) then
    with WorkArea do
      SetBounds(Left, Top, Right - Left, Bottom - Top)
  else
{$ENDIF}
    // fallback
    WindowState := wsMaximized;
end;
...für mehrere Monitore gibt's sicher auch Lösungen (hab nur nicht die VCL-Referenz zur Hand "Wie komme ich an die Bildschirm-Koordinaten" *g*).

edit: lang lebe der tippfäler...
  Mit Zitat antworten Zitat