Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Tray Icon während der Laufzeit ändern (https://www.delphipraxis.net/46144-tray-icon-waehrend-der-laufzeit-aendern.html)

Schodn 19. Mai 2005 14:16


Tray Icon während der Laufzeit ändern
 
Hallo wie kann ich das
Tray Icon während der Laufzeit ändern
Bitt um schnelle Hilfe
mfg
Franz[quote]

Matze 19. Mai 2005 14:20

Re: Tray Icon während der Laufzeit ändern
 
Wenn du das Icon mittels TNATNA erstellst, geht es in der Art:

Delphi-Quellcode:
  //TNA-Icon
  //========
  IconData.hIcon := //Handle
  IconData.cbSize := SizeOf(IconData);
  IconData.Wnd := Handle;
  IconData.uID := 100;
  IconData.uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
  IconData.uCallBackMessage := WM_USER + 20;
  IconData.szTip := 'Text';

  //TNA-Icon aktualisieren
  Shell_NotifyIcon(NIM_MODIFY, @IconData);

Muetze1 19. Mai 2005 14:21

Re: Tray Icon während der Laufzeit ändern
 
Moin!

Dann bitte ich mal um schnelle Antworten:

1. Wie erstellst du das Tray Icon? Per Komponente? Selber?
2. Welche Komponente verwendest du (wenn du eine nutzt)?
3. Wie liegen die neuen Icons vor? Als Resource, als Bitmap, als Icon?

Unsere Glaskugeln kosten auch Geld und Zeit bei der Wartung, also helfe mit sie zu schonen!

MfG
Muetze1

glkgereon 19. Mai 2005 14:22

Re: Tray Icon während der Laufzeit ändern
 
Was benutzt du für ein TrayIcon?
CoolTrayIcon? den CodeLib-Code von Luckie?

MathiasSimmack 19. Mai 2005 15:44

Re: Tray Icon während der Laufzeit ändern
 
Zitat:

Zitat von Matze
Wenn du das Icon mittels TNATNA erstellst, geht es in der Art:

[...]

Zuviel des Guten, Matze. Das neue Icon und der "Shell_NotifyIcon"-Befehl reichen in dem Fall. :) Die anderen Werte wurden ja schon beim Erzeugen/Initialisieren festgelegt.


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