Assamulaikum...
sudah lama neh gk ngeblog lagi, abis kebanyakan malesnya neh...!!!. Kemaren ada temen blogger tanyain tentang cetak struk gmana cara buatnya, nah di sini ane coba buat contoh simplenya saja. supaya teman-temen bisa explorasi lagi. key...
Kali ini ane mau ngasi contoh aplikasi yang dapat mencetak struk (menggunakan printer POS tentunya). dengan menggunakan komponen zreport. dimana komponen ini mesti diinstal terlebih dahulu di delphinya temen-temen.
Okey tampa bercuap lama, temen-temen bisa langsung download contoh amplikasi yang ane buat barusan di SINI , semoga bermanfaat, tapi harap dimaklumi kan cuman contoh saja, bagi yang pernah buat jauh lebih bagus boleh ne minta ilmunya.key...
Berikut Output dari Aplikasi yang saya buat.
Eh sorry bukan yang ini tapi yang dibawah ini. hehehehe....!!!! (ketauan ne doyan apa...???)
10 komentar:
wuih,, langsung di update nih..
makasi banyak ya sobat..
hmmm,, intinya ternyata cuma di
" If key=#13 Then
Begin
........
........ "
Untuk sintak ini :
....Edit1KeyPress.........
If ADOTable1.Locate('kd_tr',Edit1.Text,[]) Then
"begin"
"Begin"If zrList <> nil then zrList.Preview; End;
......
yg di tanda kutip emang sengaja dua kali Begin ato gak sengaja ketulis? :)
heheheeee....
lupa diapus kemaren, ntu koding mula ada lanjutannya tapi ta hapus, ya kalo mau bisa kok dihapus beginnya salah satu
trus kalo yg di swalayan2 tu, kasusnya seperti apa? kan org bisa beli lebih dari 1 barang bos? kapan di alihkan ke tombol simpan?
intinya di key press tmpt kode barang, kodingnya cuma untuk nyari aja? gak utk nyimpen transaksi ato yg lainnya?
mohon pencerahannya.. soalnya gak ada di bahas tentang barcode nya nih :)
maklum newbie gan, hee..
ya bisa buat yg laennya sih, itu program kan cuman buat sample, aryo masih bisa kembangkan lagi. misalnya kalo kita gunakan sebagai simpan juga bisa tinggal perintah If Adotable1.locate.... dst diganti menggunakan perintah simpan seperti adotable.post ato yang lainnya.
kalo transaksi penjualan biasanya org pakek filter berdasarkan kode transaksi yang sedang berjalan, jadi pada saat transaksi hanya barang yang menggunakan kode transaksi itu saja yang keluar pada saat disimpan, simpannya pun menggunakan perintah yang sama sih, nah kalo sudah transaksinya selesasi baru filternya dibuka maka senua trasnksi kan bakalan keliatan, tapi kalo mau baut aja table maya sama isi fielnya seperti tabel transaksi, terus pas transksi berjalan simpennya ditable maya itu dulu kan kalo batal bisa dihapus semuanya. trus kalo sudah selesai baru data yang ditable maya itu di pindahkan ke table tarsnaksi yang sebenarnya sehingga lebih aman kan...
dicoba aja dulu yah...
Ok dah,, tak cobain dulu deh..
BTW,, makasi banyak yah infonya, sangat bermanfaat :)
Mas andris, sy lupa lagi 1 hal,, gimana cara bikin image barcode nya? sy pernah baca katanya pake rave report, tp gak pernah nyobain, soalnya gak pernah pake rave report..
ada sample gak mas andris?
jd 1 halaman itu bisa cetak beberapa barcode dari field2 nya..
sory kebanyakan nanya, heee
@aryo : ya kalo mau simple bisa kok pakek rave report ato fast report, coba cari folder C:\Program Files\Borland\Delphi7\Demos, nah dsana banyak contoh-contohnya...
mas tulisan print saya kok jadi tanda tanya kenapa ya???
mas handris kenapa pencarian untuk cetak laporan pake QRPORT gak sekalian di postingin
kalo buat tzrfield nya gmn ya ?? untuk data misal nm_barang
Poskan Komentar
makasih ya dah mampir....!!!! ^_^