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 Schon wieder Listview - diesmal Icons (https://www.delphipraxis.net/6076-schon-wieder-listview-diesmal-icons.html)

Chewie 28. Jun 2003 14:56


Schon wieder Listview - diesmal Icons
 
Ich hab ein SysListview32 und will dort in eine bestimmte Spalte ein Image einfügen. Das klappt auch, allerdings ist in der ersten Spalte auch immer das erste Image der Imagelist. Wie krieg ich das Image weg?

Hier der Code für die Imagelist:

Delphi-Quellcode:
hLVImg := ImageList_Create(32, 16, ILC_COLOR, 0, 3);
        ImageList_AddIcon(hLVImg, LoadIcon(hInstance, MAKEINTRESOURCE(102)));
        ImageList_AddIcon(hLVImg, LoadIcon(hInstance, MAKEINTRESOURCE(103)));
        ImageList_AddIcon(hLVImg, LoadIcon(hInstance, MAKEINTRESOURCE(104)));
        SendMessage(hIncIPView, LVM_SETIMAGELIST, LVSIL_SMALL, hLVImg);
Und hier für das Setzen des Icons:
Delphi-Quellcode:
LVItem.mask := LVIF_IMAGE;
      LVItem.iItem := rowIndex;
      LVItem.iSubItem := 6;
      //Protokoll ermitteln
      case PacketRec.protoType of
        IPPROTO_UDP: LVItem.iImage := 0;
        IPPROTO_TCP: LVItem.iImage := 1;
        IPPROTO_ICMP: LVItem.iImage := 2;
      end;
      SendMessage(hIncIPView, LVM_SETITEM, 0, Integer(@LVItem));
Das ListView wurde mit LVS_EX_SUBITEMIMAGE erweitert.

Chewie 29. Jun 2003 14:31

Kann mir keiner helfen?? :cry:


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