Kevin's Blog

unit Unit_TrayIcon;interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,shellAPI, StdCtrls, Menus; //add shellAPI unit

简单的说：       innerhtml就是把东东插入此对象的二个HTML代码之间,并清空旧的中间的东东,   如a_id.innerHTML   =   "dddd";本来的kkkk变成dddd      补充说明：      就是在对象的的二个HTML格式符之间清空原来的内容,再插入新内容,而OUTERHTML是把对象本身包含子对象清空,然后在它这个位置插入新的内容,而INNERTEXT却是

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, ComCtr

ListBox填充背景，图标，文字 procedure TForm1.ListBox2DrawItem(Control: TWinControl; Index: Integer;  Rect: TRect; State: TOwnerDrawState);var  AIcon: TIcon;  I, K : Integer;  ARect, BRect: TRect;  H : Integ

p_af_AvSenderProj1.ocx           接口：           property   VideoIP:   WideString   dispid   18;//视频IP                   property   AudioDrvIndex:   Integer   dispid   //19;音频IP                   proper

unit uNoCriticalSection;{ 能不能让它们别打架, 一个完了另一个再来? 这就要用到多线程的同步技术.　　前面说过, 最简单的同步手段就是 "临界区".　　先说这个 "同步"(Synchronize), 首先这个名字起的不好, 我们好像需要的是 "异步"; 其实异步也不准确...　　管它叫什么名字呢, 它的目的就是保证不冲突、有次

VarArrayLock Locks a variant array and returns a pointer to the data procedure Variant2Stream(const v: OleVariant;  Stream: TMemoryStream);var  p: Pointer;begin  Stream.Position := 0;  Stream.

在windows中内存的分配一次是4个字节的。而packed按字节进行内存的申请和分配，这样速度要慢一些，因为需要额外的时间来进行指针的定位。因此如果不用packed的话，delphi将按一次4个字节的方式申请内存，因此如果一个变量没有4个字节宽的话也要占4个字节！这样就浪费了,你可以用packed关键字取消这种优化。例子:   type            myrec   =   pack

所谓三层：(1) 客户端(2) 服务器端(3) 数据库    在数据访问时，使得客户端必须通过服务器来访问数据库。提高了系统的安全性。    在Delphi中可以使用Socket或者Dcom来连接他们相互间的通讯。如果使用Scocket在系统使用时必须提供Scocket连接器，而Dcom则不用。客户端和服务器的连接需要Broker来联系。环境为winxp sp2 + delph

Dock  复杂界面的停靠上面的停靠功能可以满足简单界面的需求了，那么考虑一个复杂的界面停靠操作。假设你的项目经理要求你在主界面上放置两个面板，上面的面板上有一个工具条，下面的面板上也有一个工具条。两个面板上的工具条都停靠操作，但是有一个要求是上面面板的工具条只能停靠在上面的面板上，同样下面的工具条也只能停靠在下面的面板上。 当组件在要停靠的组件上被拖动时，会调

大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时，这种说法也让很多人产生误解，似乎只有C语言的指针才能算指针。Basic不支持指针，在此不论。其实，Pascal语言本身也是支持指针的。从最初的Pascal发展至今的Object   Pascal，可以说在指针运用上，丝毫不会逊色于C语言的指针。以下内容分为八部分，分

 unit Unit2; interface uses windows, classes, variants, ComObj, sysUtils, DB, ADODB, Forms, ExtCtrls; Type TExlObj = class Timer1: TTimer; private FEx

 本文翻译自《美国优秀经理观念大全修订本》我想现在没有什么比做一个软件工程师更能赚钱的了，当然了，明星除外。在美国，一个优秀的软件工程师，就算在一个平凡的岗位上，也能得到年薪50万（美元）以上的待遇。这绝对不是开玩笑，在北美曾有统计表明，一年内发放给软件工程师的工资以及各种福利，占去了全美净收入的2.4%，这是一个很大的数字。我是一个Java软件工程师，但是在这里我不想说Java，

消息，就是指Windows发出的一个通知，告诉应用程序某个事情发生了。例如，单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。消息本身是作为一个记录传递给应用程序的，这个记录中包含了消息的类型以及其他信息。例如，对于单击鼠标所产生的消息来说，这个记录中包含了单击鼠标时的坐标。这个记录类型叫做TMsg，它在Windows单元中是这样声明的：type  TMsg

 由于自己特别喜欢windows 2003操作系统， 但最近发现自己安装delphi7后，显示如下错误的信息提示：1、启动delphi7时,提示有一个dclisp70.bpl无法加载的错误提示。2、菜单下面的Option选项，无法打开总是，并出现提示对话框:Access violation at address 0012F88F. Write of address 0012F88F

 DELPHI 编程中，关于调用MDI子窗口常出现内存错误的问题：1.MDI主窗口的调用代码是：  uses  unit1;     begin     if  Form1 = NIL then        Form1 := TForm1.Create(self);     Form1.show;   end;2.Form1的释放程序：  onClose

Procedure型变量：  在DELPHI中，函数、过程的地址可以赋给一个特殊类型的变量，变量可用如下方式声明： var p : procedure(num:integer); //过程 或： var f : function(num:integer):integer; //函数 也可定义一个过程（或函数）类型，再定义该类型的变量，如： type TMyProc = Procedure

Delphi syntax: function VarType(const V: Variant): TVarType;   VarType                      Contents of variant varEmpty                    The variant is Unassigned.varNull       

环境： SynEdtor控件 + delphi匹配括号的算法：传入参数 APoint: TBufferCoord;const Brackets: array[0..7] of char = ('(', ')', '[', ']', '{', '}', '');va