Delphi. Импорт Мас-иконок (icns-файлов).
Дмитрий19 лет в сервисе
Данные заказчика будут вам доступны после подачи заявки
31.08.2009
Delphi. Импорт Мас-иконок (icns-файлов).
Требуется сделать функцию для Delphi для импорта MAC-иконок.
Описание:
procedure LoadBitmapsFromMacIcon(fname:TFileName;ColorBitmaps,MaskBitmaps:TList);
Работа функции -
Списки ColorBitmaps,MaskBitmaps сначала пустые,
все найденные изображения в файле иконки добавляем в эти списки.
В ColorBitmaps добавляем цветные изображения, в MaskBitmaps - черно-белые маски.
Если маски нет, оставляем в списке nil. Для 32-битных картинок маски также ненужны.
Должны правильно импортироваться картинки всех размеров и битности.
Для тестирования процедуры написать приложение тест, которая будет загружать иконку и показывать на форме все картинки из иконки.
В архиве прилагаются примеры.