Преобразование картинки в иконку (*.ico в *.bmp)

[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]

Страница 1 из 1 1
Модератор форума: server2009, Сергей

Сергей

Дата: Понедельник, 31.08.2009, 12:52 | Сообщение # 1

Лейтенант

Группа: Модераторы

Сообщений: 43

Репутация: 1

Статус: Offline

Подключаемые библиотеки/компоненты:
- ImageList (Microsoft Windows Common Controls 6.0);

Option Explicit
Private Sub Form_Load()
ImageList1.ListImages.Add , , LoadPicture(App.Path & "\1.bmp")
SavePicture ImageList1.ListImages(1).ExtractIcon, App.Path & "\1.ico"
End Sub

Преобразование картинки в иконку (*.ico в *.bmp)

Страница 1 из 1
1