![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Возникла проблема:
Есть некий TComboBox (назовём creat1list) и TPanel (я неопытен в подборе элемента, возможно для картинки подойдёт другой?) (назовём creat1img). У creat1list 98 (пускай на примере будет 2: creat1 и creat2)вариантов в списке. Под каждый вариант в creat1img должна отображаться своя картинка. Помогите написать код вставки картинки в элемент и установить связь с каждым из вариантов creat1list между creat1img (распишите, пожалуйста, подробный код с комментариями) Последний раз редактировалось Антихристъ, 24.10.2011 в 23:51. |
#2
|
||||
|
||||
![]() Сколько платищь?
Je venus de nulle part 55.026263 с.ш., 73.397636 в.д. |
#3
|
||||
|
||||
![]() Цитата:
![]() |
#4
|
||||
|
||||
![]() Почитай про ImageList, который находится во вкладке Win32.
Google в помощь |
#5
|
|||
|
|||
![]() а как установить зависимость, чтобы картинка менялась?
|
#6
|
|||
|
|||
![]() ручками в обработчике onChange TComboBox. Что-то вроде
Код:
type TForm1 = class(TForm) ComboBox1: TComboBox; Image1: TImage; ImageList1: TImageList; procedure ComboBox1Change(Sender: TObject); private { Private declarations } public { Public declarations } end; ... procedure TForm1.ComboBox1Change(Sender: TObject); begin if ComboBox1.ItemIndex<>-1 then begin ImageList1.GetBitmap(ComboBox1.ItemIndex,Image1.Picture.Bitmap); Image1.Repaint; end; end; |
#7
|
|||
|
|||
![]() а можно, плиз с комментариями?
|