2009年12月27日 星期日

delphi 执行一个外部程序，当外部程序结束后言主程序立即响应

幸福苹果| 幸福苹果-delphi |17:50:00

我们经常能看到360安全卫士进行windows系统升级时，执行windows升级程序，当升级程序执行完成后，360马上弹出提示框。这样的程序是如何做到的呢？下述代码就能完成！uses shellAPI;procedure TForm1.Button1Click(Sender: TObject);varSEInfo: TShellExecuteInfo;Exi...

delphi 取得开机时间 开机时间总长度（可精确到秒，分钟等）

幸福苹果| 幸福苹果-delphi |17:17:00

procedure TForm1.Button1Click(Sender: TObject);//GetTickCount函数可以得到从开以来所经过的毫秒数.再与当前时间相减就可以了!varStartTime:TDateTime;beginStartTime:=Now-GetTickCount/1000/60/60/24;showmessage('本次开机时间为：'+DateTimeToStr(StartTime))...

请问如何检测是否按下键盘或鼠标，如果超过5秒没有操作则认为用户已经离开？

幸福苹果| 幸福苹果-delphi |17:00:00

http://www.cnblogs.com/fubin/archive/2009/09/14/1566201.htmlprocedureTForm1.Timer1Timer(Sender: TObject);varvLastInputInfo: TLastInputInfo;beginvLastInputInfo.cbSize :=SizeOf(vLastInputInfo);GetLastInputInfo(vLastInputInfo);ifGetTickCount-vLastInp...

2009年12月26日 星期六

Delphi.Distiller.v1.84/1.85

DELPHI盒子| Delphi盒子 |16:12:00

Delphi.Distiller.v1.85 注：lsuper兄有名了。。。。 呵呵。里面集成的破解方法是用的你的。

2009年12月25日 星期五

GdiPlus[49]: 图像(一) 概览

万一| 万一的 Delphi 博客 |22:52:00

　　阅读: 54 评论: 0 作者:万一发表于 2009-12-25 22:52原文链接三个主要的图像相关接口是: IGPImage、IGPBitmap、IGPMetafile.IGPBitmap、IGPMetafile 都是从 IGPImage 继承, 分别用于处理位图和图元文件.还有从 IGPBitmap 继承的 IGPCachedBitmap 用于快速呈现图?..

如何隐藏标题栏，而不是改变窗体样式?

幸福苹果| 幸福苹果-delphi |14:16:00

http://topic.csdn.net/t/20011015/11/323488.html很简单：重载TForm类的CreateParams成员函数：protectedprocedure CreateParams(var Params: TCreateParams); override;procedure TForm1.CreateParams(var Params: TCreateParams);begininherited;Pa...

重载 CreateParams 方法[2]: 重载 TForm.CreateParams 方法的几个例子

幸福苹果| 幸福苹果-delphi |14:14:00

http://www.cnblogs.com/del/archive/2008/09/02/1282178.html这里有所有相关参数的解释:http://www.cnblogs.com/del/archive/2008/04/15/1154359.html//最大化窗口procedureTForm1.CreateParams(varParams: TCreateParams);begininherited; Params.Style := Param...

Delphi重载Createparams，窗体的一些样式

幸福苹果| 幸福苹果-delphi |14:13:00

http://aammjian.blog.51cto.com/510093/127188unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;typeTForm1 = class(TForm)private    { Private declarations }protected  ...

父窗口最小化，子窗口不最小化 非模态窗口 同级窗口

幸福苹果| 幸福苹果-delphi |14:12:00

程序创建两个窗口，主窗口为form1,子窗口为form2,form3...当主窗口最小化时，子窗口不随主窗口最小化，如迅雷的悬浮窗口一样的效果。TForm2= class(TForm)protectedprocedure CreateParams(var Params: TCreateParams); override;end;procedure TForm2.CreateParams(...

让"显示桌面"功能对你的窗口无效

幸福苹果| 幸福苹果-delphi |14:10:00

TForm1 = class(TForm)protectedprocedure CreateParams(var Params: TCreateParams); override;end;procedure TForm1.CreateParams(var Params: TCreateParams);begininherited;Params.WndParent := FindWindow('Progman',nil);//就是桌面end;阅读全文类别：delph...

SQL无限分级结构 管家婆 分类路径

幸福苹果| 幸福苹果-delphi |11:51:00

http://topic.csdn.net/t/20060929/20/5057689.htmlhttp://www.csbian.com.cn/article/75.html最近在找一次sql查询的无限分类查询的设计，网上找了一下这个数据表的设计很有特色，不用递归，依靠个简单SQL语句就能列出菜单，看看这个数据表怎么设计的，并对下面的数?..

GdiPlus[48]: IGPMatrix 矩阵(三) 关于矩阵的旋转

万一| 万一的 Delphi 博客 |11:29:00

　　阅读: 56 评论: 0 作者:万一发表于 2009-12-25 11:29原文链接矩阵旋转一个角度, 会关联到 M11、M12、M21、M22 四个数据, 计算公式如下:┏ ┓ ┃ cos(r) sin(r) 0┃ ┃-sin(r) cos(r) 0┃ ┃ DX DY 1┃ ┗ ┛ /...

DBGrid - Grouping Records

CodeGear| CodeGear-CodeCentral Delphi |05:30:13

This simple example shows how to use DBGrid VCL control and ClientDataSet especial features (like Agreggates and GroupingLevel) to group records in the Grid. For example:[Employees and Departments]---------------------------------------------Depar...

DBGrid - Incremental search / filter

CodeGear| CodeGear-CodeCentral Delphi |05:23:03

This simple example shows how to implement a incremental search in VCL DBGrid to find records, some like Delphi IDE uses do search a component in the Tool Palette (type "X" to filter only componentes that contains "X&amp...

2009年12月24日 星期四

GdiPlus[47]: IGPMatrix 矩阵(二)

万一| 万一的 Delphi 博客 |22:46:00

　　阅读: 88 评论: 4 作者:万一发表于 2009-12-24 22:46原文链接IGPMatrix 的属性与方法://方法 IGPMatrix.Reset; { 重置 Matrix 得到单位矩阵(斜对角线是1其他是0) } IGPMatrix.Translate(); { 平移 } IGPMatrix.Scale(); { 放缩 }...

« 上一页

下一页 »