Как закрыть форму при показе

[RIO]

Здравствуйте ! Подскажите пожалуйста как закрыть форму при показе, например в OnShow, я заметил, что главную форму возможно закрыть таким способом, а вторую например нет, это нужно для того, если при OnShow стоит какая не будь проверка на ошибку и если ошибка, то вторая форма сразу же закрывается, например :

if Error then
Close;

[Баламут]

Ну если сильно надо именно так, то вот код:

procedure TForm2.FormShow(Sender: TObject);
begin
  PostMessage(Form2.Handle, WM_CLOSE, 0, 0);
end;

Хотя на мой взгляд это дурной тон так делать

[RIO]

А чем плохой ?

[Баламут]

На кой создавать и показывать форму, если в этом нет необходимости? Пересмотри логику программы.

[Stilet]

если при OnShow стоит какая не будь проверка на ошибку и если ошибка, то вторая форма сразу же закрывается, например :

Нужно не закрывать окно при показе, а до команды показа проверять некое условие, если не годится то просто не показывать.