Postingan kali ini adalah tentang menginputkan gambar di form dan melihat hasilnya di report…
Pertama” bikin dulu tabelnya seperti berikut.
Setelah table diatas sudah dibuat lalu simpan dengan nama tb_gambar.
Kedua bikin form dan desain sesuai keinginan saudara,.ini contoh desain dari saya.
Yang berlingkar berwarna merah itu adalah Image,nah itu kita gunakan untuk memasukkan gambar.
Nah kalau udah didesain saatnya pengcodingan,.klik beberapa kali di tombol Cari Gambar lalu isikan coding berikut.
thisform.image1.Picture=GETPICT()
thisform.text1.Value=thisform.image1.Picture
source code di dalam tombol Simpan Gambar
SELECT tb_gambar
APPEND BLANK
replace lokasi WITH thisform.text1.Value
replace gambar WITH thisform.image1.Picture
thisform.text1.Value=""
thisform.image1.Picture=""
source code di dalam tombol Lihat Hasil
REPORT FORM report1.frx PREVIEW
Source code didalam tombol exit program
thisform.Release
nah kalau perintah diatas sudah dibuat dan sesuai maka silahkan dicoba dulu,..
nah sekarang kita membuat reportnya..
pertama bikin reportnya dulu,lihat gambar dibawah.
Klik di report lalu pilih tombol New. Maka akan muncul layar seperti berikut.
Lalu pilih New Report,setelah itu muncullah layar report. Setelah layar report baru muncul lalu aktifkan Report Control Toolbar di dalam menu View.
Setelah muncul seperti diatas lalu ikuti langkah yang bertulis berwarna merah itu.
Setelah anda mengklik langkah ke-2 maka akan muncul layar seperti di bawah ini.Klik beberapa kali Field gambar sampai muncul Tb_gambar.gambar di dalam Expression lalu ok.setelah itu ikuti lagi langkah ke -3 pada gambar sebelum ini lalu ok.
Lalu simpan dengan nama report1.frx.selesailah sudah pembuatannya silahkan dijalankan form’y tadi,…
nih hasil punya saya..
salam bekawanan j nah sesama blogger banjarmasin
BalasHapussalam bekawanan jua kawan'e nah,..
Hapussalam kenal
BalasHapussalam kenal juga..
Hapus