• Mbus
  • Восстановленный участник
  • На форуме с 26 апреля 2004г.
  • Сообщений: 112
  • Спасибо: 0

Тема: Image на форме

Есть
-форма
-на ней контрол Image
-список
Надо
когда пользователь щелкает по элементу списка, то  в контроле image отображается картинка соответствующая
Не пойму как картинку присвоить этому контролу.
Присваиваю .Picture путь к картинке - не верно,
через =Load(путь) пишу - не верно....как это сделать?

  • На форуме с 6 октября 2002г.
  • Сообщений: 162
  • Спасибо: 0

Re: Image на форме

Image1.Visible = False
Image1.Picture = LoadPicture("greengrip.bmp")
Image1.Visible = True

  • Mbus
  • Восстановленный участник
  • На форуме с 26 апреля 2004г.
  • Сообщений: 112
  • Спасибо: 0

Re: Image на форме

Спасибо!

  • Dron
  • Восстановленный участник
  • На форуме с 17 марта 2007г.
  • Сообщений: 97
  • Спасибо: 0

Re: Image на форме

Для того что бы не завязываться с внешними файлами, можно использовать другой вариант:
1. поместить на форму объект ImageList и в него закачать все картинки:
https://www.caduser.ru/forum/topic36316.html
и при инициализации или работе с формой исползовать код:

Image1.Picture = ImageList1.ListImages(1).Picture
CommandButton1.Picture = ImageList1.ListImages(2).Picture

2. что бы не завязываться с не стандартными объектами, лично я использую такой вариант:
создаю форму с именем Lib_Pictures, в неё добавляю объекты Image и закачиваю в них нужные картинки, а дальше аналогично предыдущему:

Image1.Picture = Lib_Pictures.Image1.Picture
CommandButton1.Picture = Lib_Pictures.Image2.Picture