Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Программирование под Windows > Delphi
Перезагрузить страницу Ошибка Class Not Found что делать с этой ошибкой
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
KachoK KachoK вне форума
Member
 
Сообщений: 244
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Регистрация: 20.07.2004
По умолчанию Ошибка Class Not Found что делать с этой ошибкой - 23.11.2005, 09:55

Ситуевина такая:
При инициализации модуля выполняется операция RegisterClass(TMyClass).
В другом месте программы вызывается FindClass('TMyClass'). Получается эксепшн ClassNotFound - TMyClass.
Начал разбираться, залез в Classes.pas
Оказывается, что классы регистрируются в группах TRegGroup, но та группа в которой он регистрируется оказалась не активной (TRegGroup.Active = False) и поэтому не проверяется на наличие в ней этого класса.

Ну так вот, кто может устанавливать значения False для групп? Никто с такой фигней не сталкивался? Или хотя бы откуда начинать копать, а то уже четвертый день сижу парюсь по 12 часов в день, с графика работ сбился безбожно.

P.S. Дело не в классе, т.к. этот же модуль прекрасно работает на других программах.
Ответить с цитированием
  (#2 (permalink)) Старый
KachoK KachoK вне форума
Member
 
Сообщений: 244
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Регистрация: 20.07.2004
По умолчанию 23.11.2005, 14:32

В общем так...
После многочасового камлания с бубном и ритуального распития много литров шаманского пива проблемма решена, но источник ее так и не обнаружен.

Тем кто столкнется с этой проблеммой в будующем советую перед регистрацией класса (RegisterClass) сделать активацию группы с предком этого класса:
Код:
ActivateClassGroup(TPredokOfMyClass);
RegisterClass(TMyClass);
А вообще после такого программирования появляется много вопросов к умным дядям из Борланда.
Ответить с цитированием
Пользователь сказал cпасибо:
vladgul (05.07.2019)
  (#3 (permalink)) Старый
vladgul vladgul вне форума
Новичок
 
Сообщений: 1
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 05.07.2019
По умолчанию 05.07.2019, 16:33

Цитата:
Сообщение от KachoK Посмотреть сообщение
В общем так...
Тем кто столкнется с этой проблеммой в будующем советую перед регистрацией класса (RegisterClass) сделать активацию группы с предком этого класса:
Код:
ActivateClassGroup(TPredokOfMyClass);
RegisterClass(TMyClass);
А вообще после такого программирования появляется много вопросов к умным дядям из Борланда.
Уже и Борланда давно уж в помине нет. Только внучок Embarcadero, а дело его живет.
Спасибо мил человек, это решение сработало на самой современной Delphi на данный момент XE10.3.1 RIO
Все в точности. Причем этот код работал в предыдущей версии Delphi XE.
Понять почему TRegGroup.Active = False не получится. Там шаманство сплошное. Точка останова на создании этих групп. Останавливается всего 1 раз. Но затем группы уже 3шт. Откуда взялись непонятно.
Короче, спустя столько лет тема еще актуальна.
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Что делать с ошибкой (BSOD)? Zyklon Любые вопросы от новичков 6 28.03.2012 00:07
Выводится ошибка: Message:1407 Functor is not found in a domain (during term reading Meteor Prolog 2 20.05.2011 01:11
ошибка operation system not found МилОчка Любые вопросы от новичков 3 18.01.2011 16:55
При открытии папки с фильмами выскакивает ошибка: error.xvidcore.dll not found SKORYI Любые вопросы от новичков 3 08.03.2009 12:45
Ошибка при запуске приложения: File ''lang.dat'' not found. zayas Любые вопросы от новичков 1 02.07.2008 16:59
Ошибка при установке драйверов на звук: audio device not found. Ser Gun Любые вопросы от новичков 2 18.09.2007 08:57
Project Project2.exe raised exception class EOleSysError что делать Gansss C++ Builder 13 15.02.2007 15:18
Ошибка file not found (CRТ.TPU) Anna82 Pascal 2 19.05.2006 00:23
При установке фильтра появляется ошибка item cannot be found antoniz Visual C++ 0 07.06.2005 17:47
Как избавиться от ошибки Class TDBtext not found DENIS451 C++ Builder 7 07.02.2005 13:31
Class TPanel not found что это такое Dian Delphi 5 27.01.2005 16:17
Borland Delphi 7 при включении этой программы компьютер зависает что делать Anonymous Delphi 2 23.12.2002 11:48



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов