Как извлечь иконку из ListImage

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
dima81
Новичок
Новичок
 
Сообщения: 45
Зарегистрирован: 26.08.2007 (Вс) 22:36

Как извлечь иконку из ListImage

Сообщение dima81 » 03.12.2007 (Пн) 14:22

Есть ListImage, в котором хранятся иконки. Как можно из ListImage извлечь эти иконки и сохранить их на компьютере без потери цвета? Заранее спасибо. Если можно (если не затруднит), написать код.

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 03.12.2007 (Пн) 15:09

А интересно как енти иконки попадают в ListImage? ИМХО, аффтар хочет странного
Весь мир матрица, а мы в нем потоки байтов!

$Yastrebov$
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 154
Зарегистрирован: 24.01.2007 (Ср) 7:27
Откуда: Ukraine

Сообщение $Yastrebov$ » 03.12.2007 (Пн) 17:57

Viper писал(а):А интересно как енти иконки попадают в ListImage? ИМХО, аффтар хочет странного


Ничего странного тут нет. Если поместить иконку в ListImage, а потом удалить ее с ПК (случайно предположим), то единственный экземпляр останется только в ListImage. Не удивительно, если нужную не только для одного проекта иконку захочется восстановить.
Жизнь, она как коробка конфет - никогда не знаешь, что вытянешь!

jangle
Википедик
Википедик
Аватара пользователя
 
Сообщения: 3013
Зарегистрирован: 03.06.2005 (Пт) 12:02
Откуда: Нидерланды

Сообщение jangle » 03.12.2007 (Пн) 22:10

Можно поступить проще, просто скопировать ListImage с нужными иконками через буфер обмена и вставить в свой проект

dima81
Новичок
Новичок
 
Сообщения: 45
Зарегистрирован: 26.08.2007 (Вс) 22:36

Сообщение dima81 » 03.12.2007 (Пн) 22:58

$Yastrebov$ прав. Просто у меня на диске С были все иконки. Я создал 2 проекта и поместил иконки в ImageList в двух проектах. Потом пришлось форматнуть диск С, и иконки удалились. Они остались только в ImageList-ах.
Сейчас я создаю проект, в котором нужны иконки, которые находятся в разных ImageList-ах. Тогда такой вопрос:

можно ли иконки из двух ImageList-ов как то поместить в один ImageList или придется создавать для второго ImageList свой ToolBar?

$Yastrebov$
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 154
Зарегистрирован: 24.01.2007 (Ср) 7:27
Откуда: Ukraine

Сообщение $Yastrebov$ » 04.12.2007 (Вт) 0:16

Можно объединить картинки из двух ImageList-ов в третий, а потом привязать его к нужному ToolBar-у.

Код: Выделить всё
ImageList3.ListImages.Add 1, , ImageList1.ListImages(1).Picture
ImageList3.ListImages.Add 2, , ImageList1.ListImages(2).Picture
ImageList3.ListImages.Add 3, , ImageList2.ListImages(1).Picture
ImageList3.ListImages.Add 4, , ImageList2.ListImages(2).Picture
Toolbar1.ImageList = Me.ImageList3
Toolbar1.Buttons(1).Image = 1
Последний раз редактировалось $Yastrebov$ 04.12.2007 (Вт) 0:22, всего редактировалось 1 раз.
Жизнь, она как коробка конфет - никогда не знаешь, что вытянешь!

$Yastrebov$
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 154
Зарегистрирован: 24.01.2007 (Ср) 7:27
Откуда: Ukraine

Сообщение $Yastrebov$ » 04.12.2007 (Вт) 0:20

Хотя, достаточно даже двух :) Просто из одного, описанным выше способом, переместить иконки во второй, и привязать его к тулбару :D
Жизнь, она как коробка конфет - никогда не знаешь, что вытянешь!

dima81
Новичок
Новичок
 
Сообщения: 45
Зарегистрирован: 26.08.2007 (Вс) 22:36

Сообщение dima81 » 04.12.2007 (Вт) 13:33

$Yastrebov$, спасибо. Помогло!!!!!!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot и гости: 15

    TopList