奇怪?为什么我不能使用Assign方法?
对象的复制不能使用Assign方法,这是什么原因?TObject类中并没有Assign方法,这个Assign方法是不是要自己编写的?我的程序如下:
type
x=class(TObject)
d:integer;
end;
var
obj1,obj2:x;
begin
obj1:=x.create;
obj2:=x.create;
obj1.d:=5;
obj2.d:=4;
obj2.Assign(obj1); {编译到此失败了,原因:未命名的标识符Assign.}
end;
编程小子