函数声明？

Question

有VC的函数声明：
int WINAPI SubmitAExEx(
                       unsigned char OrgTON,
                       LPCTSTR OrgAddr,
                       unsigned long Default_ID,
                       unsigned char* byMsgID,
                       unsigned long* SM_ID
                       );在Delphi里我应试写成：
function SubmitAExEx(
                      怎么写？
                    )
                  : integer;  stdcall; far external 'SMEIDll.dll';

Answer 1

function SubmitAExEx(
    OrgTON: char;
    OrgAddr: PChar;//这个不知道对不
    Default_ID: LongInt;
    byMsgID: PChar;
    SM_ID: PLongInt;
                    )
                  : integer;  stdcall; far external 'SMEIDll.dll';

Answer 2

function SubmitAExEx(OrgTON:char; OrgAddr:LPCSTR; Default_ID:Longint;
    byMsgID:pchar; SM_ID:PLongint):integer; stdcall; far external 'SMEIDll.dll';

Answer 3

function SubmitAExEx(
                      orgton: byte;
                      orgaddr: pchar;{or pwidechar;如果dll是unicode版本}
                      default_id: cardinal;
                      bymsgid: pbyte;
                      sm_id: pcardinal;
                    )
                  : integer;  stdcall; far external 'SMEIDll.dll';