Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.29;
Скачать: CL | DM;

Вниз

Создание картинок   Найти похожие ветки 

 
Alex_rar ©   (2004-02-18 14:09) [0]

I need help!
Подскажите как вывести одну картинку (Image1)одновременно в нескольких местах на форме, чтобы каждый раз не создавать этот объект.
Я делаю следующее, но Image2 не выводиться.

procedure TForm1.Button1Click(Sender: TObject);
begin

Image2:=TImage.Create(Image1);
Image2.Left:=80;
Image2.Visible:= True;

end;


 
Reindeer Moss Eater ©   (2004-02-18 14:10) [1]

Parent


 
KSergey ©   (2004-02-18 14:55) [2]

> Alex_rar © (18.02.04 14:09

Кроме того, что сказал [1] Reindeer Moss Eater
Вы думаете, что при таком вот создании в Image2 (к стати, что за переменная и где объявлена) появится картинка из Image1? Нет, вы заблуждаетесь.


 
Alex_rar ©   (2004-02-18 15:02) [3]

Image2 : TImage; объявлена в public
Если все знаете подскажите как можно организовать по-другому.


 
TUser ©   (2004-02-18 15:07) [4]

Можно поместить Image1 на фрейм и его уже помещать на форму. Но объект новый создавать придется.


 
Alex_rar ©   (2004-02-18 15:13) [5]

Мне потом нужен будет цикл, т.к. количество картинок определится при работе програмы, а при написании мне неизвестно сколько объектов создавать.


 
Алхимик ©   (2004-02-18 15:13) [6]

F1 Canvas.Draw


 
KSergey ©   (2004-02-18 15:27) [7]

Циклы тоже вам написать? ;)

Что-то вроде того (точно не проверял, лень)

Image2.Picture.Assign(Image1.Picture) - это после создания Image2, разумеется

А еще обязательно сходить сюда:

http://www.delphikingdom.com/helloworld/runtime_comp.htm

А кроме того, все статьи из

http://www.delphikingdom.com/asp/section.asp?ID=16

к обязательному прочтению!!!!


 
Alex_rar ©   (2004-02-18 15:27) [8]

Подсказали на другом форуме.

Image2:=TImage.Create(Form1);
Image2.Parent:=Self;
Image2.Picture.Assign(Image1.Picture);


 
Алхимик ©   (2004-02-18 15:34) [9]

...чтобы каждый раз не создавать этот объект
и
Image2:=TImage.Create(Form1);

Как согласуется?


 
KSergey ©   (2004-02-18 15:35) [10]

Это конференция отличается тем, что здесь не дают готовых ответов, пригодных лишь в частном случае; однако дают направление поиска, позволяющее не потеряться в других подобных ситуациях ;)


 
KSergey ©   (2004-02-18 15:36) [11]

Эт а конференция отличается тем, что здесь не дают готовых ответов, пригодных лишь в частном случае; однако дают направление поиска, позволяющее не потеряться в других подобных ситуациях ;)


 
nexxiss ©   (2004-02-18 16:16) [12]

BITBLT(.....);



Страницы: 1 вся ветка

Текущий архив: 2004.02.29;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.016 c
1-93880
smu
2004-02-18 15:49
2004.02.29
Проблема с запуском консольки в WIN 98


9-93746
TGrigory
2003-08-16 11:05
2004.02.29
Вывод текста на поверхность DXDraw


6-94066
dolphin1
2003-11-28 17:46
2004.02.29
ICQ


6-94064
gep
2003-12-24 05:55
2004.02.29
Прямое кабельное соединение


3-93753
svin666
2004-02-04 16:51
2004.02.29
SQL - функция