|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
24.11.2009, 20:16 | #11 |
Заблокирован
Регистрация: 10.11.2009
Сообщений: 99
|
Ресторатор-да я даже не представляю что за программа). Такой код в инете нашел вроде работатет-130 иконок загружает из библиотеки.
var j: integer; h: hIcon; ico: TIcon; begin il := TImageList.Create(Self); for j := 0 to 130 do begin h := ExtractIcon(hInstance, 'C:\Windows\System32\shell32.dll', j); if h <> 0 then begin ico := TIcon.Create; ico.Handle := h; il.AddIcon(ico); ico.Free; end; end; |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Ошибка при выхове функций Bass.dll из другой DLL | SalasAndriy | Общие вопросы Delphi | 7 | 21.10.2009 23:36 |
Бинарные данные в shell32.dll роздел FTR | bmw | Windows | 4 | 26.02.2009 17:44 |
как вытащить иконки из DLL? | andrey4623 | Общие вопросы Delphi | 2 | 20.08.2007 10:41 |
Извлечение иконки из dll | JSM | Общие вопросы Delphi | 2 | 29.06.2007 21:32 |
Иконки | vicvtor | Софт | 5 | 31.05.2007 21:45 |