Показать сообщение отдельно
  #7  
Старый 01.01.2011, 19:30
TotKtoNado TotKtoNado вне форума
Начинающий
 
Регистрация: 28.12.2010
Адрес: Сургут
Сообщения: 103
Версия Delphi: 2010
Репутация: -3238
По умолчанию

Цитата:
Сообщение от v1s2222
Ты имеешь в виду создание компонентов в run time.
На хороший код не рассчитывай, 12 часов дня, 1 число, но все же.
Код:
procedure TForm1.Click(Sender: TObject);
begin
  ShowMessage('Вы нажали на кнопку.');
end;

...
var
  Btn: TButton;
begin
  Btn := TButton.Create(Form1);
  With Btn1 do begin
    parent:=self;
    caption:='button';
    OnClick := Click;
  end;
а где все это писать надо?
Ответить с цитированием