DELPHI使用上例中的DLL

delphi dll 加载 动态链接库 杂谈

                            DELPHI使用上例中的DLL

                                         作者:王鹤 QQ:583241212

DELPHI源文件:

unit Unit1;

interface
       
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);

  private
    { Private declarations }

  public
    { Public declarations }

  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}


const
DllName='Dll2.dll';


procedure TForm1.Button1Click(Sender: TObject);
type    TAdd=function({val1:integer}):integer;stdcall;
       var
      HInst:THandle;
      FPointer:TFarProc;
      MyFunc:TAdd;

begin
         HInst:=LoadLibrary(DllName);
      if HInst>0 then
      try
        FPointer:=GetProcAddress(HInst,PChar('HelloWorld'));
        if FPointer<>nil then
        begin
          MyFunc:=TAdd(FPointer);
          //Edit1.Text :=inttostr(MyFunc(6));
          Myfunc();
        end
        else
          messagebox(0,'Funtion Add not found','Warning',MB_OK);
      finally
        FreeLibrary(HInst);
      end
      else
        messagebox(0,'DllName not found','Warning',MB_OK);

end;

end.


相关推荐

  • 浅谈多媒体在高中化学教学中的实际使用 浅谈多媒体在高中化学教学中的实际使用摘要:化学是一门以实验为基础,研究物质组成、结构、性质、变化和规律的学科。为了体现现代信息技术在高中化学教学中使用的优点,我以多媒体在高中化学教学中的实际使用为例做一简单介绍:激发学生的好奇心和求知欲;强
  • AJAX在PHP中的简单使用 [AJAX介绍]Ajax是使用客户端脚本与Web服务器交换数据的Web应用开发方法。Web页面不用打断交互流程进行重新加裁,就可以动态地更新。使用Ajax,用户可以创建接近本地桌面应用的直接、高可用、更丰富、更动态的Web用户界面。异步Ja
  • AJAX在PHP中的简单使用(1) php教程 02-21 AJAX无疑是2005年炒的最热的Web开发技术之一,当然,这个功劳离不开Google。我只是一个普通开发者,使用AJAX的地方不是特别多,我就简单的把我使用的心得说一下。(本文假设用户已经具有JavaScript、HTML、CSS等基本的
  • IOS开发:Swift 中的指针使用 Apple期望在Swift中指针能够尽量减少登场几率,因此在Swift中指针被映射为了一个泛型类型,并且还比较抽象。这在一定程度上造成了在Swift中指针使用的困难,特别是对那些并不熟悉指针,也没有多少指针操作经验的开发者(包括我自己也是)
  • 学术论文中的“合理使用”与“抄袭”——从法律的视角 摘要:学术论文的研究写作过程中,需要适当的引用前人的研究成果,这是值得鼓励的。但在当前国内学术界中,出现大量关于学术论文抄袭的“剽窃门”事件。那么,如何理解“合理使用”与“抄袭”?如何对二者进行界定?笔者试图从法律的视角进行简要的介绍和探讨
  • AJAX在PHP中的简单使用 http://www.chinaz.com/program/2008/0318/24925.shtmlAJAX无疑是2005年炒的最热的Web开发技术之一,当然,这个功劳离不开Google。我只是一个普通开发者,使用AJAX的地方不是特别多
  • 工具篇 - jQuery中的工具使用 1.浏览器种类及其特性的检测$.support.*//该方法不常用$.browser.type//返回浏览器内核标志注释:type:safari/opera/msie/mozilla,都是浏览器。chrome与safari是同一内核。$.b
  • 在C++ Builder中使用Delphi文件 在C++Builder中使用Delphi文件在使用多种语言和工具编写一个应用程序时,最为困难的事情之一是创建和维护定义文件的接口。幸运的是,C++Builder把这一切都替你做好了。当在项目中加入一个.PAS文件时,C++Builder会自
  • 使用Delphi开发Office Word插件 在Office2000中提供了基于COM的插件开发框架,这使得我们可以利用Delphi来扩展Office的功能。在Delphi3,4中编写基于COM的插件,我们需要自己创建COM接口的封装类,更糟糕的是要想支持事件的话还需要使用连接点(co
  • 使用Delphi进行X86操作系统内核的开发实践 *** -----老鳃--------Delphi作为WINDOWS平台下的RAD工具,其开发的高效性吸引了众多软件公司用来开发应用层软件,除了一般RAD所具备的高效性外,Delphi的开放性(开放源代码、方便深入底层)确实让众多的开发人员爱不释手
  • windows 2003使用Delphi出错 在windows2003启动delphi时提示Can'tloadpackage:dclite70.bpl解决方法,win2003serverSP1+delphi7,在启动DELPHI时会提示Can'tloadpackage:dclite70
  • 使用Delphi整合除错环境 程式设计师绝对都曾经有过与「臭虫」奋战的经验,你是否也曾经为了一个程式的臭虫忙到深夜後来发现问题出在一个实在很蠢的地方?优异的开发环境如Delphi者当然不会忘记除错器(Debugger)这样重要的工具,然而Delphi安装完成後,循开始功

你的评论

就没有什么想说的吗?

最新博客

关于我们 免责声明 移动版

©2017传客网    琼ICP备15003173号-2    

本站部分文章来源于互联网,版权归属于原作者。
本站所有转载文章言论不代表本站观点,如是侵犯了原作者的权利请发邮件联系站长(weishubao@126.com),我们收到后立即删除。
站内所有资源仅供学习与参考,请勿用于商业用途,否则产生的一切后果将由您自己承担!

X