Подскажите как в TListView иконки засовывать.

← →
delfin (2003-05-22 12:55) [0]

Сабж

← →
MBo (2003-05-22 12:56) [1]

свойства TListView внимательно изучи, и найдешь

← →
testthewest (2003-05-22 13:01) [2]

положить на форму ImageList, заполнить его картинками,
ListView.SmallImages := ImageList1;
ListView.Items[0].ImageIndex := 1;

← →
delfin (2003-05-22 13:36) [3]

Может кто подскажит как иконки из exe файлов загрузить в TIcon

← →
Юрий Зотов (2003-05-22 13:39) [4]

ExtractIcon(Ex)

← →
delfin (2003-05-22 13:52) [5]

2Юрий Зотов ©
А это метод какома компонента может в напимании ошибка, я немогу найти такой метод.

← →
Юрий Зотов (2003-05-22 13:58) [6]

Win32 SDK Help:
..\Program Files\Common Files\Borland Shared\MSHelp\win32sdk.hlp

← →
delfin (2003-05-22 14:13) [7]

А что потом делать с хендлом который она вернула?

← →
Юрий Зотов (2003-05-22 14:24) [8]

А подумать? А свойства TIcon посмотреть?

← →
delfin (2003-05-22 14:29) [9]

просто вот-так будет нормально?
Icon.Handle:=ExtractIcon(Handle,ExeName,0);

← →
Юрий Зотов (2003-05-22 14:39) [10]

hInst
Identifies the instance of the application calling the function.

lpszExeFileName
Points to a null-terminated string...
(lpsz означает Long Pointer to String Zero - в Delphi это PChar)

Поэтому так:
ExtractIcon( HInstance, PChar(ExeName), ...)

А остальное нормально. В uses надо указать ShellAPI.

← →
delfin (2003-05-22 14:55) [11]

Все уже работает. Спасибо

Подскажите как в TListView иконки засовывать. Найти похожие ветки