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

Свойство предка   Найти похожие ветки 

 
Бывший студент ©   (2005-04-26 14:38) [0]

Необходимо скрыть published свойство ColCount в потомке TStringGrid"а. Я знаю, что нельзя понижать видимость, но может быть есть способ заблокировать свойство. Заранее благодарен.


 
-=XP=- ©   (2005-04-26 15:10) [1]

1. Использовать в качестве предка TCustomDrawGrid
2. Переопределить свойство (?)


 
Бывший студент ©   (2005-04-26 15:15) [2]

Использование TStringGrid принципиально. Сейчас пробую переопределять.


 
Бывший студент ©   (2005-04-26 15:51) [3]

При переопределении получается заблокировать его совсем, а мне хотелось бы только в инспекторе объектов.


 
-=XP=- ©   (2005-04-26 16:21) [4]

1. if not (csDesigning in ComponentState) then - блокировать только в Design Time.

2. Объявить вторичное свойство, и пользоваться им

type
 TEditEx = class(TEdit)
 private
   function GetText: string;
   procedure SetText(AText: string);
   function GetTextEx: string;
   procedure SetTextEx(AText: string);
 published
   property Text: string read GetText write SetText;
   property TextEx: string read GetTextEx write SetTextEx;
 end;

function TEditEx.GetText: string;
begin
 Result := inherited Text;
end;

function TEditEx.GetTextEx: string;
begin
 Result := inherited Text;
end;

procedure TEditEx.SetText(AText: string);
begin
 ShowMessage("Locked");
end;

procedure TEditEx.SetTextEx(AText: string);
begin
 inherited Text := AText;
end;


Только вот зачем? Ну, хозяин - барин.


 
Юрий Зотов ©   (2005-04-26 17:13) [5]

> Бывший студент ©   (26.04.05 14:38)  

> Необходимо скрыть published свойство

Зарегистрируйте для него редактор, указав nil вместо класса редактора. Из OI оно исчезнет, но в коде останется доступным.

Только не тем путем Вы пошли. Не свойство прятать надо, а синхронизировать его с Вашей коллекцией. Обоюдная синхронизация должна быть - и с той, и с другой стороны. Иначе кустарщина получится, а не нормальный компонент.


 
Бывший студент ©   (2005-04-26 17:32) [6]

Спасибо. Это временная мера, пока нет обоюдной синхронизации.



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

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



Память: 0.46 MB
Время: 0.11 c
14-1131948554
Ega23
2005-11-14 09:09
2005.12.04
С днем рождения! 14 ноября


3-1129654773
mmms
2005-10-18 20:59
2005.12.04
Проектирование БД под репликацию


1-1131426661
BanderLog
2005-11-08 08:11
2005.12.04
ComboBox + Mask


2-1132358469
timerlan
2005-11-19 03:01
2005.12.04
simplex metod


2-1131960442
zserge
2005-11-14 12:27
2005.12.04
Как прописать относительный путь...




   Наверх