Вниз
Скачать: 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.011 c
1-59189
123000
2002-11-09 14:08
2002.11.18
How to do as ICQ


4-59481
Beginer1
2002-10-07 16:35
2002.11.18
FindFirstFile


1-59249
Pascal's programmer
2002-11-06 04:34
2002.11.18
DrawFocusRect


4-59515
TankMan
2002-10-07 00:52
2002.11.18
Список запущенных процессов


14-59342
Карелин Артем
2002-11-01 10:25
2002.11.18
Делаю проги




   Наверх