Catatan Kuliah
PEMROGRAMAN KOMPUTER II
FILE TEXT File Teks berisi kumpulan dari karakter yang dibentuk dalam baris-baris yang masing-masing diakhiri dengan tanda akhir baris atau end of line (EOL) yang berupa karakter carriage return dan karakter line feed (CR/LF). Akhir dari file ditunjukkan oleh tanda akhir dari file atau end of file (EOF) yang berupa karakter controlZ (^Z). Panjang dari masing-masing baris dapat berbeda. File text dapat dilihat dengan menggunakan editor teks seperti, type, untuk DOS, notepad, untuk Window, atau software editor text lainnya. Narwen, M.Si / Jurusan Matematika FMIPA Unand
1
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
Fungsi atau prosedur yang dipakai dalam file text adalah sebagai berikut. 1. APPEND. Digunakan untuk membuka file text yang sudah ada untuk keperluan menambah, mengedit, atau menghapus isi dari suatu file. Bentuk umumnya seperti berikut. APPEND(var f : text);
Dalam hal ini, variabel f adalah file dengan tipe teks. Narwen, M.Si / Jurusan Matematika FMIPA Unand
2
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
2. WRITE / WRITELN Digunakan untuk mencetak atau merekam data ke dalam file. Bentuk umumnya adalah sebagai berikut. write(
v1 <,v2,...,vn>);
3. READ / READLN Digunakan untuk membaca satu atau lebih nilai-nilai dari file ke dalam satu atau lebih variabel. Bentuk umumnya adalah sebagai berikut. read( v1 <,v2,...,vn>); Narwen, M.Si / Jurusan Matematika FMIPA Unand
3
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
4. ASSIGN Digunakan untuk menghubungkan nama eksternal file dengan suatu variabel file. Bentuk umumnya adalah sebagai berikut. Assign();
5. REWRITE Digunakan untuk membuka file baru yang belum pernah ada sebelumnya. Jika file tersebut sudah ada, maka isinya akan terhapus dan dianggap baru. Bentuk umumnya adalah sebagai berikut. Rewrite(); Narwen, M.Si / Jurusan Matematika FMIPA Unand
4
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
6. RESET Digunakan untuk membuka file yang sudah ada yang disimpan pada media penyimpanan. Bentuk umumnya adalah sebagai berikut. Reset();
7. CLOSE Digunakan untuk menutup semua file yang pernah dibuka dengan Append, Rewrite, dan Reset. Bentuk umumnya adalah sebagai berikut. Close(); Narwen, M.Si / Jurusan Matematika FMIPA Unand
5
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
8. RENAME Digunakan untuk mengganti nama dari eksternal file. Bentuk umumnya adalah sebagai berikut. Rename();
9. EOF Digunakan untuk menentukan apakah posisi suatu file sudah berada diakhir file atau belum. Jika sudah berada diakhir file maka eof bernilai true dan jika belum bernilai false. Bentuk umumnya adalah sebagai berikut. Eof(); Narwen, M.Si / Jurusan Matematika FMIPA Unand
6
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
Aplikasinya. A. Membuat File Text Baru. 1. Deklarasikan variabel file dengan tipe text. 2. Hubungkan variabel file dengan eksternal file (assign). 3. Buka file text yang baru dengan rewrite. 4. Masukan data yang akan disimpan ke file sesuai dengan variabel-variabelnya dengan (read). 5. Simpan data yang ada variabel-variabelnya ke file dengan write/writeln. 6. Ulangi langkah 4 dan 5 bila ada data lain yang akan disimpan. 7. Tutup file bila operasi sudah selesai dengan close. Narwen, M.Si / Jurusan Matematika FMIPA Unand
7
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
B . Membuka File Text yang Sudah Ada. 1. Deklarasikan variabel file dengan tipe text. 2. Hubungkan variabel file dengan eksternal file (assign). 3. Buka file text yang baru dengan reset. 4. Baca data yang ada dalam file ke dalam variabelvariabelnya dengan (read). 5. Cetak variabel-variabel tersebut ke layar monitor. 6. Jika belum EOF maka ulangi langkah 4 dan 5. 7. Tutup file bila operasi sudah selesai dengan close.
Narwen, M.Si / Jurusan Matematika FMIPA Unand
8
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
Masalah : Bila file yang dibuka dengan rewrite sudah ada maka isi dari file tersebut akan terhapus. Solusi : Perlu suatu pengecekan apakah file yang akan dibuka sudah ada atau belum. Jika sudah ada maka tampilkan sebuah pesan. 1. Buka file dengan Reset. Bila file belum ada maka akan terjadi kesalahan dan proses berhenti. Agar tak dihentikan aktifkan dahulu compiler directive {$I+}. Kemudian kembalikan ke default {$I-}. 2. Kesalahan dari membuka file dapat diketahui dari fungsi IORESULT . Fungsi ini bernilai 0 bila tidak terjadi kesalahan dan 1 bila terjadi kesalahan. Tidak terjadi kesalahan, berarti file sudah. Untuk keamanan, sebaiknya ditampilkan sebuah pesan untuk menimpa file tersebut atau tidak. Narwen, M.Si / Jurusan Matematika FMIPA Unand
9
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
3. Bila file belum ada atau sudah ada tapi akan ditimpa maka file tersebut dibuka ulang dengan Rewrite.
C . Menampilan Data Tertentu. 1. Deklarasikan variabel file dengan tipe text. 2. Hubungkan variabel file dengan eksternal file (assign). 3. Buka file text yang baru dengan reset. 4. Tanyakan data yang akan dicari untuk ditampilkan. 5. Lakukan pencarian data dengan tahapan: - Baca data tiap baris dari file - Bandingkan data yang dicari dengan yang dibaca - Tampilkan data, bila data yang dibaca = data yang dicari - Bila belum eof, maka ulang langkah 5 di atas - Bila sudah eof dan data yang dibaca ≠ data yang dicari, maka tampilkan pesan data yang dicari tidak ada. 6. Tutup file bila operasi sudah selesai dengan close. Narwen, M.Si / Jurusan Matematika FMIPA Unand
10
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
C. Menambahkan Data. Langkah-langkah sama dengan membuat data baru, akan tetapi eksternal file dibuka dengan Append.
D. Mengkoreksi Data. 1. Deklarasikan variabel file dengan tipe text. 2. Hubungkan variabel file dengan eksternal file (assign). 3. Buka file text pertama untuk keperluan pembacaan dengan reset. 4. Buka file text kedua (dummy file) untuk keperluan penulisan. 5. Tanyakan data yang akan dicari untuk ditampilkan. 6. Lakukan pencarian data yang akan dikoreksi dengan tahapan: - Baca data tiap baris dari file dengan readln - Bandingkan data yang dibaca dengan data akan dikoreksi Narwen, M.Si / Jurusan Matematika FMIPA Unand
11
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
- Bila pembacaan sudah eof dan data yang dibaca ≠ data yang dicari, Tampilkan pemberitahuan “data yang dicari tidak ada di file”. - Bila belum eof, maka rekam data yang dibaca ke file kedua (dummy file) dan ulang langkah 6 di atas 7. Bila data yang dibaca = data yang akan dikoreksi, maka - Masukan data yang akan dikoreksi - Rekam data yang dikoreksi (dummy file) dengan writeln. - Baca data berikutnya dari file data dan rekamkan ke dummy file sampai akhir dummy file. 8. Tutup data dengan close bila operasi sudah selesai 9. Hapus data pertama dengan erase. 10. Ganti nama dummy file dengan nama file yang dihapus Narwen, M.Si / Jurusan Matematika FMIPA Unand
12
Catatan Kuliah
PEMROGRAMAN KOMPUTER II
Narwen, M.Si / Jurusan Matematika FMIPA Unand
13
