Полная версия этой страницы: модальная форма
Как сделать что бы при нажатии на кнопку появилась Модальная форма ?
Form2.ShowModal;
в обработчике онклик кнопки
в обработчике онклик кнопки
thx
Код
procedure TForm1.Button1Click(Sender: TObject);
begin
with TForm2.Create(Application) do
try
ShowModal;
finally
Release;
end;
end;
begin
with TForm2.Create(Application) do
try
ShowModal;
finally
Release;
end;
end;
Примерно так.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.