Текущий архив: 2003.10.27;
Скачать: CL | DM;
Вниз
Как определить существует ли форма ? Найти похожие ветки
← →
Dream (2003-10-14 10:40) [0]Form 2 переождически создайться , и удаляеться методом free во избежании ошибок хочу чтобы программа определяла есть ли форма или нет.
← →
Anatoly Podgoretsky (2003-10-14 10:41) [1]Screen.Forms
← →
Dream (2003-10-14 10:47) [2]> Anatoly Podgoretsky
Как это использовать ? если обращаться к параметрам формы которой не существует то возникнет исключение , а этого как раз и не надо
← →
jack128 (2003-10-14 10:48) [3]если успользуешь глобальную переменную (var Form2 : Tform2) то в OnDestroy формы обНИЛивай эту переменную...
← →
Плохиш_ (2003-10-14 10:48) [4]>Dream (14.10.03 10:47) [2]
Что и F1 не помогает?
← →
Dream (2003-10-14 10:55) [5]> jack128
Проблема в том что я могу создать несколько форм и когда закроетьмся одна и обнулит информацию в переменной прога подумает что больше форм нет а они будут весеть мертвым грузом :(
> Плохиш_
F1 у меня сломана !!! Лично для тебя : есть такая кнопочка не браузере в правом верхнем углу ! Написано Х ! Нажми её !
← →
Плохиш_ (2003-10-14 11:00) [6]>Dream (14.10.03 10:55) [5]
> F1 у меня сломана !!!
Недалеко от X в делфи есть меню-пункт "Help"
← →
Романов Р.В. (2003-10-14 11:03) [7]Заноси ссылки на формы в динамический массив или TObjectList. При удалении формы удаляй ссылку
← →
Anatoly Podgoretsky (2003-10-14 11:07) [8]Придется тебе покупать новую клавиатуру, поскольку кроме Ф1 у тебя сломаные еще и Alt, F10, стрелки и Enter.
← →
Anatoly Podgoretsky (2003-10-14 11:08) [9]Романов Р.В. © (14.10.03 11:03) [7]
Зачем плодить сущности, Screen.Forms и есть этот самый динамический массив и в отличии от самопального всегда актуальный.
← →
dream (2003-10-14 11:27) [10]Сделал так
if screen.Forms[1].Visible = true then
Вроде работает ! Всем спасибо
← →
jack128 (2003-10-14 11:32) [11]
> if screen.Forms[ 1].Visible = true then
Ну-ну...
← →
Плохиш_ (2003-10-14 11:38) [12]>jack128 © (14.10.03 11:32) [11]
Что Ну-ну... радоваться надо человек на шаг продвинулся :-)
Сделает 2ю форму будет думать дальше.
← →
Anatoly Podgoretsky (2003-10-14 11:40) [13]dream (14.10.03 11:27) [10]
Очень смешно, но хотя кто тебя знает. Но идешь в правильном направлении. Дополнительная подсказка .Name = "..."
← →
Rouse_ (2003-10-14 13:14) [14]if Assigned(Form2) then ...
Ну и соответственно удалять через Release и Form2 := nil;
Желаю успехов
Страницы: 1 вся ветка
Текущий архив: 2003.10.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.017 c
