Динамическое создание объектов на форме.

← →
PC (2004-10-11 22:26) [0]

Собсна сабж: мне надо на этапе инициализации проги создать на форме некотрое число рисунков и флажков. И обрабытывать клики на них. Собсна как? Заранее спасибо.

← →
Rouse_ © (2004-10-11 22:39) [1]

У созданного объекта есть события - назначай на них обработчики плана...
Button.OnClick := MyClick()

← →
saNat © (2004-10-11 22:47) [2]

Например, создаем TImage:

//Сначала подключаем библиотеку... Uses ...,ExtCtrls; ... //Описание класса формы TForm1=Сlass(TForm) Procedure FormActivate(Sender:TObject); Procedure FormClose(Sender:TObject; Var Action:TCloseAction); Private //Создаваемый объект Risunok:TImage; //Обработчик щелчка мышью Procedure RisunokClick(Sender:TObject); Ppublic {Public declarations} End; ... //Создание объекта при активации формы Procedure TForm1.FormActivate(Sender:TObject); Begin Risunok:=TImage.Create(Self); Risunok.Parent:=Form1; Risunok.OnClick:=RisunokClick; Risunok.Top:=9; Risunok.Left:=9; Risunok.Width:=300; Risunok.Height:=200; Risunok.Stretch:=True; Risunok.Picture.LoadFromFile("D:\Graphika\Photo\Ералаш. Разные\EVA.bmp"); Risunok.Show; End; //Обработчик щелчка Procedure TForm1.RisunokClick(Sender:TObject); Begin ShowMessage("Click!"); End; //Уничтожаем созданный объект при закрытии формы Procedure TForm1.FormClose(Sender:TObject; Var Action:TCloseAction); Begin Risunok.Free; End;

Аналогично для "флажков"

С уважением...

P.S.: Поправьте пожалуйста, если я где не прав.

← →
Rouse_ © (2004-10-11 23:02) [3]

> P.S.: Поправьте пожалуйста, если я где не прав.
Все тютелька в тютельку ;)

← →
KSergey © (2004-10-12 07:56) [4]

Автору: читаем тут http://www.delphikingdom.com/helloworld/runtime_comp.htm

← →
PC (2004-10-12 20:41) [5]

Да не, у меня заранее не известно их количество! Их много ! :)

← →
Vit@ly © (2004-10-12 20:47) [6]

> мне надо на этапе инициализации проги создать на форме некотрое
> число

Так создавай на этапе когда тебе это известно, или по мере необходимости

← →
Vit@ly © (2004-10-12 20:51) [7]

> мне надо на этапе инициализации проги создать на форме некотрое
> число рисунков и флажков

Так и создавай на этапе, когда определишься с некоторым числом

← →
Vit@ly © (2004-10-12 20:52) [8]

Сорри, инет глюкнул

← →
PC (2004-10-12 22:45) [9]

Так нет, каждый раз, запустив прогу, мы можем получить разное кол-во пар картинок и флажков.

> мы можем получить разное кол-во пар картинок и флажков

Ну и что это меняет?

> [9] PC (12.10.04 22:45)

Ерст... Ссылку из [4] читать будем?? Там же все разжевано!

← →
PC (2004-10-13 21:16) [12]

> PC (13.10.04 21:16) [12]
>
> > KSergey © (13.10.04 07:01) [11]
>
> Угу, щас читну. Пасиба.

Давно пора было это сделать и перестать ламерить.

Динамическое создание объектов на форме. Найти похожие ветки