M
mywyn
Unregistered / Unconfirmed
GUEST, unregistred user!
Itest=interface
property Bs:string read,write;
end;
上面的语句肯定是通不过的。我想实现的效果是：实现类可以定义成：
property Bs:string read FBs write FBs（用变量） 或
property Bs:string read GetFBs write SetFBs（用函数）
但是我的接口又不能定义成：
Itest=interface
function GetFBs:string;
procedure SetFBs(const value:string);
property Bs:string read GetFbs write SetFBs;
end;
这样会强迫实现类一定要用函数实现。
我不知这样接口定义该怎么写。C#中可以这样写 string Bs {get;set;}
property Bs:string read,write;
end;
上面的语句肯定是通不过的。我想实现的效果是：实现类可以定义成：
property Bs:string read FBs write FBs（用变量） 或
property Bs:string read GetFBs write SetFBs（用函数）
但是我的接口又不能定义成：
Itest=interface
function GetFBs:string;
procedure SetFBs(const value:string);
property Bs:string read GetFbs write SetFBs;
end;
这样会强迫实现类一定要用函数实现。
我不知这样接口定义该怎么写。C#中可以这样写 string Bs {get;set;}
WideChar;