ModalResult отличный от MrOk

[HellMercenariess]

Здравствуйте!

Я разместил такой вот код

   if FileExists(baseDir+pref) then
StandUberseh.LoadFromFile(baseDir+pref)  else
 begin
ShowMessage('Critikal error');
ModalResult:=mrCancel;
 end;

в OnCreate
Файла нет но форма продолжает работать.
Тогда я порылся в сети и там пишут что в ОнКриэйт это не прокатит раз уж надо ЭТО сделать то надо писать в ОнШов.

В OnShow и OnActivate добавил код:

ModalResult:=mrCancel;
  if ModalResult = mrCancel then Close;

Форма продолжает работать как ни в чем не бывало.
Работаю с модальной формой.

[Аватар]

Метод ShowModal сбрасывает в 0 ModalResult после OnCreate, OnShow и OnActivate модальной формы, и только после этого в цикле начинает проверять его значение. Поэтому манипуляции с ним в этих событиях не имеют смысла