CB的初学者,请教DLL的编写方法.(在线等待)

[cmain83]

我是用Delphi的.由于某种原因,我必须用C++写一个DLL供Delphi调用.
本来想用VC++的,但想到CB与Delphi有许多的共同之处.所以就决定用CB.

可是从昨天开始到现在,还是没有解决.
还请各位帮个忙.
本人感激不尽......

最好有个例子.(不调用窗口:DLL中不用到窗口)

[wenyongjie]

这个问题用文字比较难回答,我转个帖给你吧,希望对你有所帮助.

怎样在C＋＋Builder中创建使用DLL
　　自从C＋＋Builder从去年浪漫情人节上市以来，吸引了大量的Delphi、VC、Vb的程序员到它的怀抱,大量的C、C＋＋程序员感叹道：总算有了C的可视化开发工具，对我也是一样，从BC、Delphi到C＋＋Builder。
　　动态链接库(DLL)是Windows编程常遇到的编程方法，下面我就介绍一下在BCB (C＋＋Builder下简称BCB) 中如何创建使用DLL和一些技巧。
　　一、创建:
　　使用BCB File|NEW建立一个新的DLL工程，并保存好文件BCB，生成一个DLL的程序框架。
　　1．DllEntryPoint函数为一个入口方法，如果使用者在DLL被系统初始化或者注销时被调用，用来写入对DLL的初始化程序和卸载程序；参数：hinst用来指示DLL的基地址；reason用来指示DLL的调用方式，用于区别多线程单线程对DLL的调用、创建、卸载DLL；
　　2．在程序中加入自己所要创建的DLL过程、函数；
　　3．用dllimport描述出口；
　　例程序如下：
　　＃include
　　＃pragma hdrstop
　　extern “C” __declspec(dllexport) int test();
　　int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void＊)
　　{
　　 return 1;
　　}
　　int test()
　　{
　　 return 3;
　　}
　　注意：动态链接库中调用过程、函数时有不同的CALL方式 __cdecl、 __pascal, __fastcall、__stdcall，BCB中默认的方式为__cdecl(可不写)，如果考虑兼容性可用时__stdcall声明方法为：
　　extern “C” __declspec(dllexport) int __stdcall test();
　　对于其中过程、函数也改为：
　　int __stdcall test()
　　二、使用DLL
　　在BCB中使用DLL有两种方法：
　　1．用静态调用法
　　首先需要在BCB的项目中加入输入接口库(import library)，打开工程项目，使用BCB View|Project Manager打开项目列表，向项目中加入接口库(＊.lib)。
　　其次在头文件中加入接口声明。
　　例程序如下：
　　 //define in include file
　　extern “C” __declspec(dllimport) int __cdecl test();
　　//use function in main program
　　int I；
　　I=test();
　　注意：
　　(1)动态链接库调用过程、函数时CALL方式 与创建时方式一样不写为__cdecl，其它需要声明。
　　(2)BCB创建的DLL有对应的输入接口库(import library)，如只有DLL而无库时，可用BCB的implib工具产生：implib xxx.lib xxx.dll；另外可用：tlib xxx.lib,xxx.lst 产生DLL的内部函数列表，许多Windows的未公开技术就是用这种方法发现的。
　　2．动态调用法
　　动态调用法要用Windows API 中的LoadLibrary()和GetProcAddress()来调入DLL库，指出库中函数位置，这种方法较常见。
　　例程序如下：
　　 HINSTANCE dd;
　　 int _stdcall (＊ddd)(void);
　　 dd=LoadLibrary(“xxx.dll”);
　　 ddd=GetProcAddress(dd,“test”);
　　 Caption=IntToStr(ddd());
　　FreeLibrary(dd);
　　三、注意：
　　创建DLL时编译链接时注意设置Project Options。
　　Packages标签：去除Builder with runtime packages检查框。
　　Linker标签：去除Use dynamic RTL检查框。
　　否则创建的DLL需要Runtime packages or Runtime library。

[cmain83]

编译时
extern “C” __declspec(dllexport) int test();
行出错.

[HUANG_JH]

“C”
extern "C" __declspec(dllexport) int test();

[cmain83]

还是出错

[cmain83]

错误信息
E2040 Declaration terminated incorrectly

[HUANG_JH]

给个例子
//---------------------------------------------------------------------------

#include <vcl.h>
#include <windows.h>
#include "SysSettingUnit1.h"

#pragma hdrstop

//---------------------------------------------------------------------------

//---------------------------------------------------------------------------

#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
{
return 1;
}
//---------------------------------------------------------------------------

//此处为显示dll中的Form
//如果没有Form，可以改为自己的函数
extern "C"__declspec(dllexport)void __stdcall ShowSysSettingForm()
{
SysSettingForm=new TSysSettingForm(Application);
SysSettingForm->ShowModal();
delete SysSettingForm;
}

[HUANG_JH]

typedef void __stdcall TShowSysSettingForm();
if (SysSettinghandle==NULL)
{
SysSettinghandle=LoadLibrary("ProdSetting.dll");
if (SysSettinghandle==NULL)
{
Application->MessageBox("不能加载 ProdSetting.dll！请重新软件！如果仍然出现该错误，请联系开发人员！","错误",MB_OK + MB_ICONWARNING);
return ;
}
}
TShowSysSettingForm *SysSettingForm1=(TShowSysSettingForm *)GetProcAddress(SysSettinghandle, "ShowSysSettingForm");
if (SysSettingForm1!=NULL)
{
SysSettingForm1();
}
else
Application->MessageBox("不能加载 ShowSysSettingForm 函数！","错误",MB_OK + MB_ICONWARNING);

[evence]

cb直接可以做个dll的。

[HUANG_JH]

一是创建dll
二是调用

[wenyongjie]

不好意思,没经测试就将贴子发上,现自做一个DLL函数
extern "C" __declspec(dllexport) void _stdcall Delay(DWORD DT); //声明
void _stdcall Delay(DWORD DT) //一个延迟函数
{ long tt;tt=GetTickCount();
while(GetTickCount()-tt<DT)
{Application->ProcessMessages();
if((GetTickCount()-tt)<=0)
tt=GetTickCount();
}
}
//-----------------------------------------------
静态调用
extern "C" __declspec(dllexport) void _stdcall Delay(DWORD DT); //声明
void __fastcall TForm1::Button1Click(TObject *Sender)
{ Delay(1000); 延迟1秒
}
//---------------------------------------------------------------------------
View->Project Manager在 Files内鼠标右键->ADD, 添加.LIB文件(编译DLL时自动产生)
动态调用:(略)同HUANG_JH(偶尔灌水，在体验广州的深度与湿度的民工)兄

[wer1024]

[Linker Error] Unresolved external 'disp' referenced from D:\OTHER_DEV\BLUENET.OBJ

这怎么回事