type
Txxx = Class
...
type
Tzzz = Class
private
Fxxx: Txxx;
....
procedure Setxxx(Value: Txxx);
published
property xxx: Txxx read Fxxx write Setxxx;
...
procedure Tzzz.Setxxx(Value: Txxx);
begin
Fxxx.Assign(Value);
...
end;
为什么方法Setxxx无执行?