Конференция VBStreets

**i'm pissed** » 12.11.2004 (Пт) 18:12

Значить у меня form1 размножается. Получается так что если я закрываю одну из размноженной formы закрывается весь проект (это если в form1_unload прописываю end), а если прописываю unload me проект потом не выгружается из памяти (кроме этих форм есть еще несколько).

**Faust** » 12.11.2004 (Пт) 18:52

Ну, можно завести глобальную переменную, хранящую количество открытых форм. Если во время Unload'а формы оно равно еденице - End'аем программу.

**Igor_123** » 12.11.2004 (Пт) 18:54

Сделай им Hide, а при закрытии всего приложения выгружай все.
Тёмыч давал пример по выгрузке таймеров, где-то рядом, поищи.

Без обид! Поменял-бы ты ник, а то читаю как "Я пиз#$%ц"

**i'm pissed** » 12.11.2004 (Пт) 20:44

Faust писал(а):Ну, можно завести глобальную переменную, хранящую количество открытых форм. Если во время Unload'а формы оно равно еденице - End'аем программу.

По подробнее можно PLZ

**SSecurity** » 12.11.2004 (Пт) 21:53

Когда "участвуешь в процессе размножения формы" при создание экземпляра увеличивыай глобальную переменную AllFormsCount на единицу ... чтобы у тебя глобальная переменная показывала скока форм ....

При закрытии смотрим,

Код: Выделить всё: Private Sub Form_Unload(Cancel As Integer) If AllFormsCount = 1 then End End Sub

**Ennor** » 12.11.2004 (Пт) 23:11

Народ, да вы чего? :shock:

VB Object Browser писал(а):Property Forms As object
read-only
Member of VB.Global
All loaded forms in an application.

По сути - коллекция. Используется в данном случае так:

Код: Выделить всё: If Forms.Count = 1 Then End

Конференция VBStreets

Про form и unload

Про form и unload

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