Модератор: Модераторы
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;
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 50