| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

ImageList

dr_ ©   (2004-10-26 14:58:00) 

Уважаемые мастера.
Как сделать загрузку картинок в toolbar формы проекта из ImageList,который содержится в dll.
Спасибо.

---

Erik1   (2004-10-26 15:53:00) [1]

ilSelectionBar: TImageList;
imIcon: TIcon;
...
with imIcon.Picture do
begin
 Bitmap.PixelFormat := pf8bit;
 Graphic.Palette := Bitmap.Palette;
 IMain.GetIcon(Bitmap, imIcon.Tag)
 imIcon.Repaint;
end;

procedure TMainForm.GetIcon(Icon: TBitmap; Index: Integer);
begin
 ilSelectionBar.GetBitmap(Index, Icon);
end;

---

Наверх