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

Вниз

Создание свойства нового компонента   Найти похожие ветки 

 
Aleksandr ©   (2006-12-16 20:03) [0]

Здравствуйте уважаемые мастера Delphi. Я создаю новый компонент и хочу добавить в него новое свойство, которое могло бы раскрыватся (+) и появлялись дополнительные поля разных типов. Как это зделать? Заранее спасибо.


 
Юрий Зотов ©   (2006-12-16 22:02) [1]

Свойство-объект. Наследовать от TPersistent или его наиболее подходящего потомка.

Примерв объектных свойств см. в мсходниках VCL, там таких много. Слово "сделать" пишется через "с".
:o)


 
DimaBr   (2006-12-18 09:17) [2]


TMyGroup = class(TPersistent)
private
  fIntegerProperty: integer;
  fStringProperty: string;
published
   property IntegerProperty: integer read fIntegerProperty write fIntegerProperty;
   property StringProperty: string read fStringProperty write fStringProperty;
end;

TMyComponent = class(TComponent)
private
  fMyGroup: TMyGroup
published
  property MyGroup: TMyGroup read fMyGroup write SetMyGroup;
end;

constructor TMyComponent.Create();
begin
 inherited;
 fMyGroup := TMyGroup.Create;
end;

destructor;
begin
fMyGroup.Free;
inherited;
end;



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

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

Наверх





Память: 0.44 MB
Время: 0.046 c
2-1200214983
{ент
2008-01-13 12:03
2008.02.03
Как создать форму в RunTime


15-1198529781
Evanescence
2007-12-24 23:56
2008.02.03
Ищу название и исполнитель песни


11-1182779412
max727
2007-06-25 17:50
2008.02.03
KOLComObj


4-1182934526
Nikfel
2007-06-27 12:55
2008.02.03
Как из ico достать ico размером 16x16 или 48x48


2-1199473874
ВВВ2
2008-01-04 22:11
2008.02.03
Передача record a в форму





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