Вниз
Скачать: CL | DM;

Правка компонента   Найти похожие ветки 

← →
Сатир ©   (2002-11-06 14:40) [0]

как запретить редактирование read-only свойства Color в инспекторе объектов в таком компоненте:

TStyleColor = class(TCollectionItem)
private
fName:String;
fFormula: String;
fColor: TColor;
procedure SetName(const Value: String);
procedure SetFormula(const Value: String);
procedure SetColor(const Value: TColor);
protected
procedure SetDisplayName(const Value: string);override;
function GetDisplayName: string; override;
procedure CalculateColor;
public
constructor Create(Collection: TCollection); override;
procedure Assign(Source:TPersistent);override;
published
property Name: String read fName write SetName;
property Color: TColor read fColor;
property Formula: String read fFormula write SetFormula;
end;


← →
Skier ©   (2002-11-06 14:44) [1]

>Сатир
1) ???
2) А зачем тебе метод SetColor ?


← →
Сатир ©   (2002-11-06 15:12) [2]

>2)
какая разница, он всё равно в записи данного свойства в поток не участвует, просто зарезервирован, если надо будет редактировать

>1)
read-only properties по умолчанию не отображаются в инспекторе объектов, но если на нём кликнуть правой кнопкой, то в соответствующей закладке можно выставить галочку и на отображение последних, но в то же время, их поля становятся доступными для редактирования, и если пользователь данного компонента начитает выбирать в данном случае цвет из ниспадающего списка, получается Access violation at address 0000000. Поэтому нужно запретить редактирование последнего.


← →
Андрей Прокофьев ©   (2002-11-06 15:20) [3]

а зачам он published?


← →
Сатир ©   (2002-11-06 16:41) [4]

чтобы можно было просмотреть через инспектор объектов, какой цвет был получен в результате введённой формулы



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
1-59203
Erik
2002-11-05 18:35
2002.11.18
Работа с указателем


6-59304
VID
2002-09-22 21:32
2002.11.18
Чтиво про TServerSocket в режиме stThreadBlocking


4-59493
Alexander
2002-10-07 06:08
2002.11.18
Если у принтера настроена печать в файл, то можно ли как-то


1-59107
mukha
2002-11-07 21:13
2002.11.18
QReport в Delphi-7 - есть ли он?


7-59456
DaLiV
2002-09-19 17:03
2002.11.18
kak vibrat konechnoe ustrojstvo v rs485 ?




   Наверх