万一 - 博客园

2008年6月10日

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

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

再学 GDI+[12]: 准备工作 - 矩形命中

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

posted @ 2008-06-10 01:49 万一阅读(1992) 评论(0) 推荐(0) 编辑

2008年6月9日

再学 GDI+[11]: DrawCurve - 绘制曲线

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

posted @ 2008-06-09 23:12 万一阅读(6610) 评论(2) 推荐(1) 编辑

判断字符串中子串个数的函数

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); end; v... 阅读全文

posted @ 2008-06-09 18:16 万一阅读(7397) 评论(24) 推荐(0) 编辑

再学 GDI+[10]: DrawClosedCurve - 绘制闭合曲线

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

posted @ 2008-06-09 17:01 万一阅读(3242) 评论(2) 推荐(1) 编辑

再学 GDI+[9]: DrawPolygon - 绘制多边形

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

posted @ 2008-06-09 10:58 万一阅读(5016) 评论(0) 推荐(0) 编辑

再学 GDI+[8]: DrawRectangles - 绘制一组矩形

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

posted @ 2008-06-09 10:43 万一阅读(2311) 评论(3) 推荐(0) 编辑

再学 GDI+[7]: DrawLines - 绘制一组直线

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

posted @ 2008-06-09 09:48 万一阅读(3086) 评论(0) 推荐(0) 编辑

再学 GDI+[6]: DrawPie - 绘制饼形

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

posted @ 2008-06-09 00:31 万一阅读(2925) 评论(1) 推荐(0) 编辑

2008年6月8日

再学 GDI+[5]: DrawArc - 绘制弧线

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

posted @ 2008-06-08 21:07 万一阅读(4018) 评论(4) 推荐(0) 编辑