summaryrefslogtreecommitdiff
path: root/fpcdocs/refex/ex88.pp
blob: ac205439c9386ba7d5d2567fe7415b86bd5b1521 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program Example88;

{ Program to demonstrate the AssignFile and CloseFile functions. }

{$MODE Delphi}

Var F : text;

begin
  AssignFile(F,'textfile.tmp');
  Rewrite(F);
  Writeln (F,'This is a silly example of AssignFile and CloseFile.');
  CloseFile(F);
end.