-
TStas © (12.01.07 22:07) [0]Ведь нужно получить цвет родителя и перерисовать компонент. Но Parent: TWinControl и не имеет Color. И чего делать?
Пробовал If Parent is TcustomControl then ... Но почему-то цвет кисти канвы TcustomControl тоже получить не удается. -
Юрий Зотов © (13.01.07 16:28) [1]type
TFriendControl = class(TWinControl);
После чего цвет родителя становится доступен:
TFriendControl(Parent).Color -
TStas © (13.01.07 20:08) [2]>Юрий Зотов Благодарствую, добрый человек.
А интересно, почему так? Я о таком классе даже не знал ничего. И у Фаронова в "Компонентах..." ничего про него нет. -
Юрий Зотов © (14.01.07 00:28) [3]Это generic-класс
:o) -
jack128 © (14.01.07 03:26) [4]TStas © (13.01.07 20:08) [2]
И у Фаронова в "Компонентах..." ничего про него нет.
наверно потому что этот класс Юра написал несколько часов назад, так что Фаронов о нем и не знал ;-)
А вот я использую гараздо более продвинутый класс для сабжевых целей:type
TWinControlCrack = class(TWinControl)
end;
:-D -
Юрий Зотов © (14.01.07 03:32) [5]> jack128 © (14.01.07 03:26) [4]
3 лишних буквы.
Розыча на тебя нет...
:o) -
TStas © (14.01.07 18:43) [6]Вот вы к словам цепляетесь. :) Я хотел сказать не "Класс" а прием.
-
Юрий Зотов © (14.01.07 22:41) [7]> TStas © (14.01.07 18:43) [6]
ОК, пусть будет generic-прием.
:o)
Стас, ну такие вещи надо знать и без Фаронова... -
DimaBr (15.01.07 08:46) [8]
> Юрий Зотов © (14.01.07 03:32) [5]
> 3 лишних буквы.
Гораздо больше, можно имя класса сократить да и END выкинуть + перевод строки :))).