Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не получается создать объект указанного класса [D7]


mfender ©   (2011-01-15 06:00:00) 

Проблема в следующем: в package лежит и регистрируется TframeTransfertPoint


type
 TframeTransfertPoint = class(TFrame)
…
initialization
 RegisterClass(TframeTransfertPoint);


Далее происходит невнятное:

type
 TFrameClass = class of TFrame;
…

var
 AFrmClass: TFrameClass;
 AFrame: TFrame;
…
   AFrmClass := TFrameClass(GetClass('TframeTransfertPoint'));
   if Assigned(AFrmClass) then
   begin
     AFrame := TFrameClass.Create(AContainer);

В результате, AFrame всегда получается TFrame, а вовсе не TframeTransfertPoint.
Почему так может быть?


mfender   (2011-01-15 12:37:00) [1]

Ну, не сразу, конечно… А в целов всё верно: чтобы не тупить, нужно иногда спать ))))
Спасибо!


Palladin   (2011-01-15 09:08:00) [2]


> TFrameClass.Create(AContainer);

так ты ж его сам тут тупо и создаешь... что за глупые вопросы? замени на AFrmClass.Create и будет тебе щасте...
ужос какой то... сразу на форум


Наверх

Титульная страница Поиск, карта сайта Написать письмо