[Delphi] Работа с компонентом TButton в режиме run-time

[Rydj]

Всем привет. Не могли бы мне помочь. Задача: Управление компонентами в режиме run-time. Разработать программу динамического создания и управления различными элементами управления на форме (TButton, TLabel).

var
Form1: TForm1;
button:TButton;
label1:TLabel;

procedure TForm1.B1Click(Sender: TObject);
begin
if RB1.Checked=true //Если истина то создаём кнопку
then
begin
Button:= TButton.Create(self);
Button.Parent := Form1;
Button.Name:= EName.Text;
Button.Left := StrToInt(ELeft.Text);
Button.Top := StrToInt(ETop.Text);
end
else

С созданием компонента впринципе всё понятно, а вот как им управлять неочень. К примеру я создал 3 кнопки, и вдруг мне понадобилось изменить свойства одной из них, как мне к ней обратиться?

[baster128]

Не понял вопроса. Так и обратиться:
Button.Name:= EName.Text;
Button.Left := StrToInt(ELeft.Text);
Button.Top := StrToInt(ETop.Text);
из твоего кстати кода

[Mad_Cat]

Button.Name:= EName.Text;

вот и обращайся к ней по этому имени

[vovk]

Сообщение от Rydj

Всем привет. Не могли бы мне помочь. Задача: Управление компонентами в режиме run-time. Разработать программу динамического создания и управления различными элементами управления на форме (TButton, TLabel).



С созданием компонента впринципе всё понятно, а вот как им управлять неочень. К примеру я создал 3 кнопки, и вдруг мне понадобилось изменить свойства одной из них, как мне к ней обратиться?

Найти её на фоме по исени, а потом обращатся.

var
btn_temp:TComponent;
begin
btn_temp:= Form1.FindChildControl('ddd');
if Assigned(btn_temp) then
if btn_temp is TButton then
(btn_temp as TButton).Caption:='та самая';

PS : Действительно не заметил, переменная то глобальная, согласен с *Mad_Cat* и *baster128*

[baster128]

Извини дошло. Создай строковый массив ButName:array of string и пиши в него нейм каждой созданой кнопки и потом через соответствующий нейм обращайся к свойствам. А еще лучше брось на форму два ComboBox и в него все неймы из него выбираещь кнопку а из другого свойства (которые предварительно туда введешь).

[Rydj]

Процедура которую я написал создаёт кнопку с параметрами которые задал пользователь, предположим пользователь создал 3 кнопки и решил изменить координаты 2-ой кнопки как ему к ней обратиться?

[vovk]

Хотя точно кнопка то не одна)) так как в первых 2 постах, только к последне обратишся, в общем или поиск как я писал, или массив как baster128 предлагает.

[Mad_Cat]

//имя то кнопки 2 он надеюсь помнит)
ИмяВторойКнопки.Left
ИмяВторойКнопки.Top
ИмяВторойКнопки.Width
ИмяВторойКнопки.Height

[Rydj]

Сообщение от baster128

Извини дошло. Создай строковый массив ButName:array of string и пиши в него нейм каждой созданой кнопки и потом через соответствующий нейм обращайся к свойствам. А еще лучше брось на форму два ComboBox и в него все неймы из него выбираещь кнопку а из другого свойства (которые предварительно туда введешь).

По идее так не получится я создавал переменную типа стринг которая знает имя текущей кнопки, Компилятор не воспринимает стринг как компонент поэтому ругается когда пишем CName:string ... CName:=EName.Text; CName.(и тут делфа ругается).
vovk спс ща твой вариант попробую

[Rydj]

Планирую в Комбобоксе хранить имена, а их наверно пропускат через поиск который дал vovk