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 eigenes Icon in TNA (NonVCL!) (https://www.delphipraxis.net/8686-eigenes-icon-tna-nonvcl.html)

Zerolith 10. Sep 2003 10:49


eigenes Icon in TNA (NonVCL!)
 
Hallo!

habe mit Luckies Tut Gearbeitet.

ich möchte jetzt ein EIGENES Icon in die TNA bringen nicht das standart Fragezeichen o.ä:

Delphi-Quellcode:
  NID.wnd        := wnd;
        NID.hIcon      := LoadIcon(wnd, MAKEINTRESOURCE(102));
        if(shell32_ver >= 500) then
          begin
            NID.uFlags     := NID.uFlags or NIF_INFO;
            NID.szInfo     := 'Gestartet!';
            NID.szInfoTitle := szClassName;
            NID.dwInfoFlags := NIIF_INFO;
          end;

        Shell_NotifyIcon(NIM_ADD,@NID);
        DestroyIcon(NID.hIcon);
dem tut aber nit....

könnt ihr mir helfen

Chewie 10. Sep 2003 11:00

Re: eigenes Icon in TNA (NonVCL!)
 
Du musst bei den Flags noch NID_ICON hinzufügen. Und dem hIcon-Member das Handle des Icons des Icons zuweisen.

Zerolith 11. Sep 2003 11:44

Re: eigenes Icon in TNA (NonVCL!)
 
ehh??

sorry - entweder bin i zu blöd aber i kriegs nit hin - entweder hab i garkein ICon oder immer no des :?:

HILF MIR *g* (am besten mit Source beispiel *G*)

Luckie 11. Sep 2003 11:45

Re: eigenes Icon in TNA (NonVCL!)
 
Tutorial: http://www.luckie-online.de/tutorial...tuts/tna.shtml
Und die Sourcen: http://www.luckie-online.de/tutorial...2apituts.shtml (dritte Link bei den Downloads)

Zerolith 11. Sep 2003 11:57

Re: eigenes Icon in TNA (NonVCL!)
 
eh luckie - i hab mit deinem Tut gearbeitet - mir gehts drum ein eigenes Icon aus ner Resourcen Datei zu laden - und nicht diese Standart dinger zu nehmen - das krieg i nich hin

trotzdem thx

Luckie 11. Sep 2003 12:07

Re: eigenes Icon in TNA (NonVCL!)
 
Dann sag das doch auch. LoadIcon oder von MS jetzt empfohlen LoadImage.
Der erste Parameter ist übrigens die Instanz (hInstance) und nicht das Fenster-Handle.

Zerolith 11. Sep 2003 12:47

Re: eigenes Icon in TNA (NonVCL!)
 
Delphi-Quellcode:
NID.wnd        := wnd;
        NID.hIcon := LoadIcon(0, (MAKEINTRESOURCE(102)));

        // Balloon-Tipps nur ab "shell32.dll" Version 5.0
        if(shell32_ver >= 500) then
          begin
            NID.uFlags     := NID.uFlags or NIF_INFO or NIF_ICON;
            NID.szInfo     := 'Gestartet!';
            NID.szInfoTitle := szClassName;
            NID.dwInfoFlags := NIIF_INFO;
          end;

        Shell_NotifyIcon(NIM_ADD,@NID);
        DestroyIcon(NID.hIcon);
dem tun nicht =(

*luckieschrei* *G*

Zerolith 11. Sep 2003 12:47

Re: eigenes Icon in TNA (NonVCL!)
 
ok habs =)

cya


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