Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2011.04.17;
Скачать: [xml.tar.bz2];

Вниз

Не получается создать объект указанного класса   Найти похожие ветки 

 
mfender   (2011-01-15 06:00) [0]

Проблема в следующем: в 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.
Почему так может быть?


 
Palladin ©   (2011-01-15 09:08) [1]


> TFrameClass.Create(AContainer);

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


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

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



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2011.04.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
15-1294090199
Юрий
2011-01-04 00:29
2011.04.17
С днем рождения ! 4 января 2011 вторник


2-1295269594
Евгений07
2011-01-17 16:06
2011.04.17
дельфи игнорирует файл источник


15-1294155528
Sidak
2011-01-04 18:38
2011.04.17
Выпускная работа


15-1293716306
makarik01
2010-12-30 16:38
2011.04.17
виртульный диск


15-1293983270
Aleks
2011-01-02 18:47
2011.04.17
Сеть и базы данных





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский