Delphi assignfile - Procedura atribuie o valoare filehandle valoare filename în pregătirea

Procedura AssignFile atribuie valoarea filehandle valoare NumeFișier în curs de pregătire pentru citirea sau scrierea fișierului.

Este nevoie de tipul de variabilă ca un descriptor de fișier text. Când a deschis este tratată ca fișier textfile.

Dacă numele fișierului este un șir gol, atunci fișierul de acces osushestvlyaetsya prin fluxuri de intrare și de ieșire standard.

Este nevoie de un tip de fișier binar ca un descriptor. Fișierul este tratat ca un fișier binar.

În ambele cazuri, atunci când fișierul este deschis cu Append. Resetarea sau rescriere a presupus că este în directorul curent.

Filehandle nu trebuie confundat cu descriptor de fișier utilizat pentru fișierul nivel scăzut de a face subrutine de tip FileOpen și FileRead.

Append Deschide un fișier text pentru a adăuga intrări la dosar (adăugate la dosar)

AssignPrn Manere imprimantă ca un fișier text - un mod simplu de a imprima text

Fișier Definește un fișier dactilografiat sau netipizat

Reinițializare Deschide un fișier text pentru citire, sau un fișier binar pentru citire / scriere

Rescrierea Deschideți un text sau un fișier binar pentru scriere

Textfile Declară un tip de fișier pentru a salva șirul text

Exemplu de cod. Scrie într-un fișier text, și apoi citiți conținutul

var
FișierulMeu. textfile;
text. șir de caractere;

începe
// Încercați să deschideți fișierul test.txt pentru scris
AssignFile (FișierulMeu, 'test.txt');
Rescriem (FișierulMeu);

// scrie câteva cuvinte bine cunoscute la acest fișier
WriteLn (FișierulMeu, 'Hello');
WriteLn (FișierulMeu, 'lume');

// Închideți fișierul
CloseFile (FișierulMeu);

// Redeschiderea fișierul pentru citire
Reset (FișierulMeu);

// Afișează conținutul fișierului
în timp ce nu EOF (FișierulMeu) do
începe
Readln (FișierulMeu, text);
ShowMessage (text);
se încheie;

// Închideți fișierul pentru ultima oară
CloseFile (FișierulMeu);
se încheie;