WinAPI: SetTextColor
来源:互联网 发布:北京城市规划 知乎 编辑:程序博客网 时间:2024/05/16 06:34
//声明:DrawText( hDC: HDC; {设备句柄} lpString: PChar; {文本} nCount: Integer; {要绘制的字符个数; -1 表示全部} var lpRect: TRect; {矩形结构} uFormat: UINT {选项}): Integer; {返回文本高度}//uFormat 参数的可选值:DT_TOP = 0; {顶对齐, 须 or DT_SINGLELINE}DT_LEFT = 0; {左对齐}DT_CENTER = 1; {水平居中}DT_RIGHT = 2; {右对齐}DT_VCENTER = 4; {垂直居中, 须 or DT_SINGLELINE}DT_BOTTOM = 8; {底对齐, 须 or DT_SINGLELINE}DT_WORDBREAK = $10; {给超出边界的单词换行; 如果 SetTextAlign 函数设置了 TA_UPDATECP, 这里的设置无效}DT_SINGLELINE = $20; {单行文本}DT_EXPANDTABS = $40; {扩展制表符, 默认制表跨 8 个字符}DT_TABSTOP = $80; {TAB 后添加的字符数}DT_NOCLIP = $100; {使文本不限制在指定的矩形内}DT_EXTERNALLEADING = $200; {返回的高度包括字体的外部行距}DT_CALCRECT = $400; {自动检测容纳文本的矩形的高度和宽度, 并返回高度, 但文本不被绘制}DT_NOPREFIX = $800; {不处理前缀字符(&); 默认时, & 后的字符会被添加下划线}DT_INTERNAL = $1000; {用系统字体来计算文本高度}DT_HIDEPREFIX = $00100000; {隐藏下划线}DT_PREFIXONLY = $00200000; {将 & 解释为前缀}//举例:procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);var MyRect: TRect;const str = '万一的 Delphi 博客';begin MyRect.Left := X; MyRect.Top := Y; MyRect.Right := X + 100; MyRect.Bottom := Y + 100; DrawText(Canvas.Handle, str, -1, MyRect, DT_LEFT);end;
阅读全文
0 0
- WinAPI: SetTextColor
- winApi一日一练之 SetTextColor (和Textout)函数
- SetTextColor
- setTextColor
- setTextColor
- WINAPI
- WINAPI
- WINAPI
- WINAPI
- WINAPI
- WINAPI
- WinAPI
- SetTextColor函数
- android setTextColor
- setTextColor属性
- setTextColor Android
- setTextColor设置
- SetTextColor函数
- WinAPI: TextOut
- “JTAG Warning: T-bit of XPSR is 0 but should be 1. Changed to 1.” 解决方案
- 光盘
- PHP关于文件下载方面知识的总结(包括图片,文件等)
- Oracle用户登录密码过期的修改
- WinAPI: SetTextColor
- 网络
- 沉浸式
- 先码后看 通俗易懂的Spring AOP原理 侵立删
- 项目常见错误及解决方法-angular表单验证清除$dirty样式问题
- 机器学习算法汇总
- 1秒10亿数据! 阿里云日志服务再次升级
- SQLServer: 解决“错误15023:当前数据库中已存在用户或角色”
- 解剖 Nginx ·自动脚本篇(1)解析配置选项脚本 auto/options