c语言代码转化为delphi(50)

typedef struct tagUPDATE_STATUS{ unsigned long dwUpStatus; //升级状态#define UPDATE_STATUS_SENDING 1 //正在发送#define UPDATE_STATUS_UPDATEING 2 //正在升级#define UPDATE_STATUS_END 3 //升级已完成 const char *pCurFile; //当前升级的文件 int nCurProgress; //当前文件进度 int nTotalProgress; //总进度 int nErrorCode; //错误码#define UPDATE_ERR_OK 0 //正常#define UPDATE_ERR_OPENFILE -1 //打开文件错误#define UPDATE_ERR_FILECHECK -2 //升级文件非法#define UPDATE_ERR_READ -3 //读取数据错误#define UPDATE_ERR_SEND -4 //发送数据错误#define UPDATE_ERR_RECV -5 //接收数据错误#define UPDATE_ERR_MEM -6 //内存分配失败}UPDATE_STATUS;

//不知道这样行不行const UPDATE_STATUS_SENDING = 1; //正在发送 UPDATE_STATUS_UPDATEING = 2; //正在升级 UPDATE_STATUS_END = 3; //升级已完成 UPDATE_ERR_OK = 0; //正常 UPDATE_ERR_OPENFILE = -1; //打开文件错误 UPDATE_ERR_FILECHECK = -2; //升级文件非法 UPDATE_ERR_READ = -3; //读取数据错误 UPDATE_ERR_SEND = -4; //发送数据错误 UPDATE_ERR_RECV = -5; //接收数据错误 UPDATE_ERR_MEM = -6; //内存分配失败type tagUPDATE_STATUS = record dwUpStatus: DWORD; //升级状态 pCurFile: pChar; //当前升级的文件 nCurProgress: Integer; //当前文件进度 nTotalProgress: Integer; //总进度 nErrorCode: Integer; //错误码 end;

to japhe这样肯定不行的，结构体的参数就变啦我是这样定义的：type UPDATE_STATUS = ^tagUPDATE_STATUS; tagUPDATE_STATUS = packed record dwUpStatus: dword; //升级状态 UPDATE_STATUS_SENDING: integer=1; //正在发送 UPDATE_STATUS_UPDATEING: integer = 2; //正在升级 UPDATE_STATUS_END: integer = 3; //升级已完成 pCurFile: pchar; //当前升级的文件 nCurProgress: integer; //当前文件进度 nTotalProgress: integer; //总进度 nErrorCode: integer; //错误码 UPDATE_ERR_OK: integer = 0; //正常 UPDATE_ERR_OPENFILE: integer := -1; //打开文件错误 UPDATE_ERR_FILECHECK: integer = -2; //升级文件非法 UPDATE_ERR_READ: integer = -3; //读取数据错误 UPDATE_ERR_SEND: integer = -4; //发送数据错误 UPDATE_ERR_RECV: integer = -5; //接收数据错误 UPDATE_ERR_MEM: integer: - 6; //内存分配失败 end;好像不能赋值啊

//那么这样呢？type Up_Status = ( UPDATE_STATUS_SENDING=DWORD(1), UPDATE_STATUS_UPDATEING=DWORD(2), UPDATE_STATUS_END=DWORD(3) ); Error_Code = ( UPDATE_ERR_OK=Integer(0), UPDATE_ERR_OPENFILE=Integer(-1), UPDATE_ERR_FILECHECK=Integer(-2), UPDATE_ERR_READ=Integer(-3), UPDATE_ERR_SEND=Integer(-4), UPDATE_ERR_RECV=Integer(-5), UPDATE_ERR_MEM=Integer(-6) ); tagUPDATE_STATUS = record dwUpStatus: Up_Status; //升级状态 pCurFile: pChar; //当前升级的文件 nCurProgress: Integer; //当前文件进度 nTotalProgress: Integer; //总进度 nErrorCode: Error_Code; //错误码 end;

japhe 第一次回答正解.

lz sb，鉴定完毕。

多人接受答案了。