Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Form anzeigen wenn MainForm minimiert (https://www.delphipraxis.net/97701-form-anzeigen-wenn-mainform-minimiert.html)

Sko 14. Aug 2007 19:31


Form anzeigen wenn MainForm minimiert
 
Hallo,

ich schreibe seit einiger Zeit an einem Chatprogramm und möchte nun bei bestimmten Ereignissen ein kleines Infofenster über dem Tray anzeigen wenn die MainForm minimiert ist (ähnlich wie bei ICQ). Allerdings werden ja beim Minimieren der MainForm auch alle anderen Forms minimiert. Gibt es eine Möglichkeit die Form trotzdem anzuzeigen? Derzeit nutze ich diesen Code um die Infoform ohne Focus anzuzeigen:
Delphi-Quellcode:
SetWindowPos(MessageHintForm.Handle, HWND_TOP, PX, PY, MessageHintForm.Width, MessageHintForm.Height, SWP_SHOWWINDOW or SWP_NOACTIVATE);
Ich hoffe ihr könnt mir helfen, vielen Dank schon mal.

RavenIV 15. Aug 2007 07:59

Re: Form anzeigen wenn MainForm minimiert
 
Schau Dir mal die Komponente CoolTrayIcon an.
Die kann ein Tray-Icon anzeigen, die Anwendung zum Tray minimieren, einen TrayHint anzeigen und vieles mehr.

Sko 15. Aug 2007 10:17

Re: Form anzeigen wenn MainForm minimiert
 
Hmm, zur Zeit nutze ich das TrayIcon von den JEDIs, kann das CoolTrayIcon einzelne Forms anzeigen wenn die MainForm minimiert ist? So wie TrayIcon.ShowForm(FormBla); oder sowas? Hab leider grad kein Delphi um selbst nachzusehen.

Sko 16. Aug 2007 16:31

Re: Form anzeigen wenn MainForm minimiert
 
Habs jetzt, einfach die CreateParams überschreiben:
Delphi-Quellcode:
procedure TMessageHintForm.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle:=WS_EX_TOOLWINDOW;
  Params.WndParent := GetDesktopWindow;
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:40 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz