关于delphi 中 Sender的学习

sender是事件的触发者,我发现所有的组件的事件基本上都是传Sender. 示例效果图: 代码: 接着来,既然TButton是个类,且publish哪里有事件,我们也可以看看这个事件的原型.…

Sender是一个TObject类型的参数,它告诉Delphi哪个控件接收这个事件并调用相应的处理过程.你可以编写一个单一的事件处理句柄,通过Sender参数和IF…THEN…语句或者CASE语句配合,来处理多个构件.发生事件的构件或控件的值已经赋给了Sender参数,该参数的用途之一就在于:可以使用保留字IS来测试Sender,以便找到调用这个事件处理句柄的构件或控件的类型.例如,将表单中编辑框和标签的Click事件的处理句柄都指向表单的xxx过程,编辑框和标签对Click事件有不同的反应:…

关于 Delphi 中的Sender和易混淆的概念（转）

/////////////////////////////////////////////////////// Delphi 中Sender对象的定义/////////////////////////////////////////////////////1.Sender的定义: 每一个事件处理里面至少都有一个Sender参数.比如: procedure TForm1.Button1Click(Sender:TObject); begin ... end; Sender的含义就是代表调用TFor…

Delphi中的Sender：TObject对象解析

Delphi中的Sender:TObject对象解析 procedure TForm1.Button1Click(Sender: TObject); begin end; 解析:Procedure是过程,TForm是窗体类,加上数字就是某个窗体,像TForm1就是Form1窗体. Button1是你的按钮控件的名称,Button1Click就是按钮的单击事件,(Sender:Tobject)就是发送消息到对象,这里默认为本窗体. Sender的类型是Tobject,是Tobject的派生类. D…

Delphi中的Sender：TObject对象解析转载

https://blog.csdn.net/jl_tiny/article/details/24376661 Delphi中的Sender:TObject对象解析 procedure TForm1.Button1Click(Sender: TObject); begin end; 解析:Procedure是过程,TForm是窗体类,加上数字就是某个窗体,像TForm1就是Form1窗体. Button1是你的按钮控件的名称,Button1Click就是按钮的单击事件,(Sender:Tobjec…

Delphi中，indy控件实现收发邮件的几点学习记录( 可以考虑加入多线程，用多个邮箱做一个邮箱群发器) 转

关于用Delphi中的Indy控件实现收发邮件的几点学习记录这几天心里颇不宁静,不是因为项目延期,而是因为自己几个月前做的邮件发送程序至今无任何进展,虽然一向谦虚的人在网上发贴总以“小弟”自称.也发过N多关于此类问题的贴子,但总是收益甚少,但也十分感谢参与贴子的各位同仁.必竟,用Indy控件实现收发邮件的例子太少了,于是小弟决定写一篇关于Indy收发邮件的文章,供大家参考.由于本人才疏学浅,故难免有不少谬误,还请各位见谅. 在做例子之前,应明白整个发送和接收邮件流程:…

DELPHI语法基础学习笔记-Windows 句柄、回调函数、函数重载等（Delphi中很少需要直接使用句柄，因为句柄藏在窗体、位图及其他Delphi 对象的内部）

函数重载重载的思想很简单:编译器允许你用同一名字定义多个函数或过程,只要它们所带的参数不同.实际上,编译器是通过检测参数来确定需要调用的例程.下面是从VCL 的数学单元(Math Unit)中摘录的一系列函数: function Min (A,B: Integer): Integer; overload; function Min (A,B: Int64): Int64; overload; function Min (A,B: Single): Single; overload; functi…

Delphi中封装ADO之我重学习记录

delphi adodataset ctstatic 数据是缓存在服务器端还是客户端答:客户端,开启本地缓存功能后,就能数据在本地批量修改后,再批量提交,减少了网络传送原创,专业,图文 Delphi中封装ADO之我重学习记录 - Delphi,封装,ADO,学习,记录今日头条,最新,最好,最优秀,最靠谱,最有用,最好看,最有效,最热,排行榜,最牛,怎么办,怎么弄,解决方案,解决方法,怎么处理,如何处理,如何解决 keylife富翁笔记作者: hongyuan标题: delphi中…

Delphi中Self和Sender的区别

在事件处理程序参数表中,至少含有一个参数Sender,它代表触发事件处理程序的构件,如在上例中,Sender就指Button2,有了Sender参数,可以使多个构件共用相同的事件处理程序,如下例: Procedure Tform1.Buttonclick(Sender:Tobject); Begin If sender=button1 then Label1.caption:=′看庭前花开花落 ′ Else Label2.caption:=′望天上云卷云舒′ End: 在此…

Delphi中Chrome Chromium、Cef3学习笔记（四）

