CETAK KE PRINTER DAN LAYAR MONITOR DALAM M vfr9.0
Dalam aplikasi program ini, dibuat dua form dan satu file report, form yang pertama diberi nama FormCetakSiswa, untuk memilih mencetak ke printer dan melihat di layar monitor. Sedang form yang kedua adalah FormLayar untuk menampung file report yang telah dibuat dan di beri nama ReportSiswa untuk menampung data Siswa yang akan di cetak ke printer atau ke layar monitor. Propertinya adalah sebagai berikut :
OBJEK PROPERTI NILAI
Lanel1 Caption SISWA
Label1 AutoSize T (true)
Label1 FontSize 16
Label1 FontBold T (true)
Shape1 Name Shape1
Cmd1 Caption Layar
Cmd1 Name CmdLayar
Cmd1 FontBold T (true)
Cmd2 Caption Printer
Cmd2 Name CmdPrinter
Cmd2 FontBold T (true)
Cmd3 Caption SetUp Printer
Cmd3 Name CmdSetup
Cmd3 FontBold T (true)
Form1 Caption CETAK SISWA
Form1 ShowWindow 1 (in Top Level Form)
Form1 Windowtype 1 Modal
Form1 CotrolBox F (false)
Form1 BorderStyle 1 FixedSingle
Untuk properti Layar adalah sebagai berikut :
.jpg)
OBJEK PROPERTI NILAI
Form1 Caption Form Lihat Siswa
Form1 ShowWindow 1 (In Top Level Form)
Form1 WindowType 1 Modal
Form1 ControlBox F (false)
Form1 BorderStyle 1 FixedSingle
MEMBUAT REPORT SISWA
Report (laporan) nantinya akan digunakan dalam form CetakSiswa, cara pembuatanya adalah sebagai berikut :
1. Dalam Keadaan Project PrgSiswa Terbuka.
2. Klik Report...
3. Klik New...
4. Maka akan muncul New Report....Kemudian klik New Report.
Maka pada Report Desaigner ini kita siap memuat ReportSiswa dengan memakai file tabel Siswa.dbf. Untuk report Siswa dapat memakai data dari tabel Siswa.dbf maka harus kita hubungkan terlebih dahulu.
MENGHUBUNGKAN TABEL YANG DI PAKAI REPORT
Report yang kita buat diberi nama ReportSiswa, nantinya akan digunakan dalam form CetakSiswa. Langkahnya adalah sebagai berikut :
1. Klik kanan di bawah Page Footer pada Report Designer.
2. Pilih Data Environment....
3. Klik kana di area Data Environmet.
4. Pilih Add...
5. Klik Siswa (File tabel yang dihubungkan)
6. Klik Add....
7. Tutup Data Environment, dengan mengklik ikon Close.
MERANCANG TAMPILAN REPORT SISWA
Dalam rancangan ReportSiswa kita menggunakan Toolbar ReportControl dan harus mengaktifkanya terlebih dahulu.
Didalam ReportControl tersebut diantanya adalah :
Select Objec = Untuk memilih objek yang akan di gunakan
Label = Untuk membuat label (tulisan)
Field = Untuk memasukkan field atau variabel
Line = Untuk membuat garis
Rectangle = Untuk menggambar bidang segi empat
RoundedRectangle= Untuk membuat bidang persegi delapan
Picture/Active X = Untuk gambar dan file yang mendukung OLE
ButtonLock = Untuk mengunci
.jpg)
MEMBUAT NOMOR HALAMAN
Nomor halaman report adalah nomor yang menunjukkan nomor halaman. Jika halaman berganti, nomor halamanya juga ikut bergerak. Caranya adalah sebagai berikut :
1. Klik ikon Field.
2. Tempatkan di sebelah kanan Label Hal.
3. Klik tombol Browse atau....di sebelah kanan Expression.
4. Di Variables pilih...._Pageno dengan mengklik ganda objek tersebut.
5. Klik OK.
MEMBUAT TANGGAL REPORT SISWA
Tanggal Report adalah tanggal yang menunjukkan report yang di cetak atau di lihat. Cara membuatnya adalah sebaga berikut :
1. Klik ikon Field.
2. Tempatkan di sebelah kanan Label DI CETAK PADA TANGGL.
3. KETIK DI Expression : DTOC(DATE())
4. Klik OK...
MEMBUAT NOMOR URUT
Membuat nomor urut siswa, adalah sebagai berikut :
1. Pilih Menu Report...Variables...
2. Klik Add
3. Ketik di Variable Name : No pada report Variable.
4. Klik OK.
5. Pilih Calculation Type : Count.
6. Klik cek list release after report.
7. Klik OK.
8. Klik ikon Field.
9. Tempatkan di bawah label NO pada ReportSiswa.
10. Klik Tombol Browse atau....di senelah kanan Expression.
11. Di Varibles Pilih NO dengan mengklik ganda.
12. Klik OK.
MEMBUAT NIS DI REPORT
NIS diambil dari filed Nis. Tahapanya adalah :
1. Klik kanan di area page footer.
2. Pilih data environment...
3. Klik kanan di data environment report designer.
4. Pilih Add...
5. Pilih di Tables in Database : Siswa pada jendela Add Table or View.
6. Klik Add...
7. Klik Close.
8. Klik kanan pada tabel Siswa dan pilih Browse di data environment report designer.
9. Tutup data environment report designer.
10. Klik ikon Field.
11. Tempatkan di bawah label NIS pada report.
12. Klik tombol Browse atau....di sebelah kanan Expression.
13. Pilih Field Nis dengan mengklik ganda area tersebut.
14. Klik OK.
Nb : untuk field Nama, JK, Agama, Alamat dan Telepon lakukan seperti cara di atas dari nomor urut 10 sampai dengan 14.
MEMBUAT JUMLAH TOTAL SISWA
Total Jumlah Siswa dalam pembuatanya adalah sebagai berikut :
1. Klik ikon Field.
2. Tempatkan di sebelah kanan TOTAL SISWA pada ReportSiswa.
3. Klik tombol Browse atau....di sebelah kanan Expression.
4. Di Variables pilih no dengan mengklik ganda.
5. Pilih tab Calculate.
6. Pilih Calculate type : Sum.
7. Klik OK.
Sampai pada tahapn ini kita selesai merancang ReportSiswa. Simpan kembali dahulu ReportSiswa ini, setelah di buka form Cetak Siswa untuk mengisi event-event nya.
MEMBUAT EVENT CLICK COMMAND CmdSelesai
1. Ketik Event Click Command Cmdselesai, dengan mengklik ganda CommandButton CmdSelesai, Ketik kan Perintanhya sebagai berikut :
Thisform.Release
2. Simpan dengan menekan Ctrl+W.
MEMBUAT EVENT CLICK COMMAND CmdLayar
Di dalam Click Event ini menyebutkan nama report yang akan di eksekusi dan nama form yang menampung report nya, Sebagai contoh ReportSiswa.frx dan FormLayar. Cara pembuatanya adalah sebagai berikut :
1. Klik ganda CommandButton CmdLayar, isikan perintahnya sebagai berikut :
REPORT FORM “C:\Documents and setting\Programku\Foxpro project\reportsiswa.frx” TO FormLayar PREVIEW
Maksudnya adalah meng eksekusi file report dengan nama ReportSiswa di drve c: yang hasilnya di tempat kan di form, dengan nama FormLayar.
2. Simpan dengan menekan Ctrl+W.
MEMBUAT EVENT CLICK COMMAND CmdPrinter
Perintahnya hampir sama dengan membuat Click event CommadButton CmdLayar, tetapi mencetak ke Printer. Tahapan pembuatanya adalah sebagai berikut :
1. Klik ganda CommandBottun CmdPrinter, Ketik perintahnya sebagai berikut :
REPORT FORM “c:\Documents and setting\Programku\Foxpro Project\reportsiswa.frx” TO PRINTER NOCONSOLE
Maksudnya adalah meng eksekusi file report dengan nama ReportSiswa di drive c: yang hasilnya ke printer tanpa kelihatan di layar monitor.
2. Simpan dengan menekan Ctrl+W.
MEMBUAT EVENT CLICK COMMAND CmdSetUp
Click Event CmdSetup berfungsi untuk memilih jenis printer yang di gunakan. Tahapan pembutanya adalah sebagai berikut :
1. Klik ganda CommandButton CmdSetup, Ketik perintahnya sebagai berikut :
Cprinter=GETPRINTER()
SET PRINTER TO NAME(Cprinter)
IF .not. EMPTY(Cprinter)
ELSE
MESSAGEBOX(“Driver Printer Tidak Ada...!”,48,”Informasi”)
ENDIF
Maksud perintah tersebut adalah, melaksanakan fungsi getprinter untuk memilih printer yang digunakan, jika ada file driver printer yang di miliki dan di simpan ke dalam varibel Cprinter, kemudian mengatur nama printer dengan printer set printer to name(Cprinter). Jika file printer tidak ada, akan tampil pesan “ Driver Printer Tidak Ada” Sampai pada tahapan ini kita telah selesai membuat semua perintah (Event) pada form CetakSiswa.
2. Simpan dengan menekan Ctrl+W.
3. Simpan kembali file form CetakSiswa.
