自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(7)
  • 收藏
  • 关注

原创 Creating a Transparent Form

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

2005-01-05 17:09:00 774

原创 Creating Forms that are stored in DLLs

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

2005-01-05 17:04:00 911

原创 function GetVersion(sFile: string; bIncludeBuild: boolean): string;

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

2005-01-05 16:44:00 731

原创 LineDDA的一个例子

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

2004-12-20 16:34:00 746

原创 Template 模式之Delphi实现

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

2003-03-03 18:08:00 903

原创 进程间传递消息(发送和接收系统消息)

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

2003-03-03 09:47:00 1421

原创 Singleton模式之Delphi实现

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

2002-09-19 09:23:00 818

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除