原文 http://blog.csdn.net/xtfnpgy/article/details/48155323 一.遍历网页元素并点击JS: 下面代码为找到淘宝宝贝页面,成交记录元素的代码: for(var i=0;i<document.getElementsByTagName("A").length;i++){var a; var d=document.getElementsByTagName("A")[i]; var s=…

delphi 中几种多线程操作方式

在了解多线程之前我们先了解一下进程和线程的关系一个程序至少有一个主进程,一个进程至少有一个线程. 为了保证线程的安全性请大家看看下面介绍 Delphi多线程同步的一些处理方案大家可以参考:http://www.cr173.com/html/16747_1.html 主线程又程为UI线程. 进程和线程的主要差别在于它们是不同的操作系统资源管理方式.进程有独立的地址空间,一个进程崩溃后,在保护模式下不会对其它进程产生影响,而线程只是一个进程中的不同执行路径.线程有自己的堆栈和局部变量,但线程之间没…

Delphi 中的全局快捷键+给指定窗体发送按键

[背景] 公司做视频影像采集,平时采集图像的时候都需要打开采集窗口,然后需要开着采集窗口来进行图像采集.同事问我能不能做一个全局快捷键,哪怕我没有操作也可以采集图像.说干就干,一直想做全局快捷键了,网上找了一些代码,凑合了一下,达到了实现的效果,同事反应使用效果不错. [知识点] 本代码有如下Delphi知识可以参考学习: 1.Delphi ini文件的读取写入. 2.Delphi全局快捷键的检测和注册. 3.Delphi给指定窗体发送按键. 4.Delphi任务栏显示.隐藏自己的程序. 5.D…

【Delphi内联汇编学习1】Delphi与汇编

我一直认为Delphi功能与C++相比毫不逊色,提供了丰富的控件和类.全部API以及嵌入的汇编.最近小弟在把C版的Huffman压缩改用Delphi写时,顺便“研究”了一下Delphi的位操作和嵌入式汇编,利用嵌入汇编我们可以得到高效的程序代码,完成一些Delphi没有提供的底层功能.借贵报一方宝地与大家分享我的“研究”. 1.Delphi的位操作每个学习C的朋友都会被告之C是“中级语言”,其位操作非常方便,而Pascal之流只适用于教学.但是Delphi中提供了一组位操作,可别以过去对P…

Delphi 中 COM 实现研究手记(一)

前言前些日子用 Delphi 写了一个 Windows 外壳扩展程序,大家知道 Windows 外壳扩展实际上就是 COM 的一种应用 -- Shell COM,虽然整个程序写得还算比较顺利,但写完后还是感觉对 Delphi 中 COM 的实现有点雾里看花的感觉,因此我认为有必要花一点时间对 COM 在 Delphi 中的实现做一些研究.另外我也买了李维的新书 --<深入核心 -- VCL架构剖析>,里面有两章涉及了与 COM 相关内容,看完后我知道了COM 在 Delphi 中的实现是基于…

Delphi中解析Xml的控件-SimDesign NativeXml

Delphi中解析Xml的控件-SimDesign NativeXml 正在学习,感觉应用很方便.无源代码的版本还是免费的. SimDesign.NativeXml是一个delphi和bcb的XML控件,包含一个精巧的Delphi XML执行,使你能在程序中读写XML文档. http://www.simdesign.nl/xml.html 网上有一个利用SimDesign.NativeXml生成XML的例子. 一个更加强大易用的XML库 -- NativeXML 原来一直使用Delphi自带的T…

DELPHI中多线程知识【转】

本文的内容取自网络,并重新加以整理,在此留存仅仅是方便自己学习和查阅.所有代码均亲自测试 delphi7下测试有效.图片均为自己制作. 多线程应该是编程工作者的基础技能, 但这个基础我从来没学过,所以仅仅是看上去会一些,明白了2+2的时候,其实我还不知道1+1. 开始本应该是一篇洋洋洒洒的文字, 不过我还是提倡先做起来, 在尝试中去理解.先试试这个: procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin …

Delphi中静态方法重载还是覆盖的讨论

Delphi中静态方法重载还是覆盖的讨论新人学习Delphi的时候,容易搞不懂的一个问题,当子类方法和基类方法同名,并且参数也一样的时候,叫做什么呢?是覆盖,还是重载呢? 答案是隐藏父类方法. 一般我们的理解重载是同名,不同参数的同一个类里面实现, 或者父类和子类方法同名,参数不同,子类必须有overide关键字,表示重载方法. 也就是说重载必须有overload修饰: 覆盖呢?覆盖必须有override修改: 否则同名,同参数就是隐藏方法. =========================…

在Delphi中应用AOP实现日志功能

AOP现在很火,网上有这许多支持AOP的框架,对于Delphi来说同样也有MeAOP.不过觉得这些框架太复杂了. 现在有一个系统,基本上都快结束了,整体上当然是没有采用什么AOP的框架.对于这样的系统能否用上AOP的一点点好处呢? 项目组提出在现有的系统上加入日志记录的需求.大家一起来看看我是怎么来实现这个功能的吧. AOP简要说明根据网上对AOP的解释,它具有下面的特征: 1.将通用功能从不相关类之中分离出来: 2.能够使得很多类共享一个功能,一旦功能发生变化,不必修改很多类,只要修改这个功…

delphi中Treeview的使用介绍

今天重点学习了TreeView的使用方法,基本的已经写了,现在主要想说的是如何显示数据库的资料,今天只是做了个较简单的例子,一个父节点下显示数据库中某个field的值.代码如下: procedure TMainForm.TreeviewShow(Sender: TObject); var node1,subnode1: TTreeNode; i: Integer; begin Treeview1.Selected := nil; node1 := Tree…

Delphi中Tlist实例

Delphi中使用比较少的一些语法

本文是为了加强记忆而写,这里写的大多数内容都是在编程的日常工作中使用频率不高的东西,但是又十分重要. ---Murphy 1,构造和析构函数: a,构造函数: 一般基于TComponent组件的派生类,都应该使用overload关键字进行继承,Delphi中的对象没有什么复合的概念,在设计时,从简便的角度出发一般都设计为耦合性较强,但是使用简单的派生类即可.构造函数不是必写的,除非“复合”这样的对象实现,当省略构造函数时,会由其父类来实现新对象的建立.下面是几个常用的写法: construc…

翻箱倒柜，《Delphi中建议使用的语句》

(*//标题:Delphi中建议使用的语句整理:Zswang连接:http://www.csdn.net/Expert/TopicView1.asp?id=724036日期:2002-06-22支持:wjhu111#21cn.com//*) { No.1 判断逻辑类型 }var B: Boolean;begin B := Boolean(2); //这样只是为了调试//B := True; if B = True then ShowMessage('B = True'); //不建议//不安…

Delphi中window消息截获的实现方式（2）

Delphi是Borland公司提供的一种全新的WINDOWS编程开发工具.由于它采用了具有弹性的和可重用的面向对象Pascal(object-orientedpascal)语言,并有强大的数据库引擎(BDE),快速的代码编译器,同时又提供了众多出色的构件.受到广大编程人员的青睐.在众多的编程语言(如VB,PowerBuilder,Powerpoint等)中脱颖而出.其中一个DELPHI强于其他编程语言(如VB4.0)的地方就是在DELPHI中可自定义消息,并可直接处理消息.这对于那些希望编写自…

Delphi 中的 procedure of object

转载:http://www.cnblogs.com/ywangzi/archive/2012/08/28/2659811.html 总结:TMyEvent = procedure of object; 与 TMyProc = procedure;区别就是 TMyEvent可以再过程内部调用self,而TMyProc不可以其实要了解这些东西,适当的学些反汇编,WINDOWS内存管理机制,PE结构,看下李维的VCL架构剖析可以很好理解type TMyEvent = procedure of ob…

FastReport调用Delphi中的人民币大写转换自定义函数

FastReport调用Delphi中的人民币大写转换自定义函数 FastReport调用Delphi中的人民币大写转换自定义函数 function TJzpzEdit1.MoneyCn(mmje: Double): string; const s1: string = ‘零壹贰叁肆伍陆柒捌玖’; s2: string = ‘分角元拾佰仟万拾佰仟亿拾佰仟万’; function StrTran(const S, s1, s2: string): string; begin Result :=…

Delphi中线程类TThread实现多线程编程2---事件、临界区、Synchronize、WaitFor……

接着上文介绍TThread. 现在开始说明 Synchronize和WaitFor 但是在介绍这两个函数之前,需要先介绍另外两个线程同步技术:事件和临界区事件(Event) 事件(Event)与Delphi中的事件有所不同.从本质上讲,Event其实就相当于一个全局的布尔变量.它有两个赋值操作:Set和ReSet,相当于把它设置为 True或False.而检查它的值是通过WaitFor操作进行.对应在Windows平台上,是三个API函数:SetEvent.ResetEvent.WaitFor…

Delphi中DLL的创建和使用

参考:http://blog.csdn.net/ninetowns2008/article/details/6311663 结合这篇博客:http://www.cnblogs.com/xumenger/p/4372289.html 再结合:http://blog.csdn.net/lailai186/article/details/8770487 1.DLL简介:2.调用DLL:3.创建DLL:4.两个技巧:5.初始化:6.例外处理 1.DLL简介 DLL是Dynamic-Link Librar…