2016年3月2日
delphi中无类型文件读写
Delphi代码 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class( Read More
posted @ 2016-03-02 22:19 findumars Views(452) Comments(0) Diggs(0)
delpi中的RTTI初试
java中的反射机制使我们能够在运行期间获取运行期类的信息，那么在delphi中有没有这样的功能呢？答案是有，实现这种功能的机制在delphi中叫做RTTI,废话少说，先来一段demo: 1.先定义一个demo类，注意这个类必须要以TPersistent为基类，代码如下： Delphi代码 unit Read More
posted @ 2016-03-02 22:17 findumars Views(534) Comments(0) Diggs(0)
后台调用外部程序的完美实现（使用CreateDesktop建立隐藏桌面）
最近在做的一个软件，其中有一部分功能需要调用其它的软件来完成，而那个软件只有可执行文件，根本没有源代码，幸好，我要做的事不难，只需要在我的程序启动后，将那个软件打开，在需要的时候，对其中的一个文本矿设置一些文字，再点击一个按钮就可以了。说到这里，相信你也有了对该功能的一些初步设想了，没错，其基本思路 Read More
posted @ 2016-03-02 22:16 findumars Views(7856) Comments(1) Diggs(4)
delphi之完美Splash方案（在TfrmMain.FormCreate里不断调用TfrmSplash显示加载进度文字，并且及时Update显示）
前言：网上有很多介绍delphi创建闪屏的代码，大多只是在程序开启前显示一个闪屏，但是却没有说如何在闪屏上显示程序加载的进度，于是笔者有意思介绍一下这种闪屏方式。 1.创建一个窗体(TfrmSplash)，放入一个TImageBox,加载一幅图片，调整好TImageBox与图片的大小，然后在其上放入 Read More
posted @ 2016-03-02 22:14 findumars Views(1112) Comments(0) Diggs(0)
查看内存数据的函数（ByteToHex和ByteToBin，最终都变成String）
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Bu Read More
posted @ 2016-03-02 22:13 findumars Views(1217) Comments(0) Diggs(0)