delphi – 有更简单的布尔转换方法吗?

前端之家收集整理的这篇文章主要介绍了delphi – 有更简单的布尔转换方法吗?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
在几乎所有的项目中,我都使用过这个场景,当我进行一些数据转换时,对于布尔值来说,简单来说,我有点失落。下面的这个声明在我的代码中像一个痛苦的拇指:
if BoolVal then
  StrVal:= 'True'
else
  StrVal:= 'False';

我想知道是否有更简单的方法来执行此评估?也许一些使用Case语句我不知道?我的实际实现比StrVal更复杂,但它的确包括返回两个不同的值,这取决于它是True还是False。例如,这里有一些真正的代码

if fsBold in Can.Font.Style then
  ConvertTo(AddSomeOtherText + 'True')
else
  ConvertTo(AddSomeOtherText + 'False');

这只是为了强调我希望多么简单。我想知道我是否可以按照这样做做点事情:

ConvertTo(AddSomeOtherText + BoolToStrCase((fsBold in Can.Font.Style),'True','False'));

我相信这不是一个真正的命令,但我正在一条线上寻找那种简单。

解决方法

在单位StrUtils中,有ifthen()
StrVal := IfThen(BoolVal,'False');

对于这种具体情况,您甚至可以使用:

StrVal := BoolToStr(BoolVal);
原文链接:https://www.f2er.com/delphi/103411.html

猜你在找的Delphi相关文章