首页 > 其他分享 >delphi Format格式化函数

delphi Format格式化函数

时间:2023-05-17 11:37:12浏览次数:40  
标签:返回 12 格式化 Format delphi Args 整型

delphi Format格式化函数

Format是一个很常用,却又似乎很烦的方法,本人试图对这个方法的帮助进行一些翻译,让它有一个完整的概貌,以供大家查询之用:

 

首先看它的声明:

function Format(const Format: string; const Args: array of const): string; overload;

 

事实上Format方法有两个种形式,另外一种是三个参数的,主要区别在于它是线程安全的,

但并不多用,所以这里只对第一个介绍:

function Format(const Format: string; const Args: array of const): string; overload;

 

Format参数是一个格式字符串,用于格式化Args里面的值的。Args又是什么呢,

它是一个变体数组,即它里面可以有多个参数,而且每个参数可以不同。

如以下例子:

 

Format('my name is %6s',['wind']);

返回后就是my name is wind

 

现在来看Format参数的详细情况:

Format里面可以写普通的字符串,比如'my name is',但有些格式指令字符具有特殊意义,比如"%6s"格式指令具有以下的形式:

"%" [index ":"] ["-"] [width] ["." prec] type

它是以"%"开始,而以type结束,type表示一个具体的类型。中间是用来

格式化type类型的指令字符,是可选的。

 

先来看看type,type可以是以下字符:

d 十制数,表示一个整型值

u 和d一样是整型值,但它是无符号的,而如果它对应的值是负的,则返回时是一个2的32次方减去这个绝对值的数,如:

Format('this is %u',[-2]);

返回的是:this is 4294967294

 

f 对应浮点数

e 科学表示法,对应整型数和浮点数,比如

Format('this is %e',[-2.22]);

返回的是:this is -2.22000000000000E+000,等一下再说明如果将数的精度缩小

 

g 这个只能对应浮点型,且它会将值中多余的数去掉,比如

Format('this is %g',[02.200]);

返回的是:this is 2.2

 

n 只能对应浮点型,将值转化为号码的形式。看一个例子就明白了

Format('this is %n',[4552.2176]);

返回的是this is 4,552.22

 

注意有两点,一是只表示到小数后两位,等一下说怎么消除这种情况, 二是,即使小数没有被截断,它也不会也像整数部分一样有逗号来分开的

 

m钱币类型,但关于货币类型有更好的格式化方法,这里只是简单的格式化,另外它只对应于浮点值

Format('this is %m',[9552.21]);

返回:this is ¥9,552.21

 

p 对应于指针类型,返回的值是指针的地址,以十六进制的形式来表示

例如:

var X:integer;

p:^integer;

begin

X:=99;

p:=@X;

Edit1.Text:=Format('this is %p',[p]);

end;

Edit1的内容是:this is 0012F548

 

s 对应字符串类型,不用多说了吧

x 必须是一个整形值,以十六进制的形式返回

Edit1.Text:=Format('this is %X',[15]);

返回是:this is F

 

类型讲述完毕,下面介绍格式化Type的指令:

[index ":"]这个要怎么表达呢,看一个例子

Format('this is %d %d',[12,13]);

其中第一个%d的索引是0,第二个%d是1,所以字符显示的时候是这样 this is 12 13

 

而如果你这样定义:

Format('this is %1:d %0:d',[12,13]);

那么返回的字符串就变成了this is 13 12。现在明白了吗,[index ":"] 中的index指示Args中参数显示的顺序还有一种情况,如果这样

Format('%d %d %d %0:d %d', [1, 2, 3, 4])

将返回1 2 3 1 2。

 

如果你想返回的是1 2 3 1 4,必须这样定:

Format('%d %d %d %0:d %3:d', [1, 2, 3, 4])

 

但用的时候要注意,索引不能超出Args中的个数,不然会引起异常如

Format('this is %2:d %0:d',[12,13]);

由于Args中只有12 13 两个数,所以Index只能是0或1,这里为2就错了[width] 指定将被格式化的值占的宽度,看一个例子就明白了

 

Format('this is %4d',[12]);

输出是:this is 12,这个是比较容易,不过如果Width的值小于参数的长度,则没有效果。

如:

 

Format('this is %1d',[12]);

输出是:this is 12

 

["-"]这个指定参数向左齐,和[width]合在一起最可以看到效果:

Format('this is %-4d,yes',[12]);

输出是:this is 12 ,yes

 

