Диалоговое окно

← →
Осирис © (2002-09-19 15:59) [0]

Мой код:

....
// Создание окна
m:=Tm.Create(self);
m.Visible;
.............

То есть после создания окна продолжается выполнение кода процедуры. А как сдалать так, чтобы после создания окна например после m.Visible выполнение кода прекратилось и возобновилось лишь после закрытия окна, причем из этого окна принималось какое-либо значение.

Не охото разделять процедуру на 2 части (одна до m.visible, другая после). Надеюсь меня поняли :)

Или это делается как-то по другому ?

← →
lenin © (2002-09-19 16:00) [1]

m.ShowModal

← →
BOA_KAA © (2002-09-19 16:01) [2]

А как насчет Label?

← →
Осирис © (2002-09-19 16:06) [3]

>> m.ShowModal

Сейчас попробую.

>> А как насчет Label?

А что Label ?

← →
BOA_KAA © (2002-09-19 16:09) [4]

2Осирис © (19.09.02 16:06)

А что Label ?

Если возник этот вопрос, значит я твой неправильно понял:-)))

← →
Осирис © (2002-09-19 16:14) [5]

>> m.ShowModal

Да. Подходит. Тогда еще один вопрос.

Как получить значение из модальной формы, которое там было перед ее закрытием ?
Можно перед закрытием модальной формы устанавливать значение какой либо переменной, а в основном коде читать эту переменную. Или есть более красивый способ ?

Просто обращайся к свойствам этой формы и все.
Например, если тебе надо получить текст из m.edit1, то пишешь
str:=m.edit1.text;

>> Просто обращайся к свойствам этой формы и все.
>> Например, если тебе надо получить текст из m.edit1, то пишешь
>> str:=m.edit1.text;

Информацию мне нужно получать после закрытия формы:

т.е.

form.ShowModal;

Ввели параметры
Закрыли форму form

Работаем с параметрами введенными в form (Здесь уже form не существует)

ff:=TForm2.Create(self);
ff.ShowModal;
caption:=ff.Edit1.Text;
в таком варианте все работает.

Диалоговое окно Найти похожие ветки