mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-06-06 18:18:31 +02:00
13 lines
213 B
ObjectPascal
13 lines
213 B
ObjectPascal
Program Example70;
|
|
|
|
{ This program demonstrates the FmtStr function }
|
|
|
|
Uses sysutils;
|
|
|
|
Var S : AnsiString;
|
|
|
|
Begin
|
|
S:='';
|
|
FmtStr (S,'For some nice examples of fomatting see %s.',['Format']);
|
|
Writeln (S);
|
|
End. |