Question

Delphi自定义类中的变量如何设置为只读属性

要求在类内部可以赋值，在程序其他地方只能读不可写入

应该怎么定义？

Answer 1

把自定义类封装成DLL，然后在把DLL加密。

Answer 2

不行吧，除非你用管理员的身分禁止修改注册表。

Answer 3

定义的时候 设成常量const试试

Answer 4

TMyType = class(TComponent)
private
fTitle: String;
procedure SetTitle(Value:String);
public
property Title : string read fTitle write SetTitle;
property TitleReadOnly: String read fTitle;

end;

...
procedure TMyType.SetTitle(Value:String);
begin

fTitle := Value;

end;

...