2008 年 6月 28 日随笔档案 - 万一

2008年6月28日

再学 GDI+[68]: 路径画刷(8) - SetBlendTriangularShaped、SetBlendBellShape

摘要：本例效果图(颜色失真严重, 因为 GIF 最多只能接受 256 中颜色): 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, StdCtrls, ExtCtrls; type ... 阅读全文

posted @ 2008-06-28 22:30 万一阅读(2301) 评论(0) 推荐(0) 编辑

再学 GDI+[67]: 路径画刷(7) - 画个五角星

摘要：本例效果图: 代码1: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormPaint(Sender: TObjec... 阅读全文

posted @ 2008-06-28 21:41 万一阅读(3054) 评论(0) 推荐(0) 编辑

再学 GDI+[66]: 路径画刷(6) - SetInterpolationColors、GetRectangle

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormPaint(Sender: TObje... 阅读全文

posted @ 2008-06-28 20:00 万一阅读(2168) 评论(4) 推荐(0) 编辑

再学 GDI+[65]: 路径画刷(5) - SetGammaCorrection

posted @ 2008-06-28 18:28 万一阅读(1651) 评论(0) 推荐(0) 编辑

再学 GDI+[64]: 路径画刷(4) - 还是 SetCenterColor、SetSurroundColors

摘要：在本例中没有指定 CenterColor, 将默认白色; SurroundColors 原来是对应路径中的点(但按下面的做法在椭圆里不灵). 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dial... 阅读全文

posted @ 2008-06-28 13:50 万一阅读(1821) 评论(0) 推荐(0) 编辑