Модератор: Модераторы
Var
  aForm: TForm;
  aButton: TButton;
Begin
  aForm := TForm.Create(Application);
  aButton := TButton.Create(aForm);
  aButton.Parent := aForm;
  aButton.Caption := 'Wow';
  aForm.ShowModal;
  aForm.Free;
End; 
Brainenjii писал(а):Есть кнопочка на IDE - создать новую форму... Или, как вариант:
- Код: Выделить всё
 Var
aForm: TForm;
aButton: TButton;
Begin
aForm := TForm.Create(Application);
aButton := TButton.Create(aForm);
aButton.Parent := aForm;
aButton.Caption := 'Wow';
aForm.ShowModal;
aForm.Free;
End;
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1