Einzelnen Beitrag anzeigen

nahpets
(Gast)

n/a Beiträge
 
#2

Re: zusätzlicher Button in der Taskbar

  Alt 3. Nov 2008, 12:43
Hallo,

könnte damit gehen:
Delphi-Quellcode:
// Wenn's Formular in der Größe verändert wird,
// die Routine führt dazu, daß für das Formular ein eigener Schalter in der
// Taskbar erscheint.
procedure Tform1.FormResize(Sender: TObject);
begin
  If WindowState = wsMinimized Then Begin
    If (GetWindowLong(handle,GWL_EXSTYLE) and WS_EX_APPWINDOW) <> WS_EX_APPWINDOW then Begin
      SetWindowLong(handle,GWL_EXSTYLE,GetWindowLong(Handle,GWL_EXSTYLE) or (WS_EX_APPWINDOW or WS_EX_CONTROLPARENT));
    End;
  End Else Begin
    SetWindowLong(Handle,GWL_EXSTYLE,GetWindowLong(Handle,GWL_EXSTYLE));
  End;
end;
  Mit Zitat antworten Zitat