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

Sorry   Найти похожие ветки 

← →
RASkov   (2006-10-01 17:31) [0]

Как правильно добавить свойство readonly для компанента
published
property Count: Integer read GetCount;
так, что бы в инспекторе его было видно но изменять нельзя readonly
делаю пока так

published
property Count: Integer read GetCount write SetCount;
....
function GetCount: integer;
begin
 Result:=list.Count;
end;

procedure SetCount (Value: Integer);
begin
 FCount:=list.Count;
end;


правильно это?


← →
Zeqfreed ©   (2006-10-01 17:35) [1]

Какой смысл отображать read-only св-во в инспекторе? Настоящие read-only св-ва нельзя ставить в левой части операции присваиивания, твое же, «фейковое», вполне можно, что есть нехорошо.


> FCount:=list.Count;

Это лишнее. Но повторюсь: я бы так не делал.


← →
Percent   (2006-10-01 17:45) [2]

Правой кнопкой мыши на Object Inspector"е - Properties - [V] Show read only properties


← →
Zeqfreed ©   (2006-10-01 17:49) [3]

> [2] Percent   (01.10.06 17:45)

Никогда об этом даже не задумывался :) В Turbo Delphi по умолчанию read-only св-ва оказывается показываются.


← →
RASkov   (2006-10-01 18:24) [4]

Просто "информативное" поле хочется добавить, которое отброжает кол-во элементов поля TCollection :)
> [1] Zeqfreed ©   (01.10.06 17:35)

Это я так понимаю про SetCount?
Помоему ответ правильный [2]. ИМХО.
И объявление:
published
property Count: Integer read;
....
function GetCount: integer;
begin
Result:=list.Count;
end;


← →
Zeqfreed ©   (2006-10-01 18:36) [5]

> [4] RASkov   (01.10.06 18:24)


> Помоему ответ правильный [2]. ИМХО.

Разумеется.


← →
Desdechado ©   (2006-10-01 19:24) [6]

> property Count: Integer read GetCount write SetCount;
если оно только для чтения, то выделенное нафиг не нужно


← →
RASkov   (2006-10-01 19:39) [7]

> [6] Desdechado ©   (01.10.06 19:24)

Читаем вопрос и смотрим [2] ;)


← →
RASkov   (2006-10-01 19:40) [8]

> [7] RASkov   (01.10.06 19:39)

Т.е. см [4] :)


← →
Desdechado ©   (2006-10-01 19:57) [9]

сам себе отвечаешь? молодец.
только этоможно делать перед зеркалом, не засоряя форум


← →
RASkov   (2006-10-01 20:50) [10]

вообще то я не себе ответил:) Внимательно читаем ветку... Ладно проехали...



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

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



Память: 0.47 MB
Время: 0.029 c
11-1135322419
Lari
2005-12-23 10:20
2006.10.15
Преобразование PJpeg -> TBitMap?


1-1157349763
lightix
2006-09-04 10:02
2006.10.15
Выводить сообщения из приложения поверх всех окон


1-1157712245
TakTak
2006-09-08 14:44
2006.10.15
поместить в автозагрузку программу.


15-1159206509
KingLion
2006-09-25 21:48
2006.10.15
MS FrameWork 1.1 SDK


2-1159263649
Olga_85
2006-09-26 13:40
2006.10.15
преобразование данных




   Наверх