2017年7月24日
delphi备份恢复剪切板（使用了GlobalLock API函数和CopyMemory）
看了季世平老兄的C++代码后翻译过来的 [delphi] view plain copy unit clipbak; interface uses SysUtils, Classes, Clipbrd, Windows, Contnrs; type TClipData = class Format: Read More
posted @ 2017-07-24 19:54 findumars Views(509) Comments(0) Diggs(0)
delphi获取dll的函数列表
找了几个，终于找到一个好用的 function GetDLLFileExports( szFileName: PChar; mStrings: TStrings): Boolean;var hFile: THANDLE; hFileMapping: THANDLE; lpFileBase: Poin Read More
posted @ 2017-07-24 19:50 findumars Views(2061) Comments(0) Diggs(0)
Delphi 7下使用Log4Delphi 0.8日志组件
Log4d是apache下的一个delphi开源子项目，它的设计思想来源于Log4j，但并不是Log4j的子项目，主要目标是开发环境与生产环境下的日志输出。 一、下载https://sourceforge.net/project/showfiles.php?group_id=145326二、安装将源 Read More
posted @ 2017-07-24 19:50 findumars Views(1268) Comments(0) Diggs(0)
Delphi调试activex
以前好多次遇到了activex无法调试的问题，一直没搞清楚原因，最近终于搞清楚了，原来是IE由单线程变成了多线程。 下面就说说调试activex的方法 一、简单的方式，这种方式只适用于浏览器为单线程的情况： 在delphi的run菜单里的parameter里设置host application和pa Read More
posted @ 2017-07-24 19:49 findumars Views(692) Comments(0) Diggs(0)
delphi2009(10,xe)下indy10发送utf8字符串
最近实现一个功能，使用delphi2009以TCP调用Java端的接口，接口要求先发送字符串的长度，然后再发送字符串内容，并且字符串要求是utf8格式的 调试了好长时间，才终于发现解决办法，或者说发现问题所在 我用了utf8encode方法，然后调用一个函数，在这个函数中将字符串转换为tidbyte Read More
posted @ 2017-07-24 19:47 findumars Views(769) Comments(0) Diggs(0)