做项目的时候,发现这个Frame很好用,为了省空间.调用和修改方便,就将Frame封装到dll(动态链接库)里面,确实很好使. 效果图如下: 上图是临时测试用的,忘了将Frame的align设置成alClient,不过刚好可以看出来白色区域是从dll里加载的Frame,还调用了Frame的按钮单击事件. 下面是大概的建立流程: 1.File -> New -> Other -> Delphi Projects -> 新建一个Dll文件 2.然后继续 File -> New -

Delphi ActiveX Form的使用实例 By knityster 1. ActiveX控件简介 ActiveX控件也就是一般所说的OCX控件,它是ActiveX技术的一部分. ActiveX控件可以被集成到很多支持ActiveX的应用当中去,或者直接用来扩展应用的功能,这些支持ActiveX的应用包括C++ Builder.Delphi.Visual dBASE. Visual Basic.Visual C++.Internet Explorer.Netscape Navigator等

在Delphi中静态调用DLL top 调用一个DLL比写一个DLL要容易一些.首先给大家介绍的是静态调用方法,稍后将介绍动态调用方法,并就两种方法做一个比较.同样的,我们先举一个静态调用的例子. unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Edit1: TEdit;

Delphi调用C# 编写dll动态库 编写C#dll的方法都一样,首先在vs2005中创建一个“类库”项目WZPayDll, using System.Runtime.InteropServices; namespace WZPayDll { public interface IWZPay { void Pay(stirng url,string payType); } [ClassInterface(ClassInterfaceType.None)] public class WZPay:I

http://blog.sina.com.cn/s/blog_4dbbf76f01000anz.html delphi编写DLL 下面在delphi中编写一个简单的dll,在该dll中只有一个max函数,返回2个数中的大数(Delphi 5.0) .New->DLL;取名为DLL_,编写代码: ; uses SysUtils, Classes; {$R *.RES} function max(x,y:integer):integer;stdcall; begin if(x>y) then ma

引入文件 DLL比较复杂时,可以为它的声明专门创建一个引入单元,这会使该DLL变得更加容易维护和查看.引入单元的格式如下: unit MyDllImport; {Import unit for MyDll.dll } interface procedure MyDllProc; … implementation procedure MyDllProc;external 'MyDll' index 1; … end. 这样以后想要使用MyDll中的例程时,只要简单的在程序模块中的uses子句中加上

下面以Delphi调用触摸屏动态库xtkutility.dll为例子,说明如何静态加载DLL和动态加载DLL. 直接上代码. 1.静态加载示例 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) btnEnableTouch: TButton; btnDi

动态链接库是一个能够被应用程序和其它的DLL调用的过程和函数的集合体,它里面包含的是公共代码或资源.由于DLL代码使用了内存共享技术,在某些地方windows也给了DLL一些更高的权限,因而DLL中可以实现一些一般程序所不能实现的功能,如实现windows的HOOK.ISAPI等.同时,DLL还为不同语言间代码共享提供了一条方便的途径.因而DLL在编程时应用较为广泛,本文将介绍如何在 Delphi 中建立和使用DLL. 一.DLL 库内存共享机制 从使用效果看,DLL和unit 很像,它们都可以

所谓的子类化,网上有很多说明,我就说我个人的随意理解,可能有误,请列位看官斟酌理解. 所谓子类化,个人理解就是拦截某个控件的消息以及样式,来进行自己的特定处理以达到特殊的功能需求.这个子类化,可以有子类化别人的程序的控件,也有子类化自己程序的控件. 子类化别人的,就需要注入到别人的程序内部,然后做对应处理拦截,我这里主要针对的是自己程序的处理. 这个就比较简单了,有API函数SetWindowLong,用这个函数,就可以拦截某WinControl的Wndproc窗口过程了. 在Delphi中,所

