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

[iliili]

Я создавал подобную тему , но в ней мне ответа не дали и она уже укатилась далеко.
Дело вот в чем : динамически создана форма , я ее настроил , и создаю динамически кнопку , а мне нужно поместить ее на форму , но вот не знаю как , там нужно указать Parent и ParentWindow .
Как это сделать?

[Пепел Феникса]

 OB:=TButton.Create(Form1);
 OB.Parent:=Form1;

вот гляньте, думаю полезно будет:
PagedNotePad.rar

[Aliens_wolfs]

Создает несколько кнопок и реагирует на их действие, может чем поможет этот пример

private
{TForm}
 procedure RunButtonClick(Sender: TObject);
 end;

{...}

 var
 Form1: TForm;
 RunButtons: array[0..9] of TButton;

 {...}

 implementation

 {...}

 procedure TForm1.RunButtonClick(Sender: TObject);
 begin
 {Показать событие нажатой кнопки}
 ShowMessage('Button' + IntToStr((Sender as TButton).Tag) + ' clicked!');
{Либо по имени отслеживать нажатие}
 ShowMessage((Sender as TButton).name + ' clicked!');
 end;

 procedure TForm1.Button1Click(Sender: TObject);
 var
 i: Byte;
 begin
 for i := 0 to 9 do
 begin
 {Создаем кнопки}
 RunButtons[i] := TButton.Create(Self);
 with RunButtons[i] do
 begin
 Parent := Form1;
 Caption := 'Button ' + IntToStr(i);
 Name := 'Button' + IntToStr(i);
 Top := i * Height;
 Tag := i;
 {Передать событие нажатие кнопок}
 OnClick := RunButtonClick;
 Visible := True;
 end;
 end;
 end;

[GunSmoker]

http://www.delphikingdom.ru/asp/view...?catalogid=342