Главная страница
    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.45 MB
Время: 0.042 c
2-1199644924
Lab
2008-01-06 21:42
2008.02.03
как программно зашифровать (EFS кодирование) каталог/файл?


15-1198512760
NaRuTo
2007-12-24 19:12
2008.02.03
Как реализовать осцилограф.


3-1190719104
oleg_v
2007-09-25 15:18
2008.02.03
DBF - как полностью удалить запись из таблицы


2-1199798648
AntonUSAnoV
2008-01-08 16:24
2008.02.03
Помогите!


11-1182271513
Vladimir Kladov
2007-06-19 20:45
2008.02.03
Секреты Delphi IDE - пополнения





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