[Ravennt]

Здравствуйте, подскажите или тыкнете пальцем, где ошибаюсь. (только начал изучать Delphi). в качестве учебника "Библия Delphi Фленова" и инет.

Суть проблемы следущая:

из основной формы приложения вызывается форма:

Код:

procedure TfrmMain.btnPoezdkiAddClick(Sender: TObject);
begin
  FnewUsluga:=True;
  try
    PoezdkaOn:=True;
    frmPoezdka:=TfrmPoezdka.Create(nil);
    frmPoezdka.Left:=Trunc(frmMain.Left+(frmMain.Width-frmPoezdka.Width)/2);
    frmPoezdka.Top:=Trunc(frmMain.Top+(frmMain.Height-frmPoezdka.Height)/2);
    frmPoezdka.ShowModal;
  finally
    frmPoezdka.Free;
    PoezdkaOn:=False;
  end;
  GridFields;
end;

после создания обрабатывается Form.activate

при закрытии данной формы и повторном открытии её обработки Form.Activate не происходит.

Где я ошибаюсь ведь при закрытии формы я её освобождаю?
Или на какое событие правильней вешать подготовительные действия которые должны быть выполнены при вызове формы.

Среда Delphi xe2+cnpack

[poli-smen]

Сообщение от Ravennt

после создания обрабатывается Form.activate

при закрытии данной формы и повторном открытии её обработки Form.Activate не происходит.

Где я ошибаюсь ведь при закрытии формы я её освобождаю?

У тебя всё правильно - OnActivate должен срабатывать. Ошибка в другом месте. Ты кстати убрал вторую форму из списка автосоздаваемых при запуске?
И ещё попробуй объявить переменную прямо в обработчике btnPoezdkiAddClick:

Код:

procedure TfrmMain.btnPoezdkiAddClick(Sender: TObject);
var
  frmPoezdka: TfrmPoezdka;
begin
...

Сообщение от Ravennt

Или на какое событие правильней вешать подготовительные действия которые должны быть выполнены при вызове формы.

Обычно в OnCreate.

[Ravennt]

Форма из автосоздания убрана. в onCreate вешать нельзя поскольку когда, делаю через onCreate при заполнении Tmemo программапросто критует.

видимо у меня совсем ужасный код получается. Похоже щас перейду на рисование блок схем...


Проблема оказалась в работе компонента ibquey.

спасибо за подсказки. тему можно закрывать