摘要：
创建线程MsgThread := TMsgThread.Create(False) ; //创建并执行线程MsgThread := TMsgThread.Create(True) ; //创建线程后挂起constructor Create(CreateSuspended: Boolean); 中的参... 阅读全文
摘要：
我现在使用二种信息提示的方式，一种当然是使用Application.messageBox的方式，就是即时提示。另一种就是将所有的错误和警告写在一起，适用于大批量数据的录入，一条条提示太麻烦了。 1 即时提示 我将Application.messageBox进行了封装，MessageBox的哪些参... 阅读全文
摘要：
一、窗体的建立 在DELPHI中，我们通常使用Application.CreateForm(TForm2, Form2)和TForm.create来创建窗体，我们几乎无法区别这两种方法差异，更何况，我们更多的时候都是在使用TForm.create来生成子窗体。 不过，仔细观察VCL源码，你会... 阅读全文
摘要：
函数由一句或多句代码组成，可以实现某个特定的功能。使用函数可以使代码更加易读、易懂，加快编程速度及减少重复代码。过程与函数类似，过程与函数最重要的区别在于，过程没有返回值，而函数能有返回值。 在Delphi 7.0中，已为我们定义好了非常多的函数，大致分类有6种：数据类型转换函数、字符串、数... 阅读全文
摘要：
下面是两个函数，用来执行一个外部程序，缺省是异步执行同步调用方法 RunProgram('c:\aa.exe',true);参考IsProgram_Runing函数，你也可以调用RunProgram('c:\aa.exe')先异步执行，然后根据返回的进程句柄，自己判断程序是否执行结束。// 异步执行... 阅读全文
摘要：
delphi 编程 获得同相应扩展文件名关联的应用程序，代码 如下：unit Unit1;interfaceusesWindows, Messages, Registry,IniFiles,SysUtils, Variants, Classes, Graphics, Controls, Form s... 阅读全文
摘要：
uses Windows, SysUtils, Classes, ShellAPI;function RunWait(FileName: string; Visibility: Integer): THandle;var zAppName: array[0..512] of Char; zCurDi... 阅读全文
摘要：
unit SkyPublic;interfaceusesWindows,SysUtils,Classes,Controls,Dialogs,ShellApi,Menus,StdCtrls,registry,Forms,Graphics,Math,DateUtils;typeTQuarter = 1.... 阅读全文