Перезагрузка картинок в ImageList - VB

Узнай цену своей работы

Формулировка задачи:

Добрый день. Мне нужно сделать следующее: загрузить картинки в ImageList, потом в Toolbar, потом заменить картинки в ImageList на новые и снова вывести картинки. (VB6)
Примерно так. Как отключить ImageList, стереть и записать другие картинки?

Решение задачи: «Перезагрузка картинок в ImageList»

textual
Листинг программы
       HomeDir$ = App.Path
 
       Set Me.Toolbar1.ImageList = Nothing
 
       Me.ImageList1.ListImages.Clear
       
       Me.ImageList1.ListImages.Add 1, , LoadPicture(HomeDir$ + "\run-1.ico")
       Me.ImageList1.ListImages.Add 1, , LoadPicture(HomeDir$ + "\run-0.ico")
 
       Set Me.Toolbar1.ImageList = Me.ImageList1
       
       Me.Toolbar1.Buttons(1).Image = 1
       Me.Toolbar1.Buttons(2).Image = 2

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4.111 из 5
Похожие ответы