Как создать форму программным способом с помощью пары компонентов в Delphi
Я работаю с Delphi 7 и пытаюсь создать форму программно. Вот моя заглушка класса формы:
unit clsTStudentInfoForm;
interface
uses Forms;
type
TStudentInfoForm = class (TForm)
end;
implementation
end.
У меня также есть кнопка в моей основной форме (это просто обычная форма, которая должна создавать и показывать форму выше во время выполнения), и при нажатии она создает и отображает студенческую форму в виде модального окна. Это показывает форму, но на ней ничего нет. Единственное, что вы можете сделать, это нажать кнопку закрытия в верхнем правом углу окна, чтобы закрыть его.
procedure TLibraryForm.btnShowStudentIfoFormClick(Sender: TObject);
var
f : TStudentInfoForm;
begin
f := TStudentInfoForm.CreateNew(Self);
f.ShowModal;
f.Free;
f := nil;
end;
Я понятия не имею, как добавить компоненты в программно созданную форму (не во время выполнения, а в исходный код). Можете ли вы помочь мне написать код, который добавляет кнопку «Хорошо» в форму студента, а также устанавливает заголовок, высоту и ширину формы (код должен быть записан в файле формы студента)?
Любые предложения и примеры будут высоко оценены. Спасибо.