trouble with format

[acp693]

Hi, I'm trying to use the format function to write integers and floats to a file, With the following code, I get the following compiler error:

unit1.pas(590,8) Error: Incompatible types: got "SmallInt" expected "AnsiString"

Any idea what I'm doing wrong, I lifted the code more or less directly from this reference:

http://www.freepascal.org/docs-html/rtl/sysutils/format.html

Thank you

Albert

Code: [Select]

Var
resfile:textfile;
 s1,s2,fmt:string;   
begin
AssignFile(resFile, 'spec.ini');
Rewrite(resFile);

Fmt:='[%10d]';
s1:=Format(Fmt,[10]);   //  <---  compiler complains here
 
Fmt:='[%10.4e]';
s2:=Format(Fmt,[1.234]);
writeln(resfile, s1, s2);

closefile(resfile); 
end;     
           


[Dibo]

Strange, working here (Linux, FPC 2.6.0 and 2.7.1)

Try this
1. Maybe it is namespace conflict (same Format function in other unit). Force it by:

s1 := SysUtils.Format(Fmt,[10]);

2. Maybe you have activated delphi mode in your unit?

[acp693]

Thanks a lot, that did it.

It now prints the numbers with square brackets around the numbers, how can I remove the brackets?

Best regards

Albert

[Dibo]

Just remove them

Fmt:='%10d';

They were added only for demonstration

[acp693]

Thank you, my brain doesn't work today... I was removing the square brackets from around the second argument in the format statement, and of course the compiler complained...

Thank you

Albert