Shift+Ait+S  打开搜索 Ctrl+Ait+R 打开上次搜索结果…
Delphi 支持三种形式的回调函数 全局函数这种方式几乎是所有的语言都支持的,类的静态函数也可以归为此类,它保存的只是一个函数的代码起始地址指针( Pointer ).在 Delphi 中声明一般为:   1 TXXX=procedure/function (参数列表); 类的成员函数类的成员函数作为回调函数,与全局函数相比,需要关联具体的类的实例,所以它是由两部分组成,一个是对象的实例地址,一个是代码地址,两个指针,构成一个记录(结构体),参考 Delphi 中 TMethod 的声明:  …
Delphi中Spcomm使用属性及用法详解 Delphi是一种具有 功能强大.简便易用和代码执行速度快等优点的可视化快速应用开发工具,它在构架企业信息系统方面发挥着越来越重要的作用,许多程序员愿意选择 Delphi作为开发工具编制各种应用程序.但是,美中不足之处是 Delphi没有自带的串口通信控件,在它的帮助文档里也没有提及串口通信,这就给编制通信程序的开发人员带来许多不便. 目前,利用 Delphi实现串口通信的常用的方法有 3种:一是利用控件,如 MSCOMM控件和 SPCOMM控件:二…
因为一些原因,需要进行encodeURIComponent和decodeURIComponent编码,在Delphi中找了一个,首先是发现不能正确编码+号,后面强制处理替换了,勉强可用. 后面发现多次使用后delphi自带的HttpEncode会报Out of Memory. 以上可能是我使用的不好,但没有找到解决办法. 后面想到直接采用运行JavaScript代码,找到了"万一的 Delphi 博客" 在 Delphi 中调用 JavaScript(2) - 万一 - 博客园 (cn…
资料说明: 1.http://blog.csdn.net/diligentcatrich/article/details/7077294 说明: 实例代码: procedure TForm1.btn1Click(Sender: TObject); var p1: Pointer; p2: Pointer; begin if TObject(btn1) = TObject(btn2) then ShowMessage('The same as') else ShowMessage('Dfferen…
class function TObject.MethodAddress(const Name: ShortString): Pointer;asm        { ->    EAX     Pointer to class        }        {       EDX     Pointer to name }        PUSH    EBX        PUSH    ESI        PUSH    EDI        XOR     ECX,ECX      …
一分钟加入google站内搜索代码| 一分钟加入google站内搜索代码|只有7行最精简.网上有很多 google 站内搜索代码,但是出于某些目的,很多都加入了多余的代码,从seo的角度来讲,是很不优化的,我这里给出一个最精简的代码,只有7行,让您很容在一分钟之内,为您的网站.博客.论坛加入"搜索本站"的功能.对于很多网民来讲这是非常好用的功能,如果您希望方便.快捷的建立自己的站内搜索,不妨试试" Google 指定域名搜索".这样,您不必花费太多时间,就可以建立结…
[背景] 公司做视频影像采集,平时采集图像的时候都需要打开采集窗口,然后需要开着采集窗口来进行图像采集.同事问我能不能做一个全局快捷键,哪怕我没有操作也可以采集图像.说干就干,一直想做全局快捷键了,网上找了一些代码,凑合了一下,达到了实现的效果,同事反应使用效果不错. [知识点] 本代码有如下Delphi知识可以参考学习: 1.Delphi ini文件的读取写入. 2.Delphi全局快捷键的检测和注册. 3.Delphi给指定窗体发送按键. 4.Delphi任务栏显示.隐藏自己的程序. 5.D…
c++builder/delphi中透明panel及透明窗口的实现方法_delphi教程 可能大多数程序员会问:透明窗口,特别是透明Panel有什么应用价值呢?可别小看它们哦,下面我就来讲讲他们的巨大作用. (1)透明窗口可以用于软件界面特效.大家可以看到很多软件的窗口出现或退出的时候是渐进或渐出的,而并非象WinArray8那样直接弹出窗口.这就是Win2000下所提供的功能.实现方法很简单: this->AlphaBlend=true; this->AlphaBlendValue=100;…
Delphi 版 everything.光速搜索代码>,文章中关于获取文件全路径的函数:GetFullFileName,有一个地方值得优化. 就是有多个文件,它们可能属于同一个目录. 譬如 System32 目录下有2000多个文件,GetFullFileName 还是进行了2000多次的查询,效率肯定是受影响的. 先处理目录,获取目录全路径名称. 然后文件只用查询一次,就知道它的父路径的全路径了.效率肯定会提高的.尝试了一下. { 获取文件全路径,包含路径和文件名 } procedure Ge…