DeliverResp=record
sMsgID:Array[0..21] of char;
nMsgLevel:Integer;
sServiceID:Array[0..10] of char;
nMsgFormat:Integer;
sSrcTermID:Array[0..21] of char;
nIsReply:Integer;
nMsgLen:Integer;
sMsgContent:Array[0..160] of char;
sDestTermID:Array[0..21] of char;
cTpPid:Char;
cTpUdh:Char;
end;DLPHI的定义
typedef struct
{
char sMsgID[21+1];
int nMsgLevel;
char sServiceID[10+1];
int nMsgFormat;
char sSrcTermID[21+1];
int nIsReply; /* 0/1 */
int nMsgLen;
char sMsgContent[MAX_SM_LEN+1];
char sDestTermID[21+1];
char cTpPid;
char cTpUdhi;
} DeliverResp;C中的定义;
#ifdef _C_COMPILER_
extern "C"
{
#endif
int CMPPDeliver(const int nTimeout, DeliverResp *pDeliverResp);
#ifdef _C_COMPILER_
}
#endif C的头文件
function CMPPDeliver(nTimeout:Integer;rDeliverResp:PDeliverResp):Integer;cdecl;
DELPHI的声明?可有不妥??
声明应该没问题,如果你同时声明了PDeliverResp = DeliverResp;的话。