динамическая кнопка

[offname]

Всем привет

Начал осваивать дельфи, есть вопрос, решил изучение начать с динамики. Чтобы так сказать прочувствовать, как всё работает изнутри.

Так вот

Задача такова:

Запускается форма, дабл клик по ней. Создается Кнопка(которой на форме до этого не было(динамическая)).

type
  TForm1 = class(TForm)
    procedure FormDblClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  bt2: TButton;                    

implementation

{$R *.dfm}

procedure TForm1.FormDblClick(Sender: TObject);
begin

bt2:=Tbutton.Create(Self);
bt2.parent:=Form1;
bt2.caption:='кнопка';

end;

end.

Запускаю, дабл клик, кнопка не появляется , подскажите в чём дело?

До этого пробовал создавать динам. форму с кнопкой, всё работает. Единственное, на первой форме уже располагалась кнопка, которая вызывала процедуру, создания новой формы и кнопки.

[_SERGEYX_]

Появляется кнопка. По умолчанию ее left и top равны 0. Где-то что-то накосячил. Может саму процедуру DblClick не подключил?

[offname]

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

Появляется кнопка. По умолчанию ее left и top равны 0. Где-то что-то накосячил. Может саму процедуру DblClick не подключил?

Спасибо! Точно.