Перезагрузка картинок в 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д