If форма загружена

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
LexBondAgent007
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 132
Зарегистрирован: 10.05.2005 (Вт) 16:11
Откуда: Россия - Москва - ЦАО

If форма загружена

Сообщение LexBondAgent007 » 08.07.2005 (Пт) 14:30

Похожего нигде невстречал еще - но вот понадобилось...
как это изобразить в виде кода?:

If форма1 загружена (Loaded) then ДЕЙСТВИЕ

Если кто то не понял - то поясняю:
Форму можно load и Unload (естесственно :wink: ) - а как понять это в виде кода - load она или unload :roll:
Это не читайте! Это спам! :D

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 08.07.2005 (Пт) 14:35

Перебирай Forms. Или поищи постинг Vi, он эту задачу решил более изящно.
Lasciate ogni speranza, voi ch'entrate.

LexBondAgent007
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 132
Зарегистрирован: 10.05.2005 (Вт) 16:11
Откуда: Россия - Москва - ЦАО

Сообщение LexBondAgent007 » 08.07.2005 (Пт) 16:02

Это все = что искать иголку в стоке сена... ссылочку? :oops: :roll:

А как понять переберать формы?
Это не читайте! Это спам! :D

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 08.07.2005 (Пт) 16:08

Код: Выделить всё
Dim frm As Form
...
For Each frm In Forms
  If frm.Name = "Form1" 'или If frm.hWnd = ...
    MsgBox frm.Name
  End If
Next frm


А что трудного в поиске? Автором укажи Vi, ключевые слова "Forms"
Lasciate ogni speranza, voi ch'entrate.

LexBondAgent007
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 132
Зарегистрирован: 10.05.2005 (Вт) 16:11
Откуда: Россия - Москва - ЦАО

Сообщение LexBondAgent007 » 08.07.2005 (Пт) 18:46

Так форма уже известна какая! :) Осталось только определить - активна она или нет... Зачем ее искать (или переберать как ты назвал, что я сначала не понял :lol: )
Это не читайте! Это спам! :D

_Мика_
Гуру
Гуру
 
Сообщения: 1459
Зарегистрирован: 24.10.2003 (Пт) 15:05
Откуда: г. Москва, м.Речной вокзал

Сообщение _Мика_ » 08.07.2005 (Пт) 18:49

-Папа, а правда, что форумы делают людей дибилами?
-гы гы гы, сынок, лол!

LexBondAgent007
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 132
Зарегистрирован: 10.05.2005 (Вт) 16:11
Откуда: Россия - Москва - ЦАО

Сообщение LexBondAgent007 » 08.07.2005 (Пт) 20:05

_Мика_, пасиба конечно - но я уже нашел это :lol:

alibek, тот пример от Vi показывает как загрузить форму, а не узнать - загружена она или нет... 8)
Это не читайте! Это спам! :D

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 09.07.2005 (Сб) 2:40

alibek, даже не так:
Код: Выделить всё
...
If TypeOf frm Is frm_MyVeryOwnForm Then
...

А то мало ли, как там названия распределяются...

LexBondAgent007
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 132
Зарегистрирован: 10.05.2005 (Вт) 16:11
Откуда: Россия - Москва - ЦАО

Сообщение LexBondAgent007 » 11.07.2005 (Пн) 10:31

Все... теперь въехал :lol: 8)
Это не читайте! Это спам! :D

Sur
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 91
Зарегистрирован: 14.07.2003 (Пн) 20:54
Откуда: C2H5OH

Сообщение Sur » 12.07.2005 (Вт) 15:58

Почему бы просто не расставить флаги для нужных событий формы и сверяться с ними...

LexBondAgent007
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 132
Зарегистрирован: 10.05.2005 (Вт) 16:11
Откуда: Россия - Москва - ЦАО

Сообщение LexBondAgent007 » 12.07.2005 (Вт) 16:27

Sur, Гдеж ты раньше то был! :lol: И как же я сам не додумался! Вот так я и сделаю! Легким и безгеморойным обычным способом! 8)
Пасиб!
Это не читайте! Это спам! :D

X-BOND
Реалист
Реалист
 
Сообщения: 944
Зарегистрирован: 19.08.2002 (Пн) 11:44
Откуда: Ukraine

Сообщение X-BOND » 12.07.2005 (Вт) 18:51

Я сначала подумал имеется ввиду Form.Visible :roll:


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot и гости: 96

    TopList