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

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

Работа с иконками (TIcon). [D7, XP]

AlexanderMS ©   (2006-08-04 16:06:00) 

Столкнулся с проблемой.
В ImageList загружаются иконки (через ImageList.AddIcon(Icon)). Они содержат несколько изображений (48x48, 32x32, 16x16).
У объекта типа TToolBar в свойстве Images установлен этот ImageList. Изображения на кнопках ToolBar выглядят нечётко, хотя у иконок есть изображения размером 16x16. Как сделать так, чтобы кнопки смотрелись нормально и чтобы добавлялись в ImageList (или прорисовывались на кнопках ToolBar) именно изображения 16x16? Заранее благодарен.

---

AlexanderMS   (2006-08-04 19:47:00) [1]

> А иконки откуда грузятся?


Вот фрагмент кода:

           Icon := ExtractAssociatedIcon(hInstance, PChar(LBActions[n].LBIconLocation), LBActions[n].LBIconIndex);

           if Icon <> 0
             then
               begin
                 ListIcon := TIcon.Create;
                 try
                   ListIcon.Handle := Icon;
                   ImageIndex := LBImageList.AddIcon(ListIcon)
                 finally
                   ListIcon.Free;
                 end
               end;

---

clickmaker   (2006-08-04 17:10:00) [2]

А иконки откуда грузятся?

---

Наверх