Текущий архив: 2007.07.01;
Скачать: CL | DM;
Вниз
function Найти похожие ветки
← →
3е (2007-06-04 16:47) [0]Забыл какя функция проверяет существует ли форма....
???
← →
SlymRO © (2007-06-04 16:48) [1]if not assigned(form1) then
← →
Джо © (2007-06-04 16:49) [2]> [1] SlymRO © (04.06.07 16:48)
> if not assigned(form1) then
Это всего лишь проверка на то, что в переменной form1 не содержится значение nil.
← →
TUser © (2007-06-04 16:50) [3]assign()
Forms () // тока это процедура
?
← →
Palladin © (2007-06-04 16:59) [4]Тяжело когда забыл да еще и незнал
← →
Eraser © (2007-06-04 17:10) [5]> [0] 3е (04.06.07 16:47)
for i := 0 to Screen.FormCount - 1 do
if Form = Screen.Forms[i] then
ShowMessage("!");
:)
← →
Rouse_ © (2007-06-04 17:11) [6]
if IsWindow(Form1.Handle) then
← →
Игорь Шевченко © (2007-06-04 17:12) [7]Что есть "форма существует" ?
← →
SlymRO © (2007-06-04 17:12) [8]SELECT form FROM forms WHERE Caption= "form1";
← →
Карелин Артем © (2007-06-04 17:36) [9]if (form!=null) {}
← →
Anatoly Podgoretsky © (2007-06-04 18:33) [10]> 3е (04.06.2007 16:47:00) [0]
Такой функции не существует, но зато существует массив Forms.
Если будешь читать справку, то не верь ей, там начиная с Д1 ерунда написана.
Массив хранит все созданые на текущий момент формы
Массив очень надежный в отличии от остальных средств
← →
TUser © (2007-06-04 18:36) [11]Афигеть, ведь правда :)
← →
Style © (2007-06-04 18:37) [12]
> но зато существует массив Forms.
*Точнее Screen.Forms ;)
Выше пример уже писали. Если нет указателя можно искать
форму по ее Caption или по ее Классу
if Screen.Forms[i] is TMyForm then ......
← →
Anatoly Podgoretsky © (2007-06-04 18:46) [13]> Style (04.06.2007 18:37:12) [12]
Screen не массив, а переменная типа TScreen
А вот Forms является массивом членом класса TScreen
Переменную создавать не надо.
← →
Style © (2007-06-04 18:48) [14]
> Anatoly Podgoretsky © (04.06.07 18:46) [13]
Я это понимаю...
Просто хотелось обратить его внимание на глобальную переменную Screen
Страницы: 1 вся ветка
Текущий архив: 2007.07.01;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.028 c