![]() |
Für ein zweites Formular einenen neuen Taskbarbutton
Hallo,
wie ihr wisst progge ich grad an MUH MEssenger weiter, und will jetzt, dass ich mehrere Chatfenster starten kann (wie in ICQ), und diese dann jeweils einen eigenen Taskbarbutton haben. Bis jetzt erstell ich den Taskbarbutton so:
Delphi-Quellcode:
Jetzt kann ich allerdings nicht nur auf die Kontaktliste zugreifen, ohne das Chatfenster zu beenden.
SetWindowLong(Handle, GWL_HWNDPARENT, 0);
Wie kann ich das ganze lösen? |
Re: Für ein zweites Formular einenen neuen Taskbarbutton
Ich weiß nicht ob das der offizielle Weg ist, aber so geht es:
Delphi-Quellcode:
var
WindowStyle : Integer; begin WindowStyle:=GetWindowLong(Self.Handle,GWL_EXSTYLE); WindowStyle:=WindowStyle or WS_EX_APPWINDOW; SetWindowLong(Self.Handle,GWL_EXSTYLE,WindowStyle); |
Re: Für ein zweites Formular einenen neuen Taskbarbutton
So gelange ich aber wenn ich auf den Chat selber drück auch ins Chatfenster und nicht in die Kontaktliste :(
|
Re: Für ein zweites Formular einenen neuen Taskbarbutton
wie kann ich denn dan einstellen, dass beide Fenster "klickable" sind?
|
Re: Für ein zweites Formular einenen neuen Taskbarbutton
hab's jetzt so gelöst, dass ich anstatt
Delphi-Quellcode:
Chatform.ShowModal;
Delphi-Quellcode:
verwendet habe.
Chatform.Visible := true;
|
Re: Für ein zweites Formular einenen neuen Taskbarbutton
ich hab ein Problem. Das ganze hat funktioniert als ich die Skins noch nicht verwendet hab. Seitdem erscheint das Form aber nicht mehr in der Taskleiste :?
EDIT: das ganze geht komischerweise nur wenn der Borderstyle nicht bsNone ist... |
Re: Für ein zweites Formular einenen neuen Taskbarbutton
So, habs jetzt hinbekommen. Ich mach anstatt BorderStyle := bsNone; jetzt
Delphi-Quellcode:
SetWindowLong(Handle, GWL_STYLE, (GetWindowLong(Handle, GWL_STYLE) and WS_POPUP));
ClientHeight := Height; //Ist besser so ;-) Refresh; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:50 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz