- 博客(11)
- 资源 (21)
- 收藏
- 关注
原创 Delphi 接口编程之:接口委托
本文假设你懂得 Delphi 的接口编程(关键词:Interface)假设我们定义了一个接口 IA,它有一个或几个方法。这里假设这个接口定义只有一个方法。然后,我们有两个不同的类,都实现了这个 IA 接口。但对其方法的实现,有点不一样。假设这两个类分别是 X 和 Y。也就是说,调用 X 的接口方法,和调用 Y 的同样接口的同名方法,得到的结果不同。这类似于对象继承的多态所要达到的目标。
2017-05-31 13:09:25 1741
原创 Git bare repository 的概念
要搞清这个概念,网上搜索一堆网页,中文的网页教程,没一个说得让人明白。而英文的,一看就明白。这是一份很容易看懂的英文网页:What is a bare git repository? 地址:http://www.saintsjd.com/2011/01/what-is-a-bare-git-repository/大意:git init 创建的是一个工作目录,
2017-05-27 19:54:14 10893 1
原创 Windows 底下安装 git Server: Bonobo Git Server
Bonobo Git Server 是一套基于 asp.net 的 git 服务器。运行于 Windows IIS 上。把它解压缩出来放到一个目录下,设置注意几点:1. 该目录让 IIS_User 有访问权;2. 官方文档特意提到该目录下的子目录 App_Data 要让 IIS_User 有写入权;3. 将该目录转换为应用程序(在 IIS 管理器里面,鼠标右键去点这个目录),可能事
2017-05-25 21:27:16 4828
原创 多线程的临界区
Delphi 支持多平台以后,多线程的临界区的写法,和以前不同了。以前在 VCL 底下,临界区的使用,是创建一个 TCriticalSection 对象实例,使用这个对象实例的 Enter 方法进入临界区(实际上就是锁定一个缓冲区),另外一个线程如果要访问这个缓冲区的时候,同样调用这个临界区的 Enter,这时候它就进不去,知道前面那个线程调用临界区的 Leave 方法离开。TCr
2017-05-24 12:37:34 800
原创 使用 LockBox 做加密解密
Delphi 提供的加密解密控件中,LockBox 是一套非常优秀的开源控件。其前身是 TruboPower LockBox 是一套商业控件。LockBox 到 Version 2 的时候决定开源。因此有 LockBox2,和之前的商业控件完全一样。后来,有人另外写了一套,叫做 LockBox3,这个版本同样开源,但代码完全不一样,用法也不一样。其采用的开源协议也不一样。关于 Lock
2017-05-22 11:33:35 3590
转载 git 学习
http://blog.csdn.net/tangbin330/article/details/9128765 使用详解http://blog.163.com/clevertanglei900@126/blog/static/11135225920101166432957/ 架设服务器http://www.cnblogs.com/lwme/archive/2
2017-05-21 23:35:01 352
原创 Windows 底下根据一个进程的名字杀死一个进程的代码
知道一个正在运行的进程的名字,比如计算器:Calc.exe杀死它的代码:USES TLHelp32; //必须 Users 这个,FindProcessID 函数需要用到它。{$R *.dfm}function FindProcessID(s:string):integer;var found,find:boolean; FSnapshotHandle:tHAND
2017-05-17 18:19:22 1222
原创 Windows 下用 Delphi 代码杀死进程,或者杀死自己
Windows 下杀死进程1. 用命令行杀进程,前提是你知道进程 ID。用 Windows 任务管理器可以查看一个运行中的进程的进程 ID。用命令行命令 netstat -nao 可以查看当前联网的进程及其 ID 知道进程 ID 后,在命令行输入以下命令可以杀死这个进程:ntsd -c q -p "pid" 2. 杀死一个别的进程,前提是我们知道这个进程的主 F
2017-05-17 17:51:44 1563
原创 在 WebService 中采用 TSOAPAttachment 传输文件
Delphi 推出对 WebService 的支持很多年了。遥想当年 XML, SOPA 火爆的时候,Delphi 也跟风推出了对 WebService 的支持。现在 JSON RESTful 火爆了,Delphi 又跟风推出了 DataSnap。不过,我还是觉得 Delphi 的 WebService 采用的基于 Interface 的架构,代码更简单,优雅。不知道为什么 DataSna
2017-05-14 00:44:25 2146
原创 如何访问一个控件的 Protected 段的成员,改变 DBNavigator 的行为
问题:如何在使用 DBNavigator 的时候,用户点了 “+” 符号,对应的 DataSet 不是执行 Insert 而是执行 Append,达到新纪录始终出现在 DBGrid 的最底部的效果?办法:通过修改 DBNavigator 的代码来实现。但我们不能去修改 DBNavigator 的源代码。DBNavigator 有一个 Buttons 属性,但是属于 Port
2017-05-12 19:33:26 427
转载 DBImage 使用 Jpeg 图片(VCL)
Delphi 的 DBImage 只支持 BMP 格式的图片。如果在数据库的 Blob 字段里面存储 BMP 图片,则 DBImage 可以自动显示图片。如果在 Blob 字段里面存储 Jpg 图片,则打开数据库的时候,如果绑定了一个 DBImage 到该字段,会报异常。要让 DBImage 支持 JPEG,其核心是:TWICImage.TWICImage 是 Delphi 10
2017-05-12 12:39:35 2485
Delphi ACM Component,ACM 控件用于声音采集和播放,含全部源代码和使用例子
2023-03-24
Delphi FireMonkey TListView 做手机APP的主从列表的 Demo 源代码
2022-09-20
本人原创 Delphi 版本的 HTML 编辑器源代码
2022-03-30
发光按钮-基于Delphi FireMonkey的例子代码
2020-04-06
MVVM_LiveBinding.7z
2020-02-13
文本差异检查及显示的源码
2018-10-13
Delphi APP 使用 iOS 的 BackgroundFetch 的例子源代码
2017-10-10
Win7 远程桌面多用户补丁
2017-10-08
本人原创源代码:Delphi APP 内置 WebBroker 让界面显示HTML5
2017-09-30
本人原创:基于Delphi WebBroker 的 CMS源代码
2017-09-18
Delphi WebBroker 网页上传文件的 Demo 源码
2017-05-02
WebBroker StandAlone 模式当 Web Server 用的源代码 by pcplayer
2017-04-05
Delphi LiveBinding对象及对象序列化为JSON的例子
2016-11-24
Delphi 在 DBGrid 里面显示分组统计的源代码
2016-11-03
Indy10 WEB Server Demo代码
2014-07-15
HotLog 源代码
2013-06-18
网络连接状态查看工具
2013-06-18
Dspack for XE3
2013-06-17
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人