Текущий архив: 2002.07.22;
Скачать: CL | DM;

Вниз

Помогите разобраться   Найти похожие ветки 

← →
Александр ©   (2002-07-10 17:52) [0]

Вот кусок программы. Не работает, ругается на ImageList_AddIcon.
....
with Form1.ListView1.Items.Add, lppe do
begin
hIcon:= ExtractIcon(hInstance, lppe.szExeFile, 0);
if hIcon = 0 then
hIcon:= LoadImage(0, IDI_WINLOGO, IMAGE_ICON, LR_DEFAULTSIZE,
LR_DEFAULTSIZE, LR_DEFAULTSIZE or LR_DEFAULTCOLOR or LR_SHARED);
ImageIndex:= ImageList_AddIcon(Form1.ImageList1.Handle, hIcon);
....
end;

---

← →
Александр ©   (2002-07-10 21:25) [1]

Народ, срочно ндо, горю. Помогите плиз.

---

← →
Eugene Lachinov ©   (2002-07-10 21:36) [2]

А как ругается и когда, вроде этот код работает, правда lppe убрал и lppe.szExeFile заменил на PChar(ParamStr(0)), не знаю что это такое

---

← →
Александр ©   (2002-07-10 23:02) [3]

А у меня не выходит. Если Вас н езатруднит, нпиште пожалуйста имененный код. А ругается так: неизвесное ImageList_AddIcon.

---

← →
Юрий Зотов ©   (2002-07-11 00:55) [4]

CommCtrl в uses указано? Похоже, что нет.

---

← →
Poirot ©   (2002-07-11 05:38) [5]

А это разве из стандартной библиотеки... мне этот пример хнаком.... нам чуть выше .... на предыдыщей странице она описана или смотри СиДи к этой занимательной книжке...

---

← →
Александр ©   (2002-07-11 11:01) [6]

Спасибо огромное! Забыл добавить uses CommCtrl! Заработало:))

---

Страницы: 1 вся ветка

Текущий архив: 2002.07.22;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.007 c