["." prec] 指定精度,对于浮点数效果最佳:

Format('this is %.2f',['1.1234]);

输出 this is 1.12

Format('this is %.7f',['1.1234]);

输出了 this is 1.1234000

 

而对于整型数,如果prec比如整型的位数小,则没有效果反之比整形值的位数大,则会在整型值的前面以0补之

Format('this is %.7d',[1234]);

输出是:this is 0001234]

 

对于字符型,刚好和整型值相反,如果prec比字符串型的长度大则没有效果,反之比字符串型的长度小,则会截断尾部的字符

Format('this is %.2s',['1234']);

输出是 this is 12,而上面说的这个例子:

 

Format('this is %e',[-2.22]);

返回的是:this is -2.22000000000000E+000,怎么去掉多余的0呢,这个就行啦

 

Format('this is %.2e',[-2.22]);

标签:返回,12,格式化,Format,delphi,Args,整型
From: https://www.cnblogs.com/lucken2000/p/17408061.html

相关文章

  • Delphi-Delphi通过管道执行外部命令行程序(cmd)并获取返回结果
     相关资料:https://www.shuzhiduo.com/A/gGdXxNGmd4/     Delphi通过管道执行外部命令行程序(cmd)并获取返回结果实例代码:unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics,Vcl.......
  • delphi Pascal yolov5 deepsort 目标检测 目标跟踪,支持onnxruntime、dnn、openvino和t
    delphiPascalyolov5deepsort目标检测目标跟踪,支持onnxruntime、dnn、openvino和tensorrt推理yolov5,使用c++封装成dll,delphi调用封装好的dll,实现目标检测和跟踪ID:212600676471966472......
  • 格式化Ubuntu系统后直接进入Grub
    问题描述:我的电脑装了Win10,Ubuntu18.04和Ubuntu20.04,在格式化Ubuntu18.04所在分区后,开机就进入Grub。分析:按F2进入BIOS,调整WindowsBootloader到第一位,Win10仍然能正常启动。若将Ubuntu置于顶端,则进入Grub。估计是因为Ubuntu的开机引导也被一并清理掉了,需要重设开......
  • 如何使用prettier全局格式化文件
    安装prettier如果你还没有安装prettier,你可以使用以下命令安装它:npminstall-gprettier进入需要格式化的文件夹在命令行中进入需要格式化的文件夹。 格式化文件使用以下命令批量格式化所有JavaScriptvue文件:prettier--write"src/**/*.js"prettier--write"src/**/*.......
  • python {} format
    用来按照你的需求格式化输出各种字符,比如"{:#06x}".format(i)。首先,我们需要知道,都是"{}".format()格式,大括号中的内容就是指定格式化的样式,以:开头。常见的有:标志意义:<左对齐:>右对齐:^居中:=把标志放到左边,后面可以跟数字,表示中间空多少位置:+在数......
  • 多次重新初始化hadoop namenode -format后,DataNode或NameNode没有启动
    多次重新初始化hadoopnamenode-format后,DataNode或NameNode没有启动在搭建完hadoop集群后,需要对主节点进行初始化(格式化)其本质是清理和做一些准备工作,因为此时的HDFS在物理上还是存在的。而且主节点格式化操作只能进行一次。当我们不小心多次初始化,会导致启动hadoop集群时,主......
  • Delphi XE2 新增 System.Zip 单元, 可用一句话压缩整个文件夹了
    单元内主要就是TZipFile类,最方便使用的是它的类方法:TZipFile.ExtractZipFile()   //解压Zip文件到指定文件夹TZipFile.IsValid()       //判断指定文件是否是有效的Zip文件TZipFile.ZipDirectoryContents()//压缩指定路径下的所有文件测试:u......
  • 关于 Delphi 中流的使用 压缩与解压缩的函数
    unitUnit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls;type TForm1=class(TForm)  Button1:TButton;  Button2:TButton;  procedureButton1Click(Sender:TObject); ......
  • 关于 Delphi 中流的使用 分割与合并文件的函数
    unitUnit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls;type TForm1=class(TForm)  Button1:TButton;  Button2:TButton;  procedureButton1Click(Sender:TObject); ......
  • 关于 Delphi 中流的使用 用流读写结构化文件
    unitUnit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls;type TForm1=class(TForm)  Memo1:TMemo;  {添加Memo显示内容}  Button1:TButton;  Button2:TButton; ......