Undeclared identifier: 'TBytes'解决思路

2013-10-21

Undeclared identifier: 'TBytes⟞lphi7 编译时，出现这个问题：Undeclared identifier: TBytes

Undeclared identifier: 'TBytes'
delphi7 编译时，出现这个问题：Undeclared identifier: 'TBytes'，该如何解决、
[解决办法]

引用:

unit uUIBaseFun;

interface

uses
  Windows, SysUtils, StrUtils, DateUtils, Controls, Forms, uComPram, udmCommon,
  EZDSLHsh, GridsEh, DBGridEh, DBClient, IdGlobal, StdCtrls;

function UILogin: Boolean;
function EnCryptSFile(EnPack: TBytes): string;//这里就错了

Delphi7中没有，你可以修改成下面这样：

unit uUIBaseFun;

interface

uses
  Windows, SysUtils, StrUtils, DateUtils, Controls, Forms, uComPram, udmCommon,
  EZDSLHsh, GridsEh, DBGridEh, DBClient, IdGlobal, StdCtrls;

type
  TBytes = array of Byte;

function UILogin: Boolean;

function UISelectSvr: Boolean;

procedure UIAbort;

procedure UICloseAbout;

function InitSocketConnection: Boolean;

procedure InitDBGridColumeTitle(Grid: TDBGRIDEH; TableName: string);

procedure InitDBGridColumeTitle_BJDB(Grid: TDBGRIDEH; TableName: string);

function EnCryptSFile(EnPack: TBytes): string;//这里就错了