上一页 1 2 3 4 5 6 7 8 9 ··· 21 下一页
摘要: 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 巅枫 阅读(557) 评论(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 巅枫 阅读(679) 评论(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 巅枫 阅读(637) 评论(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 巅枫 阅读(597) 评论(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 巅枫 阅读(321) 评论(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 巅枫 阅读(854) 评论(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 巅枫 阅读(747) 评论(0) 推荐(0) 编辑
摘要: 颜色名称颜色效果颜色值aclAliceBlue$FFF0F8FFaclAntiqueWhite$FFFAEBD7aclAqua$FF00FFFFaclAquamarine$FF7FFFD4aclAzure$FFF0FFFFaclBeige$FFF5F5DCaclBisque$FFFFE4C4aclBlack$FF000000aclBlanchedAlmond$FFFFEBCDaclBlue$FF0000FFaclBlueViolet$FF8A2BE2aclBrown$FFA52A2AaclBurlyWood$FFDEB887aclCadetBlue$FF5F9EA0aclChartreuse$ 阅读全文
posted @ 2010-12-31 11:01 巅枫 阅读(598) 评论(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 巅枫 阅读(596) 评论(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 巅枫 阅读(447) 评论(0) 推荐(0) 编辑
上一页 1 2 3 4 5 6 7 8 9 ··· 21 下一页