通过Form的Position属性可设置窗体的初始位置,如选择DesktopCenter为桌面中心,ScreenCenter为屏幕中心,等等. 这个属性在很多时候简化了程序代码. 但是,如果设置了position为ScreenCenter和DesktopCenter等,在窗体oncreate和onshow事件中使用代码控制窗体的位置就会不成功了,无论设置Self.Top,Self.Left为什么值,最后窗体都会自动根据Position自动调整位置. 我使用下面方法去在设置了position之后在

公司有个很古老的系统,代码量很大,并且稳定线上运行10几年,这系统是公司的核心,公司收入基本靠它,系统几乎都是Delphi 7写的,要重写是不可能的.因为Delphi 7编译出来的DLL默认的导出符号就是二进制稳定的C符号. 所以,理论上任何语言都可以调用该DLL导出的API. 值得注意的是,在调用导出API的时候任何语言都是利用LoadLlibrary,GetProcAddress的原理来进行调用的.如果用C++来调用,最好这个干. 调用该API的输入输出参数最好要是平坦内存结构,比如C语言类

Delphi使用模块化开发,可以采用DLL或者BPL,两者的区别是BPL只能被同版本的Delphi使用,DLL可以被不同版本和不同开发工具的开发的软件调用. 因此我们的软件大多使用Delphi作为界面以及部分DLL模块的开发工具. DLL模块之间通过接口方式调用. 1.对象创建采用工厂模式,每个DLL负责某个对象或若干个对象的创建及释放,例如: DLL工程为http客户端(prjHttp.DLL)模块,通过DLL导出的GetHttpClientFactory获取http客户端工厂接口,通过接口创

比较常用的是重载Form的DefWndProc方法,例如截取鼠标按下的消息: protected override void DefWndProc(ref Message m) { if ( m.Msg == 0x0201 ) { MessageBox.Show(m.Msg.ToString()); } else { base.DefWndProc (ref m); } } 还可以通过另一种办法,使用IMessageFilter 接口: public class MessageFilter :

Delphi实现对鼠标上下滚动基础消息的截获并处理 前几天有客户提出需求:由于个人PC界面限制,有时候电子图档显示不全,希望通过鼠标上下滚动用来控制电子图档的放大和缩小. 下面通过一个测试Demo来说明一下. 新建一个WinFrm应用程序,添加一个RzMemo.ApplicationEvents控件,如下所示. 添加ApplicationEvents控件的OnMessage事件,关键代码如下: procedure TForm1.ApplicationEvents1Message(var Msg:

用PAServer调试的话会产生一个默认user-connectionname的文件夹,且这个文件夹不能自定义.因此无法使调试的dll文件生成到host主程序所在的文件夹下而导致无法调试. 变通方法: 在环境变量中增加user-connectionname的文件夹所在的路径.经测试可行.

//h:窗体中控件的句柄(用在某个控件上提示消息)(要调用的控件句柄) //text:要提示的文本 //cap:提示框上的标题 //IconType:提示框上显示的图标(共三个值.1.2.3分别为提示.警告.错误s) //t:消息停留的时间(以毫秒计算) //left: 消息框偏离控件的左距离,设为0则表示没有 //top: 消息框偏离控件的顶距离,设为0则表示没有 ;t:integer=;left:Integer=;top:Integer=); var r : TRect; //是一个记录(R

log4cpp.dll LogHelper.dll TcxGridSite TcxSpreadSheetBook TcxSpreadSheetBook TcxTreeList TcxButtonEdit TVirtualStringTree

官方已经发布消息,招内测人员了! https://www.barnsten.com/default/newsupdates/details?news_id=328 https://docs.google.com/forms/d/e/1FAIpQLSdap6VZ1nP8vk_npnRetCs-V3VbuCRewV7BL7ybvJF8aLTu7A/viewform QC上也有官方消息,即将发布10.3.2! 最近几天,官方开始清理bug: 今天,有人收到内测邮件了: 2019-5-24:官方发布了最

if not Assigned(frmAppServer) then frmAppServer := TfrmAppServer.Create(Application); frmAppServer.ShowModal;

https://community.embarcadero.com/blogs?view=entry&id=9074 unit TabBadgeFrm; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.TabControl,