DELPHI&.NET初学者[TECSOON WENDAY]

2009年3月30日

prototype-1.4.0注释版

摘要： prototype框架最早是出于方便Ruby开发人员进行JavaScript开发所构建的，从这个版本上更加体现的淋漓尽致。比起1.3.1版本，1.4.0中的编程思想和技巧更加令人拍案叫绝，对于开拓编程思路很有帮助。该版本主要加入了迭代器思想，也是Ruby中的一个核心概念，从而使用此框架进行JavaScript开发几乎可以避免for循环的使用。下面是部分代码： /* Prototype... 阅读全文

posted @ 2009-03-30 23:03 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(176) 评论(0) 推荐(0) 编辑

使窗体的标题栏闪烁

摘要： FlashWindow(self.Handle,self.CheckBox1.Checked); 阅读全文

posted @ 2009-03-30 22:27 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(172) 评论(0) 推荐(0) 编辑

实时的透明窗体

摘要： procedure TForm1.TrackBar1Change(Sender: TObject); begin self.AlphaBlendValue:=self.TrackBar1.Max-self.TrackBar1.Position; end; procedure TForm1.FormCreate(Sender: TObject); begin self.AlphaBlend:... 阅读全文

posted @ 2009-03-30 22:26 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(163) 评论(0) 推荐(0) 编辑

PowerDesigner

摘要： PowerDesigner简介 PowerDesigner是Sybase公司的CASE工具集，使用它可以方便地对管理信息系统进行分析设计，它几乎包括了数据库模型设计的全过程。利用PowerDesigner可以制作数据流程图、概念数据模型、物理数据模型，可以生成多种客户端开发工具的应用程序，还可为数据仓库制作结构模型，也能对团队设计模型进行控制。它可与许多流行的数据库设计软件，例如：Power... 阅读全文

posted @ 2009-03-30 22:22 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(374) 评论(0) 推荐(0) 编辑

2009年3月28日

自绘XP风格菜单

摘要：这是以前写的代码，自绘XP风格的菜单，硬盘坏了后以为没了，最后写的一个软件要自定义风格，“翻箱倒柜”的终于在我可爱的古董机^_^上找到了一个应用的例子。还是把它放到Blog上来，即可共享又可作为备用 :) 把主菜单的OnMeasureItem指向MeasureMainItem、OnAdvancedDrawItem指向DrawMainItem，子菜单的OnMeasureItem指向Meas... 阅读全文

posted @ 2009-03-28 15:55 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(255) 评论(0) 推荐(0) 编辑

TOOLBAR 渐变效果

摘要： procedure TForm1.ToolBar1CustomDraw(Sender: TToolBar; const ARect: TRect; var DefaultDraw: Boolean); var i,j : Integer; Dct : TRect; begin j := ToolBar1.Height; for i:=0 to (ToolBar1.Width - 1) ... 阅读全文

posted @ 2009-03-28 00:36 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(240) 评论(0) 推荐(0) 编辑

2009年3月27日

提取可执行文件内部所有图标

摘要： var i: Integer; Large, Small: HICON; nIcons: Integer; begin if OpenDialog1.Execute then begin self.Image1.Canvas.Refresh; nIcons:=ExtractIconEx(PChar(OpenDialog1.FileName... 阅读全文

posted @ 2009-03-27 23:53 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(198) 评论(0) 推荐(0) 编辑

动态设置应用程序的图标

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtDlgs, StdCtrls; type TfrmMain = class(TForm) btnIcon: TButton; OpenDialo... 阅读全文

posted @ 2009-03-27 23:46 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(291) 评论(0) 推荐(0) 编辑

隐藏Windows的工具栏和桌面图标

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TfrmMain = class(TForm) CheckBox1: TCheckBox; CheckBox2: TCh... 阅读全文

posted @ 2009-03-27 23:33 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(533) 评论(0) 推荐(0) 编辑

获取驱动器容量

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, FileCtrl; type TForm1 = class(TForm) DriveComboBox1: TDriveComboBox; ... 阅读全文

posted @ 2009-03-27 23:31 DELPHI&.NET初学者[TECSOON WENDAY] 阅读(179) 评论(0) 推荐(0) 编辑

拓维博客 - 知识的积累，知识的交流

公告