Форум: "Начинающим";
Текущий архив: 2006.04.16;
Скачать: [xml.tar.bz2];
ВнизКак сделать индекс у объекта TImage переменной?? Найти похожие ветки
← →
Raul © (2006-04-01 14:08) [0]Привет, проблема у меня вот в чем: есть некая переменная X:integer
а также image1,image2,image3,image4:TImage
Мне нужно, чтобы image1.picture присваивалось значение в зависимости от значения переменной X , то есть если Х=2, то image1.picture:=image2.picture, при Х=3 image1.picture:=image3.picture
И так далее. Пожалуйста, подскажите, как оеализовать!
← →
Leonid Troyanovsky © (2006-04-01 14:12) [1]
> Raul © (01.04.06 14:08)
> а также image1,image2,image3,image4:TImage
Images: array [1..4] of TImage?
--
Regards, LVT.
← →
Бугага © (2006-04-01 14:27) [2]Вариант 1:
case X of
1: image1.picture := image1.picture;
2: image1.picture := image2.picture;
3: image1.picture := image3.picture;
end;
Вариант 2:
Использовать ImageList и ImageIndex
← →
YurikGL © (2006-04-01 16:27) [3]
> Вариант 2:
> Использовать ImageList и ImageIndex
Вариант 3
i:=1 ;
with FindComponent("Image"+intToStr(i)) as TImage do
picture:=нужна я картинка для i
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.04.16;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.034 c