Delphi SysUtils.BoolToStr -将布尔值转换为字符串。
Delphi SysUtils.BoolToStr -将布尔值转换为字符串。
原型:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | function BoolToStr(B: Boolean ; UseBoolStrs: Boolean = False ): string ; const cSimpleBoolStrs: array [ boolean ] of String = ( '0' , '-1' ); begin if UseBoolStrs then begin VerifyBoolStrArray; if B then Result := TrueBoolStrs[ 0 ] else Result := FalseBoolStrs[ 0 ]; end else Result := cSimpleBoolStrs[B]; end ; |
参数:
B UseBoolStrs 值
true false 1
true true The first string in TrueBoolStrs (default ‘TRUE’)
false false 0
false true The first string in FalseBoolStrs (default 'FALSE')
使用示例:
1 2 3 4 | ShowMessage( 'True: ' +BoolToStr( True )); //-1 ShowMessage( 'False: ' +BoolToStr( False )); //0 ShowMessage( 'True: ' +BoolToStr( True , True )); //True ShowMessage( 'False: ' +BoolToStr( False , True )); //False |
创建时间:2022.07.08 更新时间:
博客园 滔Roy https://www.cnblogs.com/guorongtao 希望内容对你有所帮助,谢谢!
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· 无需6万激活码!GitHub神秘组织3小时极速复刻Manus,手把手教你使用OpenManus搭建本
· C#/.NET/.NET Core优秀项目和框架2025年2月简报
2020-07-08 SQL SERVER 两表比对更新、插入字段写法
2019-07-08 Delphi Locate函数[1] - 查询、定位
2019-07-08 奇怪桌面图标“血饮传说” 来自哪里