如何隐藏父类的属性

[whitehare]

我从TWinControl继承[这样做是为了能转换成ActiveX控件]，但我想把一些可视的属性隐藏和事件起来，并且能在内部指定这些属性的值。

[whitehare]

来人那

• 打赏
• 举报

回复 赞

[whitehare]

citytramper(阿琪) 的方法行得通，
whitetiger8(蜗牛[我要一步一步往上爬]) 的不行；
qxj(小小小小小小程序员&郁闷中) 不知道你想说明什么。

• 打赏
• 举报

回复 赞

[whitetiger8]

继承组件呗。可以把你不想让别人看到的，设为PROVATE，局部变量就行啦。

• 打赏
• 举报

回复 赞

[FrameSniper]

继续关注....

• 打赏
• 举报

回复 赞

[whitehare]

难道 citytramper(阿琪) 的是最佳答案吗？

• 打赏
• 举报

回复 赞

[FrameSniper]

QXJ的意思就是说，如果一个类A派生于另外一个类B，那么类B不可能降低从类A继承来的属性的可见性，例如，如果类B中有一个Public的属性C，那么当类A从类B派生而继承这个属性C的时候，那么C的可见性只可能是Public，因为属性C的可见性是最高的Public，而不能降低到Private或Protected....楼主，你明白了吗？

蜗牛的说法简直不着边，呵呵....得罪了....

阿琪的方法俺有点不明白，阿琪，能给俺说说为什么这样可以隐藏掉父类的属性吗....？

• 打赏
• 举报

回复 赞

[citytramper]

你看这样可不可以
TMedit = class(TCustomEdit)
private
function GetText: string;
procedure SetText(const Value: string);
published
property Text:string read GetText;
end;

内部改用setText

• 打赏
• 举报

回复 赞

[citytramper]

function TMedit.GetText: string;
begin
result:=inherited Text;
end;

procedure TMedit.SetText(const Value: string);
begin
inherited text:=Value;
end;

• 打赏
• 举报

回复 赞

[qxj]

子类的属性不能降低父类的该属性的可见性的,以前看到过这样一句话
"秘密一旦公开了,就是不是秘密了

-------------------------------------------------
在错的时间遇见错的人　是一种伤痛　
在错的时间遇见对的人　是一种遗憾　
在对的时间遇见错的人　是一种心伤　
只有在对的时间遇见对的人才是一种幸福

• 打赏
• 举报

回复 赞

[立志做一个佳娃~]

同意： qxj(小小小小小小程序员&郁闷中)

秘密一旦公开就不是秘密。

不能降低可见性的等级

• 打赏
• 举报

回复 赞

[microjuz]

keke
我是路过的人..

• 打赏
• 举报

回复 赞

[BobLeeCn]

支持qxj(小小小小小小程序员&郁闷中)的说法。

• 打赏
• 举报

回复 赞

[whitehare]

继续

• 打赏
• 举报

回复 赞

[whitehare]

“秘密一旦公开就不是秘密。”呵呵，什么意思。
那时理论上，但我门确实有办法把父类的属性隐含起来，就象阿琪的做法，但在应用当中，我发现这样做不太安全，因为有些这样做把属性改变了。这些属性已经不具备写入能力。所以如果是设计期要用到的，还是不能这么做。例如top,left,width,height等。

• 打赏
• 举报

回复 赞

[李_军]

同意： qxj(小小小小小小程序员&郁闷中)

秘密一旦公开就不是秘密。

不能降低可见性的等级

• 打赏
• 举报

回复 赞

[whitehare]

怎么没人再发表高见了

• 打赏
• 举报

回复 赞

[FrameSniper]

各位，先别这么快下定论吗？

阿琪的方法是什么意思，哪位跟俺说说！！！！！！！！

• 打赏
• 举报

回复 赞

[whitehare]

火了，什么是秘密啊。理论上的东西大家都知道阿，哪有什么秘密，说得那么神秘，什么“秘密一旦公开就不是秘密”。
阿琪的方法却是可行的，
从下面开始，唱反调，不提供方法的一律不给分

• 打赏
• 举报

回复 赞

[whitehare]

秘密一旦公开，就像丑闻一旦公开，但我们还是可以有办法把他弯曲了

• 打赏
• 举报

回复 赞