如何用BCB来调用？

[ysdok]

现在有一个DELPHI开发的DLL，位置http://stgzs.myetang.com/downloads/Osd3.5.rar
里面有DELPHI调用OSD.dll函数的原代码，不知道用BCB如何调用？谢谢 电话[phone]

[c2y]

文件打不开

[Taiji02]

//定义:

int (__stdcall *InitRmOSD)()= NULL;
int (__stdcall *FreeRmOSD)()= NULL;
int (__stdcall *SetParamRmOSD)(int X,int Y, int W, int H)= NULL;
int (__stdcall *ShowRmOSD)(int SwMode)= NULL;
int (__stdcall *SetImageRmOSD)(LPCTSTR FileName,bool isStretch,int Posx,int Posy)= NULL;
int (__stdcall *SetTextRmOSD)(LPCTSTR Text,int X, int Y, int ScrollMode,LPCSTR FontName,
int FontSize, int FontColor)= NULL;
int (__stdcall *SetRegSn)(LPCTSTR RegStr)= NULL;
HINSTANCE hInst;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
//调用时如下:
hInst = LoadLibrary("OSD.DLL");
if (hInst)
{
(FARPROC)InitRmOSD=GetProcAddress(hInst,"InitRmOSD");
if (InitRmOSD)
{
if (InitRmOSD<0)
MessageBox(Handle,"初试化OSD接口失败！！！",Caption.c_str(),MB_ICONEXCLAMATION );
}
else
{
MessageBox(Handle,"引用链接库中的函数InitRmOSD失败!",Caption.c_str(),MB_ICONEXCLAMATION );
}
}}
//---------------------------------------------------------------------------

[gonglm]

关注

[ysdok]

老大 初始法没用呀 怎么不会 报MessageBox(Handle,"初试化OSD接口失败！！！",Caption.c_str(),MB_ICONEXCLAMATION );错误呀???
或MessageBox(Handle,"引用链接库中的函数InitRmOSD失败!",Caption.c_str(),MB_ICONEXCLAMATION );出错呀?????

[Taiji02]

if (InitRmOSD()<0)
MessageBox(Handle,"初试化OSD接口失败！！！",Caption.c_str(),MB_ICONEXCLAMATION );

[gonglm]

HINSTANCE hLib = ::LoadLibrary( "OSD.dll" );
if( hLib != NULL )
{
typedef BOOL (WINAPI *SOWFUNCTION)();
SOWFUNCTION InitRmOSD =
(SOWFUNCTION)GetProcAddress( hLib, "InitRmOSD" );
if( InitRmOSD != NULL )
{
Edit1->Text = diskid;
}
}
else
{
ShowMessage(" 加载功能模块出错! ");
}

else
{
ShowMessage(" 无法加载DLL! ");
}
::FreeLibrary( hLib );

[thp]

去当下来瞅瞅

[thp]

好像他那个DLL里面的函数有问题，我试了BCB，Delphi,VC的Demo都报：初试化OSD接口失败！！！会不会是那个DLL要先注册？？试试先

[thp]

不行