请广州的朋友帮忙做个小程序.急!(100分)

做一个调用C++的动态的程序,进行数据上传.
接口如下
typedef void (__stdcall *callbackModemReceive)(
long lCommId,
unsigned char *pData,
long lDataLength
);
//////////////////////////////////////////////////////////////////////////
//
long WINAPI apiModemOpen(
long lCommId,
long lBaud = 9600,
long lBit = 8,
unsigned char cCheck = 'N',
long lStopBits = 1,
unsigned char cFlowControl = 'N',
callbackModemReceive pfnModemReceive = NULL
);
long WINAPI apiModemClose(long lHandle);
long WINAPI apiModemDial(
long lHandle,
const char *szPhoneNumber
);
long WINAPI apiModemReceive(
long lHandle,
char *pDataOut,
long lBufferSize,
long lTimeout = 30000
);
long WINAPI apiModemSend(
long lHandle,
const char *pData,
long lDataLength,
long lTimeout = 30000
);
我的联系方法: 13600486106,徐

为什么要广州的做呢？我在广州^_^，先翻译一下子，你试试先！
typedef void (__stdcall *callbackModemReceive)(
long lCommId,
unsigned char *pData,
long lDataLength
);
//////////////////////////////////////////////////////////////////////////
type TcallbackModemReceive=procedure (lCommId:integer;pDataChar;lDataLength:integer);stdcall;
//////////////////////////////////////////////////////////////////////////
long WINAPI apiModemOpen(
long lCommId,
long lBaud = 9600,
long lBit = 8,
unsigned char cCheck = 'N',
long lStopBits = 1,
unsigned char cFlowControl = 'N',
callbackModemReceive pfnModemReceive = NULL
);
//////////////////////////////////////////////////////////////////////////
function apiModemOpen(lCommId:integer;const lBaud:integer=9600;
const lBit:integer=8;const cCheck:char='N';
const lStopBits:integer=1;
const cFlowControl:char='N';
const callbackModemReceive:TcallbackModemReceive=nil):integer;stdcall;
//////////////////////////////////////////////////////////////////////////
long WINAPI apiModemClose(long lHandle);
//////////////////////////////////////////////////////////////////////////
function apiModemClose(lHandle:THandle):integer:stdcall;
//////////////////////////////////////////////////////////////////////////
long WINAPI apiModemDial(
long lHandle,
const char *szPhoneNumber
);
//////////////////////////////////////////////////////////////////////////
function apiModemDial(lHandle:THandle;const szPhoneNumberchar):intger;stdcall;
//////////////////////////////////////////////////////////////////////////
long WINAPI apiModemReceive(
long lHandle,
char *pDataOut,
long lBufferSize,
long lTimeout = 30000
);
//////////////////////////////////////////////////////////////////////////
function apiModemReceive(lHandle:THandle;pDataOutchar;lBufferSize:integer;const lTimeout =30000):integer;stdcall;
//////////////////////////////////////////////////////////////////////////
long WINAPI apiModemSend(
long lHandle,
const char *pData,
long lDataLength,
long lTimeout = 30000
);
//////////////////////////////////////////////////////////////////////////
function apiModemSend(lHandle:THandle;pDataOutchar;lBufferSize:integer;const lTimeout =30000):integer;stdcall;
//////////////////////////////////////////////////////////////////////////

如果是第三方或者borland没有写入delphi的dll，你所有的函数引用都应该加上：
external 'dll的名字' name '函数名字';

TO 晶晶:
您有时间吗?
我有个小程序需要人帮忙.人民币报酬.
所以需要在广州

数据上传，我感兴趣，不过我在杭州，做好可以给你发过去呀！

我不知道怎么调用那个DLL,郁闷~~~~~!
type TcallbackModemReceive=procedure (lCommId:integer;pDataChar;lDataLength:integer);stdcall;
我在后面加上external "*.dll",但是出错.
typedef void (__stdcall *callbackModemReceive)(
long lCommId,
unsigned char *pData,
long lDataLength
);
它本身有个指针 *pData,如何处理?

我也在广州，不知道你到底要做什么？能说清楚点么

你那个程序我改好了，怎么给你啊？