出现is not a valid floating point value

出现is not a valid floating point value

就是说‘空字符串不是一个合法的浮点数’是所给的参数有问题，可能是记录被删除，访问了这条记录产生的错。

functionTEmbeddedWB．PrintMarginStr（M：Real）：PChar；

var

S：string；

begin

if printOptions.Measure <> RuntimeMeasure

thenbegin

ifRuntimeMeasure＝mMetricthen

s：＝FloatToStr（M＊InchToMetric）else

s：＝FloatToStr（M／InchToMetric）；

Result：＝PChar（S）；

endelseResult：＝PChar（FloatToStr（M））；

end；

扩展资料:

1、连接运算concat（s1，s2，s3…sn）相当于s1＋s2＋s3＋…＋sn．

例：concat（‘11’，＇aa’）＝＇11aa’；

2、求子串。Copy（s，I，I）从字符串s中截取第I个字符开始后的长度为l的子串。

例：copy（‘abdag’，2，3）＝’bda’

3、删除子串。过程Delete（s，I，l）从字符串s中删除第I个字符开始后的长度为l的子串。

例：s：＝’abcde’；delete（s，2，3）；结果s：＝’ae’

4、插入子串。过程Insert（s1，s2，I）把s1插入到s2的第I个位置

例：s：＝abc；insert（‘12’，s，2）；结果s：＝’a12bc’

参考资料来源：百度百科-字符串