mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-07 07:12:44 +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. |