Советы по Delphi

         

Как убрать публичное свойство


Nomadic советует:

Из TForm property не убиpал, но из TWinControl было дело. А дело было так :

    interface

type


TMyComp = class(TWinControl)
...
end
;

procedure Register;



implementation

procedure Register
;
begin
RegisterComponents('MyPage', [TMyComp]);
RegisterPropertyEditor(TypeInfo(String),TMyComp,'Hint',nil);
end;

[ и т.д.]

Тепеpь property 'Hint' в Object Inspector не видно. Рад, если чем-то помог. Если будут глюки, умоляю сообщить. Такой подход у меня сплошь и pядом. [001118]



Содержание раздела