摘要: TGPLinearGradientBrush.Create( rect: TGPRect; {变化范围} color1, color2: TGPColor; {起始色与终止色} angle: Single; {旋转角度} isAngleScalable: BOOL = FALSE {是否受 TLinearGrad... 阅读全文
posted @ 2008-06-11 19:18 万一 阅读(1805) 评论(0) 推荐(0) 编辑
摘要: TGPLinearGradientBrush.Create( rect: TGPRect; {线性渐变的界限} color1, color2: TGPColor; {线性渐变起始色与终止色} mode: TLinearGradientMode {渐变方向, 见下表} ); TGPLinearGradientBrush.Create( rect: TGPRe... 阅读全文
posted @ 2008-06-11 17:00 万一 阅读(2545) 评论(0) 推荐(0) 编辑
摘要: 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Pan... 阅读全文
posted @ 2008-06-11 14:40 万一 阅读(2083) 评论(0) 推荐(0) 编辑
摘要: TGPTextureBrush.Create( image: TGPImage; {用于画刷的图像} wrapMode: TWrapMode = WrapModeTile {平铺样式, 是可选值, 见下表} ); 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, Sy... 阅读全文
posted @ 2008-06-11 11:25 万一 阅读(2159) 评论(1) 推荐(0) 编辑
摘要: TGPTextureBrush.Create( image: TGPImage; {用于画刷的图像} ); 本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 ... 阅读全文
posted @ 2008-06-11 10:32 万一 阅读(1984) 评论(0) 推荐(0) 编辑