largewang的专栏

{  2002.07.22  关于如何发送和接收系统消息  作者：王珍义  nickname:LargeWang(老王)  QQ: 33728007  欢迎光临鹏业软件 www.pengesoft.com.cn  以下代码Delphi7.0通过，编译后启动两个进程，然后在一个窗口中点击Button1试试。}unit Unit1;interfaceuses  Windows, Mes

type TSingleton = class(TObject) public A : Integer; class function NewInstance: TObject; override; procedure FreeInstance; override; class function RefCount:

unit Tpl_meth;{Design pattern example -some simple classes using the Template Method pattern.}interfacetype  TAbstractTemplateClass = class(TObject)  protected    function Algorithm_StepA: Integer

unit Unit1; interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, ExtCtrls, StdCtrls, Buttons;type  TfmMain = class(TForm)    procedure FormPaint(

function GetVersion(sFile: string; bIncludeBuild: boolean): string;var  dwfvw, dwZero, dwvsf: DWORD;  Major, Minor, Release, Build: DWord;  pfvw: PChar;  pvsf: PVSFixedFileInfo;  s: string;begin  Resu

There are lots of resources and solutions out there on the internet that are specific to this problem, however, in using the BusinessSkinForm components, that are tightly integrated with the VCL and m

To create a transparent splashscreen, like for example the splash displayed when adobe acrobat reader starts, do the following:Create the a new form Set the Border Style to bsNone Set the Posi