delphi DrawText 的用法

2019-08-13 15:03:41 阅读：282 来源： 互联网

标签：字符 delphi DrawText 正文用法 ELLIPSIS DT 矩形

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;

声明：非原创，只作为个人备忘和网友参考资料
　函数功能：该函数在指定的矩形里写入格式化文本，根据指定的方法对文本格式化（扩展的制表符，字符对齐、折行等）。

　　函数原型：int DrawText(HDC hdc, LPCTSTR lpString, int nCount, LPRECT lpRect, UINT uFormat)；

　　参数：

　　hdc：设备环境句柄。

　　lpString：指向将被写入的字符串的指针，如果参数nCount是-1，则字符串必须是以\0结束的。

　　如果uFormat包含DT_MODIFYSTRING，则函数可为此字符串增加4个字符，存放字符串的缓冲区必须足够大，能容纳附加的字符。

　　nCount：指向字符串中的字符数。如果nCount为-1，则lpString指向的字符串被认为是以\0结束的，DrawText会自动计算字符数。

　　lpRect：指向结构RECT的指针，其中包含正文将被置于其中的矩形的信息（按逻辑坐标）。

　　uFormat：指定格式化正文的方法。它可以下列值的任意组合，各值描述如下：

　　DT_BOTTOM：将正文调整到矩形底部。此值必须和DT_SINGLELINE组合。

　　DT_CALCRECT：决定矩形的宽和高。如果正文有多行，DrawText使用lpRect定义的矩形的宽度，并扩展矩形的底训以容纳正文的最后一行，如果正文只有一行，则DrawText改变矩形的右边界，以容纳下正文行的最后一个字符，上述任何一种情况，DrawText返回格式化正文的高度而不是写正文。

　　DT_CENTER：使正文在矩形中水平居中。

　　DT_VCENTER：使正文在矩形中垂直居中。

　　DT_EDITCONTROL：复制多行编辑控制的正文显示特性，特殊地，为编辑控制的平均字符宽度是以同样的方法计算的，此函数不显示只是部分可见的最后一行。

　　DT_END_ELLIPSIS或DT_PATH_ELLIPSIS：可以指定DT_END_ELLIPSIS来替换在字符串末尾的字符，或指定DT_PATH_ELLIPSIS来替换字符串中间的字符。如果字符串里含有反斜扛，DT_PATH_ELLIPSIS尽可能地保留最后一个反斜杠之后的正文。

　　DT_EXPANDTABS：扩展制表符，每个制表符的缺省字符数是8。

　　DT_EXTERNALLEADING：在行的高度里包含字体的外部标头，通常，外部标头不被包含在正文行的高度里。

　　DT_INTERNAL：用系统字体来计算正文度量。

　　DT_LEFT：正文左对齐。

　　DT_MODIFYSTRING：修改给定的字符串来匹配显示的正文，此标志必须和DT_END_ELLIPSIS或DT_PATH_ELLIPSIS同时使用。

　　DT_NOCLIP：无裁剪绘制当DT_NOCLIP使用时DrawText的使用会有所加快。

　　DT_NOPREFIX：关闭前缀字符的处理，通常DrawText解释助记前缀字符，&为给其后的字符加下划线，解释&&为显示单个&。指定DT_NOPREFIX，这种处理被关闭。

　　DT_RIGHT：正文右对齐。

　　DT_RTLREADING：当选择进设备环境的字体是Hebrew或Arabicf时，为双向正文安排从右到左的阅读顺序都是从左到右的。

　　DT_SINGLELINE：显示正文的同一行，回车和换行符都不能折行。

　　DT_TABSTOP：设置制表，参数uFormat的15"C8位（低位字中的高位字节）指定每个制表符的字符数，每个制表符的缺省字符数是8。

　　DT_TOP：正文顶端对齐（仅对单行）。DT_VCENTER：正文水平居中（仅对单行）。

　　DT_WORDBREAK：断开字。当一行中的字符将会延伸到由lpRect指定的矩形的边框时，此行自动地在字之间断开。一个回车一换行也能使行折断。

　　DT_WORD_ELLIPSIS：截短不符合矩形的正文，并增加椭圆。

　　注意：DT_CALCRECT, DT_EXTERNALLEADING, DT_INTERNAL, DT_NOCLIP, DT_NOPREFIX值不能和DT_TABSTOP值一起使用。

　　返回值：如果函数调用成功，返回值是正文的高度；如果函数调用失败，返回值是0。

　　Windows NT：若想获得更多错误信息，请调用GetLastError函数。

　　备注：函数DrawText用设备环境中的字体选择、正文颜色和背景颜色来写正文，除非DT_NOCLIP被使用，DrawText裁剪正文，所以它不会出现在指定矩形的外面，除DT_SINGLELINE格式化，其余的格式都认为正文有多行。

　　如果选择的字体对指定的矩形而言太大，DrawText不会试图去换成一种小字体。

　　Windows CE：如果为参数uFormat指定DT_CALCRECT值，必须为lpRect指向的RECT结构设置right和bottom成员。Windows CE不支持uFormat为DT_EXTERNALLEADING

标签：字符,delphi,DrawText,正文,用法,ELLIPSIS,DT,矩形
来源： https://www.cnblogs.com/blogpro/p/11345933.html

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

ICode9

delphi DrawText 的用法