Autor Beitrag
sCrAPt
Gast
Erhaltene Danke: 1



BeitragVerfasst: Mi 25.06.03 14:46 
Wie kann ich für jedes visible:=true Form einen Eintrag in den Taskmanager und Taskleiste machen?
CenBells
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1547

Win 7
Delphi XE5 Pro
BeitragVerfasst: Mi 25.06.03 15:33 
du musst für das fenster im public teil folgenden code einfügen
ausblenden Delphi-Quelltext
1:
    procedure CreateParams(var Params : TCreateParams); override;					


und die implementation sieht wie folgt aus

ausblenden Delphi-Quelltext
1:
2:
3:
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopWindow;


gruß
Ken
sCrAPt
Gast
Erhaltene Danke: 1



BeitragVerfasst: Mi 25.06.03 16:16 
Ich verteh das nicht... Egal wo ich
ausblenden Delphi-Quelltext
1:
2:
3:
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopWindow;
hinkopiere gibts Errors und was soll ich den bei Params:TCreateParams übergeben?
CenBells
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1547

Win 7
Delphi XE5 Pro
BeitragVerfasst: Mi 25.06.03 16:20 
hallo,

folgendes ist der code, der zu der prozedur gehört.
ausblenden Delphi-Quelltext
1:
2:
3:
  inherited CreateParams(Params); 
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; 
  Params.WndParent := GetDesktopWindow;


also muss das insgesamt so aussehen
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TDeinFormular.CreateParams(var Params : TCreateParams);
begin
inherited CreateParams(Params); 
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; 
  Params.WndParent := GetDesktopWindow;
end;


und du musst nichts übergeben. Die Prozedur wird beim erzeugen des Fensters automatisch ausgeführt.

Gruß
Ken
Tino
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Veteran
Beiträge: 9839
Erhaltene Danke: 45

Windows 8.1
Delphi XE4
BeitragVerfasst: Mi 25.06.03 19:43 
In der FAQ gibt es dazu auch einen Beitrag!

Gruß
Tino
Ist die Frage beantwortet? Das Problem gelöst?

Dann klicke hier, um das Thema entsprechend zu markieren!