![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проверка существования формы перед ее открытием
Егоров А.Н. © (2007-07-27 14:24:00)Имеется MDIForm, в которой при нажатии кнопок открываются MDIChildForm-ы.
Подскажите, как при повторном нажатии кнопки проверить, открата ли уже соответствующая ей MDIChildForm или нет.
Егоров А.Н. (2007-07-27 14:42:00) [1]Мысль понял. Спасибо.
Сергей М. (2007-07-27 14:39:00) [2]
> соответствующая ей
Как выглядит это "соответствие" ?
clickmaker (2007-07-27 14:29:00) [3]ButtonClick
if (TButton(Sender).Tag <> 0) and TForm( (TButton(Sender).Tag ).Visible then
открыта
else begin
TButton(Sender).Tag := ChildForm
ChildForm.Visible := true;
end;
как вариант