Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.27;
Скачать: CL | DM;

Вниз

Как в ObjectInspector е отобразить свойство?   Найти похожие ветки 

 
Visit   (2003-02-18 13:52) [0]

В рассылке новостей Выпуск от 11.12.02 09:04 был анонсирован компонент TFreeButton ( http://www.delphipages.com/edit/count.cfm?ID=3456) - кнопка, наследник TgraphicControl. Но в ObjectInspector"е у этого компонента отсутствует свойство ShowHint, хотя вообще оно наследуется. Приходится все время писать его вручную. Попытка переписать и откомпилировать FreeButton.pas не удалась - ума не хватило. Может кто подскажет как сделать, чтобы это свойство отображалось в ObjectInspector"е ?


 
BOA_KAA ©   (2003-02-18 13:54) [1]

Переписать его в published


 
Visit   (2003-02-18 13:58) [2]

А нельзя подробнее, с примером, один раз, чтобы понять подход к данному вопросу. Извините, я дельфин начинающий...:-((


 
BOA_KAA ©   (2003-02-18 14:02) [3]

Посмотри в исходнике, в каком разделе находится property ShowHint. И перенеси все, что с ним связано (read... write..., если есть) в секцию published

Кроме того, на этом сайте есть статья "пособие по созданию компонент" или что-то в этом роде, найди, почитай


 
Visit   (2003-02-18 14:18) [4]

Спасибо за помощь. Уже все работает. Пришлось после исправления модуля заново переинсталлировать компонент. После этого свойство появилось. Статью обязательно прочитаю. Еще раз спасибо.


 
AME   (2003-02-18 14:19) [5]

В компоненте ищи private переменную,и довавь
---------------------------------------------
published
{ Published declarations }
property ShowHint:Boolean read FShowHint write FShowHint;
---------------------------------------------
где FShowHint переменная отвечающая за показ хинта.


 
Юрий Зотов ©   (2003-02-19 00:13) [6]

> AME (18.02.03 14:19)

Это зачем же такие навороты? Свойство-то уже есть, его надо просто опубликовать, и все дела. Да и нет в ЭТОМ компоненте никакой приватной переменной под ЭТО свойство. Оно же наследуемое.

published
property ShowHint;

И все, больше ничего не надо.



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

Текущий архив: 2003.02.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.019 c
4-87759
Pirat
2003-01-12 02:35
2003.02.27
как выполнить SetParent?


1-87412
anonymos
2003-02-17 22:20
2003.02.27
ТХТ


3-87314
denis24
2003-02-10 10:08
2003.02.27
select *.. into table


1-87465
Владимир
2003-02-18 19:49
2003.02.27
DBGrid


1-87550
orion_st
2003-02-17 11:51
2003.02.27
Добавление объектов в TStringList