Artikel ini adalah artikel terakhir terkait materi pembuatan program CBT dengan Delphi lanjutan dari artikel sebelumnya. Hal yang tidak kalah penting adalah menyimpan data pengguna yang mengerjakan CBT sekaligus menyimpan nilainya ke dalam file. Dalam artikel ini disajikan tentang bagaimana menginput dan menyimpan data pengguna ke dalam file beserta nilai akhirnya.
Di dalam artikel ini proses penginputan menggunakan fungsi InputQuery. InputQuery memilki tiga parameter. Parameter tersebut secara berurutan adalah sebagai berikut:
- Caption: Parameter ini berupa string yang muncul di bagian atas kotak dialog
- Prompt: Parameter ini berupa string yang muncul di atas inputan (TEdit) dalam kotak dialog
- Variabel String: Parameter ini berupa variabel bertipe string yang digunakan untuk menyimpan hasil yang diinputkan oleh pengguna.
Output dari fungsi ini berupa boolean. Jika pengguna sudah berhasil memasukkan apa yang diminta maka output-nya bernilai true, jika membatalkan berupa false. Lebih jelasnya mengenai posisi parameter dengan tampilan kotak dialog bisa dilihat pada Gambar 1.
Gambar 1. Posisi parameter di dalam kotak dialog |
Baik, kita mulai melakukan penambahan dan modifikasi program CBT sebelumnya. Karena di dalam tahapan ini ada penambahan data berupa nama mahasiswa dan NIM mahasiswa, maka di dalam interface, ditambahkan dua variabel berupa NamaMhs, dan NIMMhs dengan tipe String. Lebih jelasnya bisa dilihat di Gambar 2. Di dalam Gambar 2, ada dua variabel ditambahkan (berada di dalam kotak merah).
Gambar 2. Penambahan variabel NamaMhs dan NIMMhs |
Setelah menambahkan dua variabel tadi, hal yang tidak kalah penting adalah memberi nilai kedua variabel tadi. Pemberian nilai variabel tadi adalah saat menginputkan data NIM dan nama mahasiswa. Di dalam artikel ini proses penginputannya menggunakan fungsi InputQuery seperti dijelaskan di paragraf sebelumnya. Penambahan input ini dilakukan di sebuah prosedur FormCreate di mana saat form utama diciptakan. Lebih jelasnya bisa dilihat di Gambar 3.
Gambar 3. Penambahan input data NIM dan nama mahasiswa di dalam prosedur FormCreate |
Pada Gambar 3, ada dua baris ditambahkan (di dalam kotak merah). Di dalam baris tersebut menggunakan menggunakan perintah repeat until dengan kondisi didapat dari fungsi InputQuery. Karena kondisi merupakan hasil dari fungsi InputQuery, maka pengguna dipaksa harus mengisi data di InputQuery tesebut. Jika tidak maka akan diulang-ulang hingga diisi.
Setelah menambahkan input data NIM dan nama mahasiswa tersebut, maka yang dilakukan selanjutnya adalah bagaimana menyimpan data-data tersebut beserta nilainya ke dalam file luar. Di dalam program ini, keluaran berupa file hasil.txt.
Penulis menggunakan event OnClose untuk melakukan penyimpanan data, artinya, proses penyimpanan data dilakukan saat form utama ditutup. Langkah yang dilakukan adalah, aktifkan form design. Jika saat ini ada pada posisi editor kode program, maka pembaca bisa tekan F12 untuk pindah ke form design. Setelah masuk di form design, klik salah satu bagian form yang tidak ada VCL-nya untuk memilih form utama yang akan diedit event-nya.
Setelah itu perhatikan di Object Inspector, pastikan di situ yang aktif adalah form utama (biasanya Form1). Di dalam contoh yang penulis buat adalah Form3. Jika Object Inspector tidak muncul, pembaca bisa menggunakan tombol F11 untuk mengaktifkannya. Lebih jelasnya perhatikan Gambar 4.
Gambar 4. Posisi di dalam Object Inspector |
Setelah muncul seperti Gambar 4, pembaca silakan dobel klik pada event OnClose. Secara otomatis sebuah kode program dibuat oleh Delphi dan pembaca memasuki ke mode editor kode. Tambahkan kode yang dikotak merah ke dalam prosedur yang dibuat oleh Delphi seperti pada Gambar 5.
Gambar 5. Kode saat menyimpan ke file |
Di dalam Gambar 5, penulis membuat kode untuk menyimpan NIM mahasiswa, Nama mahasiswa dan nilai mahasiswa ke dalam file bernama Hasil.txt. Jika program dijalankan, maka setiap kali menutup program, file tersebut akan menyimpan hasil akhir beserta data pesertanya ke dalam file tersebut.
Selamat mencoba. Apabila ada pertanyaan silakan tuliskan di dalam komentar.
Terimakasih.
pak cara kerjanya seperti yang biasa di jelaskan sama pak kan??
BalasHapusYup, betul.
Hapusbagaimana membuat soal acak online dengan php dan mysql, ada tutorialnya pak?
BalasHapus