|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Проблема с событиями TForm
Здравствуйте, подскажите или тыкнете пальцем, где ошибаюсь. (только начал изучать 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 Последний раз редактировалось Ravennt, 10.09.2012 в 09:01. |
#2
|
||||
|
||||
Цитата:
И ещё попробуй объявить переменную прямо в обработчике btnPoezdkiAddClick: Код:
procedure TfrmMain.btnPoezdkiAddClick(Sender: TObject); var frmPoezdka: TfrmPoezdka; begin ... Цитата:
|
Этот пользователь сказал Спасибо poli-smen за это полезное сообщение: | ||
Ravennt (26.09.2012)
|
#3
|
|||
|
|||
Форма из автосоздания убрана. в onCreate вешать нельзя поскольку когда, делаю через onCreate при заполнении Tmemo программапросто критует.
видимо у меня совсем ужасный код получается. Похоже щас перейду на рисование блок схем... Проблема оказалась в работе компонента ibquey. спасибо за подсказки. тему можно закрывать Последний раз редактировалось Ravennt, 10.09.2012 в 11:34. |