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 TrayIcon (links neben der Uhr): Position rausfinden (https://www.delphipraxis.net/29605-trayicon-links-neben-der-uhr-position-rausfinden.html)

Helmi 11. Sep 2004 19:24


TrayIcon (links neben der Uhr): Position rausfinden
 
Hallo,

weiss jemand, wie man von einem TrayIcon die Positon (X, Y) rausfinden kann?

mfg
Helmi

gekmihesg 11. Sep 2004 19:25

Re: TrayIcon (links neben der Uhr): Position rausfinden
 
kommt drauf an...
wie hast du das icon denn erzeugt?

Helmi 11. Sep 2004 19:27

Re: TrayIcon (links neben der Uhr): Position rausfinden
 
so:

Code:
  //Erzeugen des SysTrayIcon
  IconData.cbSize          := SizeOf(TNotifyIconData);
  IconData.Wnd             := AllocateHWnd(HandleMessage);
  IconData.uId             := IconID;
  IconData.uFlags          := NIF_ICON + NIF_MESSAGE + NIF_TIP;
  IconData.uCallbackMessage := WM_TRAYNOTIFY;

Helmi 11. Sep 2004 20:33

Re: TrayIcon (links neben der Uhr): Position rausfinden
 
na damit hier keiner nen Herzinfarkt bekommt (@ Matze) - hier mal was zum Thema:

folgenden Code benutz ich um das Icon zu erstellen:

Code:
  private
    { Private-Deklarationen }
    IconData             : TNotifyIconData;

procedure TForm1.FormCreate(Sender: TObject);
begin
  //Erzeugen des SysTrayIcon
  IconData.cbSize          := SizeOf(TNotifyIconData);
  IconData.Wnd             := AllocateHWnd(HandleMessage);
  IconData.uId             := IconID;
  IconData.uFlags          := NIF_ICON + NIF_MESSAGE + NIF_TIP;
  IconData.uCallbackMessage := WM_USER + 1024;
end;
Ich müsste halt die X und Y-Position rausfinden können, des TrayIcons.
Problem wird sein, dass das auf allen gängigen Win-Versionen funktionieren muss.

mfg
Helmi

sakura 11. Sep 2004 22:03

Re: TrayIcon (links neben der Uhr): Position rausfinden
 
^^ push :mrgreen:

Nein, im Ernst, ich habe mal aufgeräumt, damit wir hier den Überblick wahren ;-)

...:cat:...

P.S.: Viel Erfolg bei der Lösung :dp:


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:27 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