类的引用

Question

看来是没有办法了：（
因为你的设计思想已经严重偏离 Delphi 的数据封装思想。

Answer 1

可以象下面那样改。
不过FCA用起来有些烦，那也没办法，谁叫你放着大路不走呀。unit1
interface
uses unit2
.........
type
ClassA=class
...
public
  FCB:TClassB;
......
end;implementation
end.
 unit2
interface.........
type
ClassB=class
...
public
  FCA:TObject;
  constructor create;
......
end;
implementation
uses unit1;constructor ClassB.create;
begin
  ...
  FCA := ClassA.Create;//以后使用FCA时这样些ClassA(FCA)
end;
end.