请问:怎样将编辑框中的字体是否是粗体转换为布尔型?

您所在位置：社区首页 — Delphi讨论区 — 请问:怎样将编辑框中的字体是否是粗体转换为布尔型?

主题：请问:怎样将编辑框中的字体是否是粗体转换为布尔型?

wt_yxs [专家分：50] 发布于 2007-08-31 11:55:00

如题,谢谢

沙发

wt_yxs [专家分：50] 发布于 2007-08-31 13:57:00

checkbox1.Checked :=edit1.Font.Style=[fsbold] ;

板凳

长尾兔 [专家分：3630] 发布于 2007-08-31 16:08:00

楼主自己的答案思路是正确的，但是不严密。因为字体有时不仅仅设置为粗体，而且设置为斜体、下划线.....。所以，按下面这样更好一些：

Checkbox1.Checked := fsBold in Edit1.Font.Style;

3 楼

punkrocker [专家分：720] 发布于 2007-08-31 16:18:00

if fsbold in edt1.font.style then
showmessage('cu')
else
showmessage('xi');

您尚未登录，请登录后再回复。点此登录或注册