Как менять свойства объекта созданного динамически?

← →
CraKerX (2004-05-10 02:08) [0]

with TButton.create(Owner) do
begin
Name:="Button";
Parent:=Form1;
end;
Допустим при клике мышкой по форме кнопка должна поменять цвет.

← →
Rouse_ © (2004-05-10 02:33) [1]

FindComponent
или
FButton: TButton
в виде глобальной переменной

← →
CraKerX (2004-05-10 02:34) [2]

а как с FindComponent

← →
Gero © (2004-05-10 07:49) [3]

TButton(FindComponent("Button1")).Свойство_или_метод_кнопки

← →
Locker (2004-05-10 09:59) [4]

... with TButton.Create(Owner) do begin Name:="Button"; Parent:=Form1; OnClick := OnButtonClick; end; ... procedure Form1.OnButtonClick(Sender: TObject); begin if (Sender is TButton) then TButton(Sender).Caption := "Clicked"; end;

← →
CraKerX (2004-05-10 23:17) [5]

А есть способ - чтобы не задавать зарание объект в переменную...
А затем по нажатию совершенно посторонней кнопки менять свойства этой(созданной динамически)!

> А есть способ - чтобы не задавать зарание объект в переменную...

А ты подумай: если ты хочешь у чего-то менять свойства, то как ты к нему обращаться будешь?

Если через FindComponent то тебе же показали как в [3] Gero © (10.05.04 07:49)

Хотя ИМХО с глобальной переменной было бы лучше...

← →
CraKerX (2004-05-11 01:09) [7]

Как ни странно через findcomponent не работает...

← →
Fedia (2004-05-11 01:14) [8]

NewButton:=TButton.Create(Owner);
...
i:=Integer(NewButton);
//далее используй например
TButton(i).Caption:="123"

Как менять свойства объекта созданного динамически? Найти похожие ветки