如何在delphi Xe8中将标签文本设置为粗体
雷米
在Delphi XE8 firemonkey多设备项目中，如何将TLabel设置为Bold并返回正常运行时间？
我已经尝试过了，但是没有用：
label.TextSettings.Font.Style := [TFontStyle.fsBold];
还尝试了：
label.Font.Style := [TFontStyle.fsBold];
汤姆·布朗伯格
设置为label.StyledSettings.Stylefalse，则它将遵循Fontstyle设置。
这里有一个示例代码，StyledSettings.Style可以在其中切换代码（尽管我不记得我曾经玩过这些代码。对我而言，这是一开始的设置。）
procedure TForm6.Button9Click(Sender: TObject);
begin
if TStyledSetting.Style in Label3.StyledSettings then
Label3.StyledSettings := Label3.StyledSettings - [TStyledSetting.Style]
else
Label3.StyledSettings := Label3.StyledSettings + [TStyledSetting.Style]
end;
并切换 TextSettings.Font.Style
procedure TForm6.Button8Click(Sender: TObject);
begin
if TFontStyle.fsBold in Label3.TextSettings.Font.Style then
Label3.TextSettings.Font.Style := Label3.TextSettings.Font.Style - [TFontStyle.fsBold]
else
Label3.TextSettings.Font.Style := Label3.TextSettings.Font.Style + [TFontStyle.fsBold];
end;
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
如何在swift 4中将html字符串设置为标签时使用常规和粗体字体设置自定义字体？
- 2
如何在Stringgrid（delphi）中删除文本
- 3
如何在Stringgrid（delphi）中删除文本
- 4
如何在Delphi XE5中将输入限制为仅字母？
- 5
如何在Delphi XE2中将IDispatch转换为TOleServer？
- 6
如何在Delphi XE7中设置“版本信息”？[Delphi设计问题]
- 7
如何在Delphi 2007中安装Delphi Chromium Embedded？
- 8
Delphi：如何在Delphi中调用R函数（或集成R）？
- 9
Delphi：如何在Delphi中调用R函数（或集成R）？
- 10
如何在XE8中禁用Castalia？
- 11
Delphi XE8 idHttp Erromessage文本编码错误
- 12
如何在Delphi中调用CreateProcess？
- 13
如何在Delphi中模拟下拉表单？
- 14
如何在面板中显示Delphi表单？
- 15
如何在Delphi中阅读JPendingIntent？
- 16
如何在Delphi中打印表格
- 17
如何在Delphi中访问父表单
- 18
如何在Delphi中创建聊天标注
- 19
如何在delphi中调用WINAPI DsRoleGetPrimaryDomainInformation？
- 20
如何在Delphi中获得TEdit的画布？
- 21
如何在Delphi控件中实现接口
- 22
如何在Delphi中包含CocoaPods？
- 23
如何在Delphi中编写Debounce（）过程？
- 24
如何在Delphi中检查素数
- 25
如何在Delphi中创建聊天标注
- 26
如何在Delphi中绑定TObjectList
- 27
如何在Delphi中实现alloc（）？
- 28
如何在UILabel中将某些文本设置为粗体格式？
- 29
如何在delphi10中将字符串正确编码为UTF8？
我来说两句