摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, TeCanvas;type TForm1 = class(TForm) ButtonColor1: TButtonColor; ButtonColor2: ... 阅读全文
posted @ 2010-12-31 17:53
巅枫
阅读(773)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, TeCanvas;type TForm1 = class(TForm) ButtonColor1: TButtonColor; Butt... 阅读全文
posted @ 2010-12-31 11:07
巅枫
阅读(563)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, TeCanvas;type TForm1 = class(TForm) ButtonColor1: TButtonColor; ButtonColor2: ... 阅读全文
posted @ 2010-12-31 11:06
巅枫
阅读(686)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, ExtCtrls;type TForm1 = class(TForm) Panel1: TPanel; Button1: TButton... 阅读全文
posted @ 2010-12-31 11:05
巅枫
阅读(642)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); procedure FormResize(Sen... 阅读全文
posted @ 2010-12-31 11:04
巅枫
阅读(599)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ComboBox1: TComboBox; procedure FormCreate(Sender: T... 阅读全文
posted @ 2010-12-31 11:04
巅枫
阅读(327)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, TeCanvas, ExtCtrls;type TForm1 = class(TForm) ComboBox1: TComboBox; ColorBox1:... 阅读全文
posted @ 2010-12-31 11:03
巅枫
阅读(860)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, ExtCtrls;type TForm1 = class(TForm) ColorListBox1: TColorListBox; Tr... 阅读全文
posted @ 2010-12-31 11:02
巅枫
阅读(756)
评论(0)
推荐(0)
摘要：
颜色名称颜色效果颜色值aclAliceBlue$FFF0F8FFaclAntiqueWhite$FFFAEBD7aclAqua$FF00FFFFaclAquamarine$FF7FFFD4aclAzure$FFF0FFFFaclBeige$FFF5F5DCaclBisque$FFFFE4C4aclBlack$FF000000aclBlanchedAlmond$FFFFEBCDaclBlue$FF0000FFaclBlueViolet$FF8A2BE2aclBrown$FFA52A2AaclBurlyWood$FFDEB887aclCadetBlue$FF5F9EA0aclChartreuse$ 阅读全文
posted @ 2010-12-31 11:01
巅枫
阅读(604)
评论(0)
推荐(0)
摘要：
function MakePoint(X, Y: Integer): TGPPoint; overload;function MakePoint(X, Y: Single): TGPPointF; overload;function MakeSize(Width, Height: Integer): TGPSize; overload;function MakeSize(Width, Height... 阅读全文
posted @ 2010-12-31 10:59
巅枫
阅读(605)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormMouseDown(Sender: TObject; Button: TMouseButton;... 阅读全文
posted @ 2010-12-31 10:58
巅枫
阅读(462)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); procedure FormMouseDown(... 阅读全文
posted @ 2010-12-31 10:57
巅枫
阅读(660)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); procedure FormMouseDown(... 阅读全文
posted @ 2010-12-31 10:56
巅枫
阅读(483)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls;type TForm1 = class(TForm) TrackBar1: TTrackBar; Button1: TButton; pr... 阅读全文
posted @ 2010-12-31 10:55
巅枫
阅读(568)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ExtCtrls;type TForm1 = class(TForm) Button1: TButton; TrackBar1: TTr... 阅读全文
posted @ 2010-12-31 10:55
巅枫
阅读(650)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure FormMo... 阅读全文
posted @ 2010-12-31 10:54
巅枫
阅读(657)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormResize(Sender: TObject); procedure FormPaint(Sen... 阅读全文
posted @ 2010-12-31 10:53
巅枫
阅读(695)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure FormMo... 阅读全文
posted @ 2010-12-31 10:52
巅枫
阅读(631)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Spin, ExtCtrls;type TForm1 = class(TForm) Panel1: TPanel; SpinEdit1: TSpinEdit... 阅读全文
posted @ 2010-12-31 10:50
巅枫
阅读(613)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Spin, ExtCtrls;type TForm1 = class(TForm) Panel1: TPanel; Label1: TLabel; Labe... 阅读全文
posted @ 2010-12-31 10:50
巅枫
阅读(452)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormMouseDown(Sender: TObject; Button: TMouseButton;... 阅读全文
posted @ 2010-12-31 10:47
巅枫
阅读(1156)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); private { Private decla... 阅读全文
posted @ 2010-12-31 10:46
巅枫
阅读(676)
评论(0)
推荐(0)
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); private { Private decla... 阅读全文
posted @ 2010-12-31 10:43
巅枫
阅读(918)
评论(0)
推荐(0)
摘要：
定义用于填充图形形状（如矩形、椭圆、饼形、多边形和封闭路径）的内部的对象。 构造函数Brush类需要通过其子类创建才能使用，其子类有SolidBrush（实心画刷），TextureBrush（纹理画刷），LinearGradientBrush（线性渐变画刷），HatchBrush（阴影画刷）。方法（以下方法其子类都继承了） Clone当在派生类中重写时，创建此 Brush 的一个精确副本。 CreateObjRef 创建一个对象，该对象包含生成用于与远程对象进行通信的代理所需的全部相关信息。 （继承自 MarshalByRefObject。） Dispose() 释放由此 Brush 对 阅读全文
posted @ 2010-12-31 10:32
巅枫
阅读(738)
评论(0)
推荐(0)
摘要：
定义用于绘制直线和曲线的对象。 无法继承此类。构造函数1.通过“画刷”创建Pen(画笔)对象，如下：2.通过“画刷”和“笔宽”创建Pen(画笔)对象，如下：3.通过“颜色”创建Pen(画笔)对象，如下：4.通过“颜色”和“笔宽”创建Pen(画笔)对象，如下： 方法 Clone创建此 Pen 的一个精确副本。 Dispose 释放此 Pen 使用的所有资源。 Equals(Object)确定指定的 Object 是否等于当前的 Object。 GetHashCode 用作特定类型的哈希函数。 GetType 获取当前实例的 Type。 InitializeLifetimeService获取控制此 阅读全文
posted @ 2010-12-31 10:29
巅枫
阅读(1094)
评论(0)
推荐(0)
摘要：
构造函数GDI+可以通过以下四种方法创建Graphics（图形环境）对象：1.通过窗体canvas的句柄创建，如：2.通过其它有canvas的VCL画布句柄创建，如：3.通过位图（TGPBitmap）创建Graphics，如：4.通过位图（TGPBitmap）创建Graphics，如：Graphics类（图形环境）提供了很多方法给我们调用，以下是方法表： DrawLine 绘制直线DrawLines 绘制一组直线DrawRectangle 绘制矩形DrawRectangles 绘制一组矩形DrawEllipse绘制椭圆DrawCurve绘制曲线(基数样条)DrawClosedCurve 绘制闭 阅读全文
posted @ 2010-12-31 10:27
巅枫
阅读(2163)
评论(0)
推荐(0)
浙公网安备 33010602011771号