Модальная форма, из немодальной Опции

[sheka]

После метода Show формы нужно сделать "некоторые действия". Эта форма также должна быть модальной. Какие есть решения данного вопроса?
Callback функция - тяжеловатое решение: не хочется создавать тип функции, хранить параметры ф-ии, условие вызова (т.к. не всегда после show нужно выполнять "некоторые действия").
Есть ли какая-то информация по Callback методам? Или надо сделать фиктивную ф-ию, содержащую данный метод?

[IUnknown]

2 формы создаются статически: Главная и Модальная.

Очень плохо. В этом случае у тебя модальная форма при втором запуске будет содержать все изменения, которые были внесены в состояние ее контролов при первой сессии работы с ней. Чтобы формы при всех запусках были одинаковы - надо создавать их динамически. Смотри что получается: положил я на форму твою BitBtn, которая передает '123' и делает какое-то действие при показе модальной формы. А действие сделал очень простое: изменить заголовок на этот самый параметр, т.е, на '123'. И рядом положил еще одну кнопку, которая просто показывает модально форму:

procedure MainForm.Button1Click(Sender: TObject);
begin
   ModalForm.ShowModal;
end;

Запускаю программу, и нажимаю сначала твою кнопку. Все прекрасно, заголовок изменился. Закрываю модальную форму, и жму свою кнопку. И чего я увижу в заголовке? А ведь я не просил этого, я хочу просто показать форму безо всяких действий. Понимаешь, о чем я? Со стороны-то выглядит так, как будто действие опять выполнено...

Сообщение отредактировано: IUnknown - 25.06.2012 14:39