delphi实现调用dll中的窗体 代码
新建一个dLL工程,新建一个窗体 Fr_bb80 ,我们先在它的单元里加入下面一个函数:
function Report(Title:Pchar):Boolean ;stdcall;
begin
if Fr_bb80=nil then
begin
Fr_bb80:=TFr_bb80.Create(application);
Fr_bb80.Caption:= Title;
try
Fr_bb80.ShowModal;
Result:=true;
finally
Fr_bb80.Free;
end;
end;
Result:=false;
end;
再在此dll工程文件(*dpr)文件中加入
exports Report; //加入这个之后,外面就可以调用这个函数了.
新建一个工程,在新窗体中加一个按钮,下面就是这个按钮的完全代码:
type
TLoadDLL2 = function(Title:Pchar):Boolean; stdcall; //这个是必须的,好像叫回调函数??,它的定义与dll中公开的函数要完全一致
var
FLoad: TLoadDLL2; //将TLoadDLL2 实例化
l:THandle;
begin
l:=LoadLibrary('CW.dll'); //动态调用刚才那个dll文件
// 给FLoad函数赋值,将指针指向 GetProcAddress(l, 'Report') ;"Report" 是这个dll公开的函数名
FLoad := TLoadDLL2(GetProcAddress(l, 'Report'));
if Assigned(FLoad) then //判断是否找到这个公开的函数
FLoad('自定义窗口的标题'); //执行函数,注意函数的参数到这时候才开始赋值
FreeLibrary(l); //释放资源
以上代码在delphi7.0通过!
相关文档：
目前开发棋牌类游戏的公司和个人很多。但是对于很多开发者来说，开发一款具有可扩展、稳定的棋牌类游戏还是具有一定的难度。这次我就以我开发棋牌类游戏为例，讲述如何使用DELPHI来开发棋牌类游戏。希望我的经验可以对游戏开发爱好者起到抛砖引玉的作用。如果您对我基础篇中涉及到的内容非常熟悉，可以直接跳过进入设计篇。 ......
Delphi7 调用 C#的Webservice 不能传入参数
解决办法：
在Delphi导入WSDL后生成的单元的最后一行，即initialization里的初始化端口的代码中加入代码
InvRegistry.RegisterInvokeOptions(TypeInfo(接口名), ioDocument);
即可
......
第一种方法,使用SelectDirectory 函数 ,在ShellApi中
procedure TForm2.BtSelectPathClick(Sender: TObject);
var
strCaption,strDirectory:String;
wstrRoot:WideString;
begin
strCaption:='这是浏览文件夹的说明文字，可以根据需要� ......
本文转载:http://rabbitfox.blog.sohu.com/29948084.html
http://delphi.about.com/od/fileio/a/fileof_delphi.htm
首先向作者表示感谢！
《利用Delphi的“File Of
Type”创建并管理属于你自己的“数据库”》
原作者� ......
本书融合了在Windows下利用Delphi 7.0开发应用程序的理论和实践，全面而深入地介绍了利用Delphi 7.0开发应用程序的常用方法和技巧。内容包括用户界面设计、图形图像编程、文件管理、多媒体技术、系统控制、网络和数据库编程以及游戏制作等内容。 详细阅读突破Delphi 7.0编程实例五十讲，来自IT电子图书馆 ......
