Memberi Pengaturan PageSetup
Postingan : | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 |
Setelah sebelumnya kita membuat laporan data siswa. pada kali ini kita akan mencoba memberikan pengaturan Pagesetup pada w_laporan tersebut.
Setelah sebelumnya kita membuat laporan data siswa. pada kali ini kita akan mencoba memberikan pengaturan Pagesetup pada w_laporan tersebut.
- Buka Aplikasi yang telah kita buat sebelumnya.
- Pastikan w_lap_siswa yang terbuka. jika belum terbuka double klik pada w_lap_siswa untuk membukanya.
- Tambahkan Komponen GroupBox dan berinama PageSetup
- Tambahkan 3 buah Komponen RadioButton Control dan letakkan dalam GroupBox berinama masing-masing Default, Portrait, Landscape pada setiap RadioButton.
Tahap selanjutnya adalah pemberian sintak.
- Double klik pada RadioButton Default, dan ketikkan sintak berikut.
if dw_1.describe('datawindow.print.preview')='yes' then
dw_1.Object.DataWindow.Print.orientation = 0
dw_1.Modify(' datawindow.paper.orientation = 0')
end if
dw_1.object.datawindow.print.preview='yes'
- Double klik pada RadioButton Portrait, dan ketikkan sintak berikut.
if dw_1.describe('datawindow.print.preview')='yes' then
dw_1.Object.DataWindow.Print.orientation = 2
dw_1.Modify(' datawindow.paper.orientation = 2')
end if
dw_1.object.datawindow.print.preview='yes'
- Double klik pada RadioButton Landscape, ketikkan sintak berikut.
if dw_1.describe('datawindow.print.preview')='yes' then
dw_1.Object.DataWindow.Print.orientation = 1
dw_1.Modify(' datawindow.paper.orientation = 1')
end if
dw_1.object.datawindow.print.preview='yes'
Jika selesai save dan jalankan. coba agan buka Laporan siswa dan coba check radio Button tersebut.
Default
Portrait
Landscape
Ok salam Sukses....
0 comments:
Post a Comment