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

Вниз

Как создать класс по имени класса в рантайме?   Найти похожие ветки 

 
vvsystem   (2002-05-18 15:47) [0]

Уважаемые, подскажите, как создать экземпляр класса, зная название класса. Все это в процессе работы...


 
Song   (2002-05-18 15:51) [1]

Используется конструктор Create
класс TBitMap например

Var BitMap:TBitMap;
...
BitMap:=TBitMap.Create - отдельный экземпляр класса.


 
masik   (2002-05-18 15:57) [2]

Предварительно надо "ClassName" зарегистрировать
RegisterClass(Class)

Control:=TControlClass(FindClass("ClassName"));


 
Сатир   (2002-05-18 16:31) [3]

Схожий вопрос. а если надо породить от абстрактного класс другой класс, а потом создать его экземпляр. Это реально в рантайме?


 
masik   (2002-05-18 16:43) [4]

Во первых маленькая поправка...
Control:=TControlClass(FindClass("ClassName")).Create(Owner);

от абстрактного класса ты ничего не породишь, пораждать надо потомка абстрактного класса, а ссылаться к нему можно как к абстрактному


 
vvsystem   (2002-05-18 17:35) [5]

Всем спасибо! все заработало!



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

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

Наверх




Память: 0.45 MB
Время: 0.005 c
1-97254
Alex_LG
2002-05-21 09:40
2002.05.30
Хочу подгружать dll-ки так чтобы выполняли параллельную работу


1-97275
Nat21
2002-05-17 22:47
2002.05.30
Это просто!


1-97302
Blacki
2002-05-19 10:19
2002.05.30
Проблемы с TDateTime


7-97431
Zurgul
2002-03-05 17:19
2002.05.30
отладка сервиса???


3-97113
AndyM
2002-05-10 15:23
2002.05.30
Переменные в имени таблице (... FROM @myvar)





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский