再学 GDI+[49]: 路径 - GetPointCount、GetPathPoints、GetLastPoint、GetBounds
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) CheckBox1: TCheckBox; ...
阅读全文
posted @
2008-06-18 15:30
万一
阅读(2737)
推荐(0) 编辑
再学 GDI+[48]: 路径 - StartFigure、CloseFigure、CloseAllFigures
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) CheckBox1: TCheckBox; ...
阅读全文
posted @
2008-06-18 11:30
万一
阅读(3022)
推荐(0) 编辑
再学 GDI+[47]: 路径 - CloseFigure
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) CheckBox1: TCheckBox; ...
阅读全文
posted @
2008-06-18 10:50
万一
阅读(2158)
推荐(0) 编辑
再学 GDI+[46]: 路径 - Create、FillPath、DrawPath
摘要:本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); ...
阅读全文
posted @
2008-06-18 01:47
万一
阅读(4076)
推荐(0) 编辑
再学 GDI+[45]: 文本输出 - 在矩形中格式化输出
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ExtCtrls; type TForm1 = class(TForm) Rad...
阅读全文
posted @
2008-06-17 18:18
万一
阅读(6186)
推荐(0) 编辑
再学 GDI+[45]: 文本输出 - 文本呈现质量
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ComboBox1: TComboBox; ...
阅读全文
posted @
2008-06-17 15:41
万一
阅读(3803)
推荐(0) 编辑
再学 GDI+[44]: 文本输出 - 字体
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox; ...
阅读全文
posted @
2008-06-17 14:36
万一
阅读(2282)
推荐(0) 编辑
再学 GDI+[43]: 文本输出 - 获取已安装的字体列表
摘要:这比用 Screen.Fonts; 获取麻烦一些. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ...
阅读全文
posted @
2008-06-16 23:43
万一
阅读(1794)
推荐(0) 编辑
再学 GDI+[42]: 文本输出 - 字号单位
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls; type TForm1 = class(TForm) Rad...
阅读全文
posted @
2008-06-16 18:56
万一
阅读(2069)
推荐(0) 编辑
再学 GDI+[41]: 文本输出 - 控制输出字符的个数
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormPaint(Sender: TObje...
阅读全文
posted @
2008-06-16 17:41
万一
阅读(1955)
推荐(0) 编辑
再学 GDI+[40]: 文本输出 - 选择画刷
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, CheckLst; type TForm1 = class(TForm) Rad...
阅读全文
posted @
2008-06-16 14:45
万一
阅读(2061)
推荐(0) 编辑
再学 GDI+[39]: 文本输出 - 文本样式
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, CheckLst; type TForm1 = class(TForm) CheckListBox1...
阅读全文
posted @
2008-06-16 14:14
万一
阅读(2388)
推荐(0) 编辑
再学 GDI+[38]: 文本输出 - DrawString、TGPFont
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; B...
阅读全文
posted @
2008-06-16 11:05
万一
阅读(4663)
推荐(0) 编辑
再学 GDI+[37]: TGPPen - TGPCustomLineCap、SetCustomStartCap、SetCustomEndCap
摘要:GDI+ 可以自定义线帽, 本例定义的起始线帽是一个小矩形、终止线帽是一个小三角形. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; typ...
阅读全文
posted @
2008-06-15 22:10
万一
阅读(2637)
推荐(0) 编辑
再学 GDI+[36]: TGPPen - SetLineCap
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) ComboBox1: TC...
阅读全文
posted @
2008-06-15 00:04
万一
阅读(2215)
推荐(0) 编辑
再学 GDI+[35]: TGPPen - 虚线画笔位移 - SetDashOffset
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TForm1 = class(TForm) Timer1: TTimer; pro...
阅读全文
posted @
2008-06-14 13:17
万一
阅读(2120)
推荐(0) 编辑
再学 GDI+[34]: TGPPen - 画笔的缩放变换 - ScaleTransform
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; type TForm1 = class(TForm) TrackBar1: TT...
阅读全文
posted @
2008-06-13 23:07
万一
阅读(2564)
推荐(0) 编辑
再学 GDI+[33]: TGPPen - 画笔的几何变换 - SetTransform
摘要:几何变换也就是 Matrix 变换, 画笔的 Matrix 会忽略 dx、dy 平移参数; 选择 LineCapRound 线帽效果比较好. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialo...
阅读全文
posted @
2008-06-13 22:03
万一
阅读(1928)
推荐(0) 编辑
再学 GDI+[32]: TGPPen - 拐角长度的限制 - SetMiterLimit
摘要:拐角长度的限制的默认值是 10.0, 一般足够用了. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls; type TForm1 = cla...
阅读全文
posted @
2008-06-13 20:32
万一
阅读(1800)
推荐(0) 编辑
再学 GDI+[31]: TGPPen - 设置端点连接方式 - SetLineJoin
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox; ...
阅读全文
posted @
2008-06-13 19:32
万一
阅读(2289)
推荐(0) 编辑