关于语法的问题(50分)

  • 主题发起人 主题发起人 zbdbx
  • 开始时间 开始时间
Z

zbdbx

Unregistered / Unconfirmed
GUEST, unregistred user!
type
///提供对有关驱动器的信息的访问。
TDriverInfo = class(TObject)
private
{ Private declarations }
public
{ Public declarations }
function GetDrives: TDriverArray;
end;
///TDriverInfo数组
TDriverArray = array of TDriverInfo;

这样GetDrives找不到TDriverArray
///////////////////////////////////////////////
type
///TDriverInfo数组
TDriverArray = array of TDriverInfo;
///提供对有关驱动器的信息的访问。
TDriverInfo = class(TObject)
private
{ Private declarations }
public
{ Public declarations }
function GetDrives: TDriverArray;
end;


这样TDriverArray 找不到TDriverInfo
///////////////////////////////////////////////


请问应该怎么办?
 
type
TDriverInfo = class;
///TDriverInfo数组
TDriverArray = array of TDriverInfo;
///提供对有关驱动器的信息的访问。
TDriverInfo = class(TObject)
private
{ Private declarations }
public
{ Public declarations }
function GetDrives: TDriverArray;
end;
 
非常感谢!

不过好像编译不过吧!

[Error] unitDriverInfo.pas(10): Type 'TDriverInfo' is not yet completely defined
 
好了,能行,给分
 
后退
顶部