Bài 15: Thao tác với tệp

BÀI 15. THAO TÁC VỚI TỆP

1. Thao tác với tệp văn bản

a. Khai báo

- Cấu trúc: Var <tên biến tệp>: text

- Ví dụ: Var tep1, tep2: text;

b. Thao tác với tệp

- Gắn tên tệp: Assign(<biến tệp>,<tên tệp>);

- Mở tệp mới: Rewrite(<biến tệp>);

- Mở tệp đã có: Reset(<biến tệp>);

- Ghi dữ liệu vào tệp: Write(<biến tệp>,<danh sách kết quả>); hoặc Writeln(<biến tệp>,<danh sách kết quả>);

- Đọc tệp: Read(<biến tệp>,<danh sách biến>); hoặc Readln(<biến tệp>,<danh sách biến>);

- Đóng tệp: Close(<biến tệp>);

- Hàm EOF, EOLN

• Eof(<biến tệp>) có giá trị true nếu con trỏ tệp đang ở cuối tệp.
• Eoln(<biến tệp>) có giá trị true nếu con trỏ tệp đang ở cuối dòng.

2. Các thao tác cơ bản khi xuất nhập file

Ghi dữ liệu vào file	Đọc dữ liệu từ file
ASSIGN(f,FileName);   REWRITE(f);   ...   WRITE(f,value);   ...   CLOSE(f);	ASSIGN(f,FileName);   RESET(f);   ...   While Not EOF(f) Do   Begin        READ(f,x);        ...   End;   ...   CLOSE(f);