У VB6 свихнулись мозги?

[Osteon]

Я лично в недоумении...
Я пошагово, не знаю, как по-умному...
Запускаю написанную программу в среде VB6 (кнопка "Старт" - F5), работаю с ней, затем при выходе (красная кнопка с крестиком в правом верхнем углу ОКНА ПРОГРАММЫ), вылетает вся среда VB6, приходится каждый раз запускать сначала весь проект. Это появилось не знаю когда, но я грешу на то время, когда я установил "vb6mousewheel" по совету из книги "Visual Basic на практике"под редакцией Г. Магданурова.
Это еще как бы куда ни шло, но вот сейчас появился новый глюк у среды:
Я недавно создал тему "Программное изменение контекстного меню" - http://bbs.vbstreets.ru/viewtopic.php?f=1&t=45274.
После того, как я создал элемент меню с индексом "0", и нажимаю соответствующий пункт меню, дальше я не могу ничего сделать - программа зависает. Не реагирует никак. Не работает останов среды (квадратик), не уходит окно тестируемой программы, и, соответственно, не показывается окно среды с текстом программы в редакторе среды. Если открыты несколько окон разных форм программы, то не могу их закрыть - крестик в правом верхнем углу при наведении курсора светлеет (становится активным), и все, при нажатии не реагирует. ЕСли окно неактивно и находится под другим окном, то при клике на крестик оно становится активным, т.е. становится сверху предыдущего, но тоже не закрывается при клике на крестик.
Только что обратил внимание, что не закрываются окна форума, системного "Блокнота", и другие, пока я не закрыл среду принудительно. После закрытия среды все заработало штатно.
При входе в неидексированный пункт в меню ничего подобного не происходит, все работает в штатном режиме. Я подозреваю, что дело здесь в индексации пункта меню, но не знаю, как выйти из ситуевины...
В общем, я в полном недоумении... У кого-либо случалось что-либо подобное?
Работаю в WinXP Prof SP3, среда VB6, программа работает с БД Access (*.mdb). В приложении реализация меню, здесь все работает...

[Qwertiy]

В отлаживаемой программе нажать Ctrl+Break и если есть открытые MsgBox'ы закрыть их - не помогает?

[Osteon]

В отлаживаемой программе нажать Ctrl+Break и если есть открытые MsgBox'ы закрыть их - не помогает?

Не-а... MsgBox'ы закрываются, а потом то же самое - висит... Отключил mousewheel - он не при делах - висит... На Ctrl+Break не реагирует...

Снова пошагово:
1. Запускаю программу в среде VB6, выхожу через контекстное меню на показ человеков (Gluk1.jpg в приложении)
2. Тут же выскакивает ошибка (Gluk2.jpg в приложении). На нее пока внимания не обращайте. Жму "Закончить" - вылетает вся система. Повторно запускаю все. Жму "Отладка" - экран застывает, никаких действий, на мышь и клавиатуру ничего не реагирует. Закрываю экран тестируемой программы не выходя из среды, через несколько щелчков мышой на "окошке" программы в нижней панели инструментов винды (типа как в (Gluk4.jpg в приложении)
3. Выходит экран с редактором (Gluk3.jpg в приложении). На текст программы внимания так же не обращайте, я пока возмущен и негодую по поводу сумасшествия VB6. Вверху навел курсор на "останов" - это видно, кнопка "вспухла". Но никак кнопка не реагирует на щелчки мышой, так и остается... Вспухшая…
4. Выхожу только через панель инструментов... (Gluk4.jpg в приложении)

Все, собственно.
Кстати: при тестировании той экспериментальной программы с массивом меню, что я приаттачил в начальном посте, все работает прекрасно: тестируемая программа выходит при нажатии на крестике вверху-справа окна, не «выбивая» всей среды VB6. При вставке в текст программы команды “Stop” программа останавливается, сворачивая свое окно и показывая окно редактора среды, где желтой полосой выделена «Stop»

Мысли пока такие: если в программе из первого поста все хорошо, то нужно искать где-то в моей основной проге ошибку. Это или какая-то API-шка, или какая-то моя недоработка при юзании БД… Как-то так…

Может, кто сталкивался с такими глюками при использовании API-шек? Или еще чего? На праздники буду разбираться...

[alex77755]

Запускаю написанную программу в среде VB6

А почему в среде?
Компилировать не пробовал?
Компилятор может показать ошибку

[ger_kar]

Ну и как вариант, есть запуск в среде с предварительной полной компиляцией.
А SubClassing используется или нет? По признакам похоже на то.

[Osteon]

Запускаю написанную программу в среде VB6

Компилировать не пробовал?
Компилятор может показать ошибку

Не пробовал... Будем попробЫвать...

А SubClassing используется или нет? По признакам похоже на то.

Что такое SubClassing? Только без сатирических экскурсов в мое неполное VB-образование, что принято на этом форуме... Отсутствует оно... Хотя, логически, если я не знаю, что это такое, то, наверное, не используется...

[ger_kar]

про сабклассинг можно почитать тут и здесь.
Также есть куча других тем на форуме на тему Сабклассинга он же субклассинг он же Subclassing, достаточно сделать поиск по этим словам, ну и гугл по этой тематике много чего интересного выдает.

[Osteon]

Про сабклассинг теперь знаю. Не на уровне спеца, но при случае удивить дворника-таджика эдаким словцом "Сабклассинг" смогу...

Здоровеньки булы (в свете новых веяний )!

Спешу обрадовать - у VB6 с мозгами все в порядке! Не в порядке у программиста!

После двухнедельных мытарств и мучений я решил "отгрузить" MouseWheel Fix (скроллинг текстового редактора в среде VB6). Подгрузил я ее по информации с книги "Visual Basic на практкие" под ред. Г.И.Магданурова, "БХВ-Петербург", 2008, стр.20. Решение принял потому, что этот *.ocx я подключал к проекту последним.
Но - при попытке отключить его через менеджер модулей (Err0) Windows выдавала ошибку (Err1). Пришлось тупо удалить из файла проекта *.vbp строку "Module=MouseWheel; MouseWheel.bas". Ничего не изменилось. Подключил снова.
Все шло, как было описано выше - при установке брейкпойнта на текст программы (Err1.1) и попытке вызова контекстного меню (Err2), экран зависал, никакой реакции. Потом винда сама по себе убирала гриды с дочернего окна (Err3), после нескольких кликов на иконке программы на панели задач внизу винды кое-как появлялось окно редактора программы, но - работала только F8 (пошаговое выполнение программы) или F5 (пуск). никакой реакции на мышь - не выделяется текст, не показываются в тултипе значения переменных при наведении курсора на их обозначение, и т.п.
По какому-то наитию отключил "MouseWheel.bas", который я нашел где-то в сети. Модуль предназначен для скроллирования сеток грида. И - о Боги!!! - все заработало в штатном режиме, так, как должно быть.
Вывод: во всем виноват именно этот модуль - MouseWheel.bas. Вот теперь я не знаю - имеет ли этот модуль признаки сабклассинга? При попытке проанализировать текст этого модуля я пришел в ужас, на мне зашевелились остатки волос на моей лысине, и я закрыл "Блокнот". Немного неудобно постоянно отключать этот модуль при тестировании программы, но это не смертельно. При окончательной компиляции проекта нужно просто не забыть его включить...

Модуль прилагаю. Спасибо всем за участие!

[iGrok]

Вот теперь я не знаю - имеет ли этот модуль признаки сабклассинга?

Однозначно да. Без сабклассинга, если мне ни с кем не изменяет память, прокрутку не приделаешь.

[Osteon]

Однозначно да.

Я почему-то так и подумал. Просто этот модуль шел как *.bas, потому и не пришла мне в голову мысль за сабклассинг... Я его просто бездумно воткнул в проект, и все. А он вишь как...

[iGrok]

По идее, достаточно при работе в IDE не использовать AddScroll2Grids.

Как понять, что код работает в IDE, можно почитать тут:
viewtopic.php?f=68&t=42654

[ger_kar]

Osteon писал(а):Вот теперь я не знаю - имеет ли этот модуль признаки сабклассинга?Однозначно да. Без сабклассинга, если мне ни с кем не изменяет память, прокрутку не приделаешь.

Это точно, но подумалось, а вдруг, да и изобрели что-то новенькое! Но код показал, что таки нет - ничего нового, обычный сабклассинг, чтоб его

[Osteon]

Но код показал, что таки нет - ничего нового, обычный сабклассинг, чтоб его

Вот и разобрались! Еще раз спасибо за помощь!

[Osteon]

Как понять, что код работает в IDE, можно почитать тут:

Будем учить, и даже попытаемся понять...