“安装界面太丑了，不堪入目！”        “这界面应该属于20年代初的旧产物……”        “难看！”         每每听到设计师和产品经理这样的吐槽时，心中难免会有一点失落。细看一下，咱们软件的安装包界面的确还是比较古老，仍然带有xp系统自带的界面边框。于是趁着这次新版软件发布之际，专门花了时间去研究界面设计。         目标要求：         1、 界面b

  转自博客园http://www.cnblogs.com/jsrgren/archive/2011/10/31/2270353.html procedure New(var P: Pointer);  {为一个指针变量分配内存，会自动计算指针所指数据结构需要空的空间大小} procedure GetMem(var P: Pointer; Size: Integer); {分配一个指定大小的内存块

C++ 例： WIN32PROJECT1_API void test8(RECT &a) { a.left = 1; a.top = 2; a.right = 3; a.bottom = 4; } 此时参数为 RECT &a，在Delphi中有两种申明方式，各有不同 1、方式一var procedure test8(var a: TRect); cdec

unit Unit3; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComObj, StdCtrls; const L_ARR_CHAR:array[0..77]of string=('A','B','C','D','E','F

1，将属性与事件绑定起来，控制了字段的可读可写属性，例如给控件的属性赋值的时候，这个主要在控件开发时候用到 Property是一个很有意思的语法特性，它使得方法具有了字段的调用特征，并赋予字段执行动作的能力。 如果你使用过C++ Builder来写基于VCL的程序，我想很多人都会注意到这样一点，比如： edt.Text = "test"; 这个时候edt文本框的内容会随之改变，但是“理论”上Tex

在自己的程序中将任务栏隐藏起来，并屏蔽Ctrl+Alt+Del和Alt+Tab等系统热键，也是很有趣的。要实现它们比较容易，但千万别忘了恢复正常，另外，本例中使用了3个API函数：FindWindow、ShowWindow和SystemParametersInfo，在使用它们之前一定要进行申明。 　　Implementation 　　var Hwnd:THandle; 　　Tmp:integer;

1.Label属性：字体一般用的属性。ANSI_CHARSET; 褐色的或者蓝色字体。verdada字符集（￥），用了verdata，就会显示2个杠杠。字体大小常用9,17,36；看上去舒服即可；加粗啥的。自己设； 2.DBSUMlist: 连接数据集，然后在sumcollection中设置字段跟统计类型，可以有3种，一种是平均数，一种是求和，一种是行数。然后设置dbsumlist.active

示例程序下载

调用宏语言；   excelapp := createoleobject('EXCEL.application');   ExBook := excelapp.WorkBooks.Add;   Sheet := ExBook.WorkSheets.Item[1];   sheet.rows['2:9'].Interior.ColorIndex := 36;   sheet.rows['2:9'].

Delphi XE5教程8：使用Delphi命名空间  // Project file declarations... //项目文件声明… program MyCompany.ProjectX.ProgramY; // Unit source file declaration... //单元源文件声明 unit MyCompany.ProjectX.ProgramY.MyUnit1

最后发现是因为，系统文件下有个class。pas.   而 ppclass里面也有一个class.pas. 导师文件版本重复。

Delphi : 使用ApplicationEvents来拦截窗体消息，阻止WebBrowser右键菜单 (2012-10-25 19:38:35) 标签：  it 分类： 软件_Software     项目需要一些全屏展示的web页面，结果碰到一个问题，当窗体上的webbrowse控件打开了网页之后，窗体就不响应键盘消息了~~~~郁闷了会儿，过后才研究出来用ApplicationEvents这

1，Clientsocket属性简介：address：主机IP地址；如果设置了HOST（主机名）;这优先会处理host；如果有host，将不会处理Address;                                                 serverice 与 port:  serverice 填写 http；ftp；Pope等协议。 port指定端口。如果知道了servic

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,zlib; type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo

<strong><span style="font-size:18px;color:#ff0000;">下面的代码中包含了一个消息接收器，当消息接收器收到消息后，将socket，收到的消息，状态，封装成对象，保存到tstringlist中，stringlist.strings[0]里面保存了对象的ID（也就是命令的序号，从1..X）;然后放一个定时器，定时器1S中去查看命令列表；把第一条命令的st

这个时候去找下 delphi里的破解包，里面有个**.slip文件，复制到安装目录下 然后重启一下就好了。