摘要：
消息，就是指Windows发出的一个通知，告诉应用程序某个事情发生了。例如，单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。消息本身是作为一个记录传递给应用程序的，这个记录中包含了消息的类型以及其他信息。例如，对于单击鼠标所产生的消息来说，这个记录中包含了单击鼠... 阅读全文
摘要：
方法一：适用于托拽无标题栏的文字提示浮动小窗口（因如果使用PIC作为BTN的话会影响到PIC的Click事件获得）//当鼠标拖动时Windows 首先会向鼠标//下的窗口发送一个 wm_nchittest 消息，窗口收到这个消息//后再由窗口的消息处理函数进行处理，消息处理函数将会返//回一个整数表... 阅读全文
摘要：
function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external ’KERNEL32.DLL’; {把当前进程变为一个系统服务，从而在任务列表中把程序隐藏起来}procedure TForm... 阅读全文
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Butto... 阅读全文
摘要：
分类运算符操作操作数结果类型范例算术运算符+加整数，实数整数，实数X + Y-减整数，实数整数，实数Result - 1*乘整数，实数整数，实数P * InterestRate/实数除整数，实数实数X / 2div整数除整数整数Total div UnitSizemod取模整数整数Y mod 6+(... 阅读全文
摘要：
视窗系统 2000/XP和2003等支持一种叫做"服务程式"的东西.程式作为服务启动有以下几个好处: (1)不用登陆进系统即可运行. (2)具有SYSTEM特权.所以你在进程管理器里面是无法结束他的. 笔者在2003年为一公司研发机顶盒项目的时候,原来写过课件上传和媒体服务,下面就介绍一下怎么用De... 阅读全文
摘要：
procedure screenshot(shot: string);var dibH : hBitmap; bits : pointer; info : TBITMAPINFO; width,height : integer; screenDC,dibDC : hDC; f : file of b... 阅读全文
摘要：
线程的基础知识 线程的组成。线程有两部分组成。 1、一个是线程的内核对象，操作系统用它来对线程实施管理。内核对象也是系统用来存放线程统计信息的地方。 2、另一个是线程堆栈，它用于维护线程在执行代码时需要的所有函数参数和局部变量。 进程从来不执行任何东西，它只是线程的容器。线程总是在某个进程环... 阅读全文
摘要：
TThread是一个抽象类，可以创建几个独立的线程。类关系 TObject在一个多线程的应用程序中创建一个TThread的后子类代表一个线程。每一新子类的TThread对象的实例是一个新的线程。从TThread派生的多线程实例可以构成Delphi的多线程应用程序。 当一个应用程序运行时，应用程序... 阅读全文
摘要：
文件搜索功能要用到findfirst和findnext函数，以及tsearchrec结果，采用深度优先算法，先搜索目录下的文件，然后搜索目录下的子目录递归调用，代码如下procedure TSearchThread.findfiles(apath: string); {通过递归调用，可以在当前目录... 阅读全文