Написать процедуру создания новой формы и вывода ее модально

Категория: Delphi/Pascal

2011-08-28 22:42:13

code: #delphi

procedure TForm1.CreateAndModal;
begin
  TForm.Create(Self).ShowModal;
end;

Поделиться:

Sample Code