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

Вниз

Отловить изменение текстовых свойств компонента   Найти похожие ветки 

 
Darvin ©   (2006-04-18 18:20) [0]

Здравствуйте.
У меня есть наследник некоторого компонента, например TLabel.
Мне хотелось бы по-своему обработать присваивание значения некоторым свойствам этого компонента, например свойству Caption и свойству Hint. Но методы присвоения значения этим свойствам в предке приватные, их не перекроешь.
Как можно решить данную проблему обработки присваивания значения?


 
проходил мимо   (2006-04-18 18:43) [1]

как-то так, видимо ...

 TSuperLabel = class(TLabel)
 private
   function GetHint: string;
   procedure SetHint(const Value: string);
 published
   property Hint: string read GetHint write SetHint;
 end;

function TSuperLabel.GetHint: string;
begin
 Result := inherited hint;
end;

procedure TSuperLabel.SetHint(const Value: string);
begin
 // тут и пишешь чего надо
 inherited hint := Value;
end;


 
Darvin ©   (2006-04-18 19:16) [2]

спасибо


 
Leonid Troyanovsky ©   (2006-04-18 21:04) [3]


> Darvin ©   (18.04.06 18:20)  

> Мне хотелось бы по-своему обработать присваивание значения
> некоторым свойствам этого компонента, например свойству
> Caption и свойству Hint. Но методы присвоения значения этим
> свойствам в предке приватные, их не перекроешь.


Например, для отслеживания изменений Caption можно
снабдить оную метку обработчиком сообщения CM_TEXTCHANGED.

--
Regards, LVT.



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

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

Наверх




Память: 0.44 MB
Время: 0.016 c
1-1145257574
MegaVolt
2006-04-17 11:06
2006.05.28
Как убить поток?


2-1147195430
BAngel
2006-05-09 21:23
2006.05.28
не меняется цвет в ColorBox


15-1146326262
Adil
2006-04-29 19:57
2006.05.28
Драйвера для ВебКвмеры


1-1145424924
ZSergey
2006-04-19 09:35
2006.05.28
Как избавиться от библиотеки-паразита qtinft70.dll ...


2-1147560405
EZHIK
2006-05-14 02:46
2006.05.28
Разные действия для одной кнопки.





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