10 Декабрь 2008

Как сохранить BMP картинку как иконку?

Мультимедиа |  Таги: , , ,

Как сохранить BMP картинку как иконку?

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

Запись опубликована on 10.12.2008 at 16:30 и размещена в рубрике: Мультимедиа. Вы можете читать комментарии, используя RSS-ленту. Вы можете оставить комментарий, или отправить трекбек с Вашего сайта.



Оставить комментарий

Я не робот.