Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.27;
Скачать: CL | DM;

Вниз

Работа с иконками (TIcon).   Найти похожие ветки 

 
AlexanderMS ©   (2006-08-04 16:06) [0]

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


 
clickmaker ©   (2006-08-04 17:10) [1]

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


 
AlexanderMS ©   (2006-08-04 19:47) [2]


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


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

           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;



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

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

Наверх




Память: 0.47 MB
Время: 0.065 c
2-1154962343
ArtemESC
2006-08-07 18:52
2006.08.27
Не найдеться ли у кого функция,


2-1153945535
serko
2006-07-27 00:25
2006.08.27
Передача файла!


15-1154355138
vidiv
2006-07-31 18:12
2006.08.27
Список всех процессов:)


3-1150381411
Urvin
2006-06-15 18:23
2006.08.27
Счетчик (?) в Firebird


15-1154318044
Ююзер
2006-07-31 07:54
2006.08.27
Почему нет меню в дельфийских программах?