модальная форма

  • Автор темы nws
  • Дата начала
N
#1
Как сделать что бы при нажатии на кнопку появилась Модальная форма ?
 
E
#4
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
with TForm2.Create(Application) do
try
ShowModal;
finally
Release;
end;
end;
Примерно так. :rolleyes: