Динамическое создание объекта

← →
Strela © (2002-08-30 01:18) [0]

Кт-нибудь помогите в решении насущной проблемы. Не могу создать объект Image динамически. То есть объект создается, а на форме появляться не хочет. Если можно, то напишите код, можно для любого другого объекта (Button, Edit и т. д.)

← →
Jeer © (2002-08-30 01:24) [1]

rocedure TForm1.Button1Click(Sender: TObject);
var
Button: TButton;
begin
Button := TButton.Create(Self);
Button.Parent := Self;
Button.Caption := "Сам создался !";
Button.Left := 20;
Button.Top := 30;
Button.OnClick := MyButtonClick;
end;

procedure TForm1.MyButtonClick(Sender: TObject);
begin
ShowMessage("А я нажалась!");
end;

← →
Юрий Зотов © (2002-08-30 09:42) [2]

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

Очень рекомендую прочитать и проработать.

← →
oss (2002-08-30 10:49) [3]

>Button.Parent := Self;

как же он у тебя там появится ????

Button.Parent := Твоя форма;

>oss
В методе формы Self- форма

2oss (30.08.02 10:49)
Можно подумать, что в данном случае Self не форма!

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