delphi中的STR函数如何用

str函数是VB的一种函数，可以将数字型变量或常量改变成字符型变量或常量。
　　功能：返回代表一数值的Variant (String)。

　　语法：Str(number)
　　必要的 number 参数为一 Long，其中可包含任何有效的数值表达式。

　　说明：当一数字转成字符串时，总会在前头保留一空位来表示正负。如果 number 为正，返回的字符串包含一前导空格暗示有一正号。
　　使用 Format 函数可将数值转成必要的格式，如日期、时间、货币或其他用户自定义格式。与 Str 不同的是，Format 函数不包含前导空格来放置 number 的正负号。
　　注意 Str 函数只视句点 (.) 为有效的小数点。如果使用不同的小数点（例如，国际性的应用程序），可使用 CStr 将数字转成字符串。

　　示例：本示例使用 Str 函数来将一个数字转成字符串。当数字转成字符串时，字符串的第一个位一定是空格或是正负号。
　　Dim MyStringMyString = Str(459) ' 返回 " 459"。MyString = Str(-459.65) ' 返回 "-459.65"。MyString = Str(459.001) ' 返回 " 459.001"。

str(a,s);//将a转化为字符串,并传给s;
你的例子是,将area转化为字符串,传给str1

补充:
帮你问了下:
8表示这个数占多少个字符，如果结果的字符长度小于这个数，则自动把结果占满指定位数且右对齐。
3是取小数位3位,即精确到小数位3位.

例子：
a := 1.23
writeln(a:8:3)

结果(前面三个空格):
1.230