CloseFile
Moduł: System
procedure CloseFile(var F);
Procedura zamyka plik poprzednio otwarty przy pomocy Reset, Rewrite lub Append, z parametru F.
Przyklad:
program Foo;
{$APPTYPE CONSOLE}
var
TF: TextFile;
S: string;
begin
AssignFile(TF, 'C:\Foo.txt');
Reset(TF);
Readln(TF, S);
Writeln(S);
CloseFile(TF);
end.
Zobacz też:
Wstawilem opis CloseFile, ktora jest w module System, jednak gdy klikne na modul system nie ma tam odnosnika do tej procedury.
Do tego służy {{Cat:Kategoria}}