[Nothing]

У меня есть процедура, во время выполнения этой процедуры всплывает новая форма, как сделать так чтобы во время открытия формы процедура остановила свое выполнение, и не начинала, до тех пор пока форма не закроется?

[NIch]

Какая форма (простая или модальная)??? Как вызываешь эту форму???
Если через эту же процедуру вызываешь модальную форму, то процедура ждет ее закрытия...

[Nothing]

Ну идет примерно так

Код:

procedure TForm1.N7Click(Sender: TObject);
begin
bla-bla-bla;
bla-bla-bla;
bla-bla-bla;
  with TForm2.Create(self) do
  try
    ShowModal;
  finally
    Free;
  end;
{Дальше действия не идут пока не закроетсся форма}
bla-bla-bla;
bla-bla-bla;
bla-bla-bla;
bla-bla-bla;
end;

[NIch]

Ну так все вроде правильно...Процедура работает, появилась форма, закрылась форма, процедура продолжила работу...А что не так работает???

[NIch]

Ну так все вроде правильно...Процедура работает, появилась форма, закрылась форма, процедура продолжила работу...А что не так работает???