blob: bea369535157ad157215a3bd977466abedff1d38 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
Program Example80;
{ This program demonstrates the StrFmt function }
Uses sysutils;
Var S : AnsiString;
Begin
SetLEngth(S,80);
Writeln (StrLFmt (@S[1],80,'For some nice examples of fomatting see %s.',['Format']));
End.
|
