摘要: 本例效果图: 代码文件: 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 万一 阅读(2565) 评论(6) 推荐(0) 编辑
摘要: 几何变换也就是 Matrix 变换, 画笔的 Matrix 会忽略 dx、dy 平移参数; 选择 LineCapRound 线帽效果比较好. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialo... 阅读全文
posted @ 2008-06-13 22:03 万一 阅读(1930) 评论(0) 推荐(0) 编辑
摘要: 拐角长度的限制的默认值是 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 万一 阅读(1802) 评论(0) 推荐(0) 编辑
摘要: 本例效果图: 代码文件: 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 万一 阅读(2291) 评论(0) 推荐(0) 编辑
摘要: 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) RadioGroup1: ... 阅读全文
posted @ 2008-06-13 16:34 万一 阅读(1751) 评论(0) 推荐(0) 编辑
摘要: 如果测试本博客提供的测试代码? 如果有 "代码文件" 和 "窗体文件", 四步走: 1、新建工程(一般是 VCL Forms Application); 2、进入代码页(一般是 Unit1), 全选, 把 "代码文件" 贴入; 3、在窗体设计状态下(Design), 通过右键菜单或 Alt+F12 进入 "窗体代码" 页, 全选, 把 "窗体文件" 贴入; 4、运行! 如果只有 "代码文件",... 阅读全文
posted @ 2008-06-13 15:23 万一 阅读(6829) 评论(9) 推荐(0) 编辑
摘要: 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) LabeledEdit1:... 阅读全文
posted @ 2008-06-13 13:51 万一 阅读(1962) 评论(0) 推荐(0) 编辑
摘要: 问题来源: http://www.cnblogs.com/del/archive/2008/06/12/1131232.html#1224216 首先, 实现这个问题有两种方法: 1、边擦边画; 2、先在内存绘图然后再复制到前台, 就是所谓的双倍缓存. 本例使用的是比较传统的 "边擦边画" 法, 但现在更提倡使用 "双倍缓存" 法. 本例效果图(实际的动画效果比这个 gif 要好一些): 代... 阅读全文
posted @ 2008-06-13 00:23 万一 阅读(2283) 评论(7) 推荐(0) 编辑