TPen的7种Style和16种Mode
- //TPen 的主要属性有四: Color、Width、Style、Mode
- {Color: 颜色}
- {Width: 宽度; 默认是 1; 如果赋予 <= 0 的值, 会使用默认值}
- {Style: 样式; Delphi 定义了笔样式枚举 TPenStyle, 包含以下样式:}
- psSolid = 0; {实线}
- psDash = 1; {段线; 要求笔宽<=1}
- psDot = 2; {点线; 要求笔宽<=1}
- psDashDot = 3; {线、点; 要求笔宽<=1}
- psDashDotDot = 4; {线、点、点; 要求笔宽<=1}
- psClear = 5; {不可见}
- psInsideFrame = 6; {实线; 但笔宽是向里扩展}
- psUserStyle = 7; {自定义, Delphi.Net 支持}
- psAlternate = 8; {交替, Delphi.Net 支持}
- //下面的例子依次展示了各种样式:
- var
- i,x,y,n: Integer;
- begin
- x := 10;
- y := 15;
- n := ClientWidth - 2*x;
- Canvas.Pen.Color := clRed;
- for i := 0 to 8 do
- begin
- Canvas.Pen.Style := TPenStyle(i);
- Canvas.MoveTo(x, y);
- Canvas.LineTo(x + n, y);
- y := y + 15;
- end;
- end;
//效果图:
- {Mode: 画笔与背景的颜色混合模式; Delphi 定义了模式枚举 TPenMode, 包含以下模式:}
- pmBlack {总是黑色}
- pmWhite {总是白色}
- pmNop {画笔无效}
- pmNot {背景色取反}
- pmCopy {画笔设置的颜色}
- pmNotCopy {画笔颜色取反}
- pmMergePenNot {画笔颜色与背景颜色的反色的组合}
- pmMaskPenNot {画笔颜色与背景公共色的反色的组合}
- pmMergeNotPen {画笔颜色取反后与背景颜色的组合}
- pmMaskNotPen {画笔的反色与背景的公共色的组合}
- pmMerge {画笔颜色与背景颜色的组合}
- pmNotMerge {pmMerge 的反色}
- pmMask {画笔与背景公共颜色的组合}
- pmNotMask {pmMask 的反色}
- pmXor {画笔颜色与背景颜色的 Xor 组合}
- pmNotXor {pmXor 的反色}
- //颜色模式测试程序:
- var
- i,x,y,w,n: Integer;
- begin
- {先画竖的颜色背景}
- x := 0;
- y := 0;
- w := ClientWidth div 18;
- for i := 0 to 18 do
- begin
- Canvas.Brush.Color := PaletteIndex(i);
- Canvas.FillRect(Rect(x, y, x+w, ClientHeight));
- x := x + w;
- end;
- {再按不同模式依次画 16 条红色的横线}
- x := 0;
- y := 20;
- n := ClientWidth;
- Canvas.Pen.Width := 4;
- Canvas.Pen.Color := clRed;
- for i := 0 to 15 do
- begin
- Canvas.Pen.Mode := TPenMode(i);
- Canvas.MoveTo(x, y);
- Canvas.LineTo(x + n, y);
- y := y + 20;
- end;
- end;
//效果图:
:
TPen的7种Style和16种Mode的更多相关文章
- 16种基于 CSS3 & SVG 的创意的弹窗效果
在去年,我给大家分享了<基于 CSS3 的精美模态窗口效果>,而今天我要与大家分享一些新鲜的想法.风格和趋势变化,要求更加适合现代UI的不同的效果.这组新模态窗口效果包含了一些微妙的动画, ...
- 入口点函数的19种消息,AcRxArxApp只处理16种。
AcRx::AppMsgCode一共有19种消息. 但由IMPLEMENT_ARX_ENTRYPOINT宏实现的App类,只处理了16种消息. 缺: kSuspendMsg = 16, kIni ...
- Web桌面应用框架3:Web桌面应用开发的N种Style
研究Web桌面应用开发有一段时间了,总结了Web桌面应用开发的一些主流方式. 一.前端Style 这种方式的就是直接实现一个Web程序,再封装一个浏览器展示,相当粗暴和有效.著名的框架就是Electr ...
- STL——容器(Set & multiset)编译器提供的16种构造(挖个坑)
Set & multiset 在vs2019编译器中提供了16种构造方法 1.默认的无参构造 2.比较容器内容,key_comp()函数返回一个比较key的函数. 3.使用迭代器的区间拷贝,拷 ...
- 将一种cell当做几种cell使用
将一种cell当做几种cell使用 将一种cell当做几种cell用是有着一些意义的,比如,有时候,不同的cell之间差异很小,如果再派生一个cell出来,就会显得很麻烦,这时候,将这个cell当做几 ...
- 【页面传值6种方式】- 【JSP 页面传值方法总结:4种】 - 【跨页面传值的几种简单方式3种】
阅读目录 1. URL 链接后追加参数 2. Form 3. 设置 Cookie 4. 设置 Session JSP 页面间传递参数是项目中经常需要的,这应该算是 web 基本功吧. 试着将各种方式总 ...
- 20Mybatis_订单商品数据模型_一对一查询——resultType和resultMap两种方式以及两种方式的总结
上一篇文章分析了数据模型,这篇文章就给出一个需求,这个需求是一对一查询,并完成这个需求. ------------------------------------------------------- ...
- curl文件上传有两种方式,一种是post_fileds,一种是infile
curl文件上传有两种方式,一种是POSTFIELDS,一种是INFILE,POSTFIELDS传递@实际地址,INFILE传递文件流句柄! );curl_setopt($ch, CURLOPT_PO ...
- thinkphp 的两种建构模式 第一种一个单入口里面定义两个模块,前台和后台,函数控制模块必须function.php前台加载前台模块的汉书配置文件,后台加载后台模块的汉书配置文件,公共文件共用。第二种架构模式两个单入口文件,分别生成两个应用定义define。。。函数可以定义配置文件。。。。
thinkphp 的两种建构模式 第一种一个单入口里面定义两个模块,前台和后台,函数控制模块必须function.php前台加载前台模块的汉书配置文件,后台加载后台模块的汉书配置文件,公共文件共用. ...
随机推荐
- HTML5 canvas 在线画笔绘图工具(三)
组装画板(TDrawBuilder) 在这一小节中我们要把工具条和画板组装起来,让他们可以协同进行工作. 画板通过一个命名为TDrawBuilder来进行组装.在详细讲解TDrawBuilder对象之 ...
- Eddy's research I
Eddy's research I Time Limit: 2000/1000 MS (Java/Others) Memory Limit: 65536/32768 K (Java/Others ...
- jQuery的touchstart,touchmove,touchend的获取位置
$('#webchat_scroller').on('touchstart',function(e) { var touch = e.originalEvent.targetTouches[0]; v ...
- webview的一些问题
一些小问题. Webview 里面的网页,如果有 input ,需要输入,但是点上去却没反应,输入法不出来.这种情况是因为 webview 没有获取焦点.需要在 java 里面给 webview 设置 ...
- 只有勇敢的人、鲁莽的人和绝望的人才会追求大的变革 – D.J. Anderson
只有勇敢的人.鲁莽的人和绝望的人才会追求大的变革 – D.J. Anderson http://www.cnblogs.com/lchrennew/p/Why-The-Future-Of-Agile- ...
- 10453 Make Palindrome (dp)
Problem A Make Palindrome Input: standard input Output: standard output Time Limit: 8 seconds By def ...
- (十一)boost库之多线程间通信
(十一)boost库之多线程间通信 1.互斥锁 在编程中,引入了对象互斥锁的概念,来保证共享数据操作的完整性.每个对象都对应于一个可称为" 互斥锁" 的标记,这个标记用来保证在任一 ...
- cf466C Number of Ways
C. Number of Ways time limit per test 2 seconds memory limit per test 256 megabytes input standard i ...
- linux的7种运行级别<学习笔记>
Linux系统有7个运行级别(runlevel) 运行级别0:系统停机状态,系统默认运行级别不能设为0,否则不能正常启动 运行级别1:单用户工作状态,root权限,用于系统维护,禁止远程登陆 运行级别 ...
- hdu 1241 Oil Deposits_dfs or bfs
题意:给你n*m的图,@代表有油田的格子,*代表没油田的格子,如果油田旁边有油田就合并一起成为一个油田区,合并的方向为8个,现在问你油田合并过后,有多少个油田区 解法:用dfs or bfs dfs: ...