delphi online tutorials by edysoft    

edysoftware
edy_ppkia
 
Your Connection :  
  
  

 
Google PageRank Checker
 

 
   Home
  About
  Download
  Web Links
  Tmaster Delphi
  Kirim Artikel
  Kontak Kami
  Java Tutorials
  Macro VBA Tutorials

   THelp
Tdelphi
Treserved Word
Ttype Data
Tstatements
Tprocedures
Tfunctions
TDatabase
TBDE
Tregistry
Tqreport
TExport Excel
TFile Directory
Tprinter
Tindy
Tunix
TKonsultasi
VCL Component
TSQL
TGraphic
TMySQL
TInterbase
TFireBird
TOracle
TMsSql Server
TFreeReport
TADO
TMyProject
Humor

   Kursus Online

Kursus Private Online

bersama Edysoftware

Detail Materi :


Call Center :

Flexi : 01017-0331-7799690

IM3 : 085730598789

 


   From Google

   Product

Ingin tahu cara mudah menggunakan component table..?

http://edysoftware.com/product/

 

Belajar Delphi secara sistematis..

waktu flexible

hanya di sini.. 

http://edysoftware.com/product/

 


   Component YM

Jual Component

untuk membuat

aplikasi Yahoo messenger (YM)

demo

silahkan contact YM :

edysoftwareSmile

 

jika berminat


   YM + Gtalk Component

Beli Component

YM dan Gtalk

Dapat Bonus..!

Source KLIKBCA


   DVD Delphi

Yang mau Coba Delphi 2009 atau Delphi 2010,

Ganti DVD + Ongkir sebesar 50 rb untuk wilayah jawa


   Heboh Diskon

Segera dapatkan ebook dan source code kursus online hanya dengan

Rp. 300.000,-

Jika anda mengikuti kursus online membutuhkan biaya Rp 2 Juta.. 

Bagi anda yang ingin belajar delphi namun dana terbatas.. gunakan kesempatan ini

   


Aplikasi SIP
Senin, 18 Februari 13 - oleh : Nurmala, S. Pd

Aplikasi ini saya buat ketika saya masih kuliah di semester 4 mata kuliah metode perancangan program, kebetulan ketika itu tools yang digunakan borland delphi 7 dan microsoft access 2003. Sebelum membuat aplikasi ini, buat database  menggunakan Microsoft Office Access 2003.
Buka Microsoft Office Access 2003, seperti tampilan di bawah ini:

Kemudian klik Create a new file.. lalu pilih Blank database, Lalu simpan dengan nama”SIP.mdb”, lalu klik Create.

Setelah itu muncul sebuah form baru, berikut tampilannya:

Setelah itu, pilih create table in Design view, sehingga muncul tampilan seperti ini:

Setelah itu buat Tabel Penduduk yang merupakan Struktur Tabel Basis Data Sistem Informasi Penduduk, lalu buat formatnya seperti di bawah ini:

Untuk type data dan field size dapat diatur sendiri, seperti TglLahir, photo, dll.

Adapun yang berbeda untuk JK formatnya seperti ini:

Setelah itu buat lagi TblAgama, yang formatnya sebagai berikut:

Setelah itu save, lalu beri nama TblAgama.

Kemudian buat lagi TblGolDrh, formatnya seperti ini:

Setelah itu save dengan nama TblGolDrh.

Setelah itu buat tabel-tabel yang lain sperti hasil screen shoot di bawah ini:

Setelah dibuat semua tabel, lalu kita isi lagi format tabelnya, misal TblAgama, pertama buka TblAgama pilih Tab View sebelah pojok kiri atas, setelah itu isi kolom-kolomnya, lihat hasil screen shoot dibawah ini:


Setelah itu save dengan klik gambar disket, dan seterusnya untuk tabel-tabel yang lain kecuali untuk tabel TblKtp.

berikutnya, Mengkoneksikan Tabel Agama, Goldrh, Jk, Pekerjaan, dll ke TblPenduduk.

Buka kembali TblPenduduk, lalu pilih kolom Agama, di field properties pilih Tab Lookup, dan isi kolom-kolomnya terlihat sebagai berikut:

Demikian juga untuk Tabel yang lain.

Selesailah sistem basis data Penduduk dengan Microsoft Office Access 2003.

Sebelum melangkah lebih jauh, untuk basis data dengan Microsoft Office Access 2003 ini, nantinya simpan didalam folder disatukan dengan project delphi.

Langkah selanjutnya membuat relasi antar tabel.

Buka Tabs database tools- relationship, sehingga akan keluar tampilan seperti ini:

Lalu, klik kanan show all.

pembuatan database selesai.

berikutnya membuat aplikasi dengan borland delphi 7, Buka Borland Delphi 7, seperti terlihat di bawah ini:

Sebelum membuatnya, terlebih dahulu ubah nama form1 ini menjadi Sistem Informasi Penduduk, cara merubahnya à pada Option Object Inspector pilih Caption lalu rubah “form1 menjadi Sistem Informasi Penduduk” dan pilih option name beri nama frmUtama, hal ini sesuai kebutuhan aplikasi yang akan dibuat nanti. Dan sebelum melangkah lebih jauh terlebih dahulu Save, caranya pilih option file – save as atau bisa juga pilih option save all, setelah itu muncul seperti ini:

Untuk penyimpanan file ini tidak sembarang, tapi dalam hal ini semua file-file yang nantinya akan disimpan dijadikan 1 folder, hal ini mempermudah prosesnya nanti. Untuk file name yang akan disimpan beri nama UnUtama dan arahkan tempat penyimpanan di My Document atau tempat yang lain, yang mudah dan terjangkau dan buat folder baru beri nama SIP, seperti berikut ini:

Simpan UnUtama dengan type *.pas di dalam folder SIP.

Setelah di simpan muncul lagi seperti ini:

Beri nama SIP dengan type *.dpr pada file name tersebut, dan simpan di folder SIP.

Setelah itu, close semua project yang baru disimpan tadi, jika ingin membuka kembali, klik 2x SIP.dpr yang sudah disimpan dalam folder SIP tersebut, terlihat gambar dibawah ini merupakan bagian komponen dari aplikasi yang akan dibuat nanti, usahakan dalam 1 file tidak ada yang terhapus/hilang, karena dapat menyebabakan eror.

tetapi jika tidak diclose juga tidak apa-apa dan lanjutkan kembali aja aplikasi yang inin kita buat.

Untuk memulai pembuatan selanjutnya, dibuat menu dalam form ini, caranya: pada Tabulasi tampilan delphi di atas, pilih Tab Standard-MainMenu, kemudian klik aja lalu masukkan dalam form dimana aj, lihat gambar gambar dibawah ini:

Setelah itu klik 2x MainMenu tadi, sehingga muncul form menu seperti gambar di bawah ini:

Setelah itu, buat menu/submenu yang kita inginkan, caranya: klik aja form menu, kemudian ketik sesuai apliaksi yang ingin dibuat, atau juga pada option Object Inspector, pilih caption, lalu ketik sesuai kebutuhan dan Enter, lihat pada gambar berikut:

Begitupun juga bila ingin membuat menu di sampingnya, arahkan aja kursornya, dst.. lihat hasil menu yang dibuat telah telihat pada form utama:



Untuk mencoba hasil menu yang telah dibuat tadi,  diRun kan atau tekan F9, maka akan terlihat hasilnya:

Tetapi form yang sudah jadi sementara, belum bisa diapa-apakan,diklik muncul sesuatu,dll. Nanti pada tahap berikutnya akan dijelaskan.

Untuk tahap selanjutnya, buat form baru lagi yaitu FormDataPenduduk, dimana form ini merupakan isi dari data-data penduduk yang yang nanti akan diinputkan. Cara membuat form baru: pilih option File-New-Form, sehingga muncul form baru yang nanti akan dibuat/didesain, lihat gambar dibawah:

Sebelum dibuat, terlebih dahulu beri nama form tersebut:

Caption          = Data Penduduk

Name              = FrmDtPend

Kemudian save all, caranya sama seperti yang sudah dilakukan sebelumnya, simpan nama Unitnya dengan nama UnDtPenduduk.

Sebelum mendesain lebih jauh, terlebih dahulu jadikan form DtPenduduk ini sebagai anak form, dan Form Utama sebagai induk form.

Tetapi sebelum itu, kita buat kode program yang nantinya ketika diklik Data Penduduk pada formUtama, maka akan muncul formDtPenduduk. Caranya: tekan ctrl-F12 secara bersamaan, ini untuk melihat view unit dimana view unit ini yang nantinya akan dimasukkan kode-kode programnya atau juga bisa klik DataPenduduk pada formUtama, sehingga muncul seperti ini:

Lalu ketik kode berikut ini:

setelah itu Run kan, sehingga muncul form, dan bila di klik Data Penduduk, maka akan mucul form DtPenduduk, lihat gambar dibawah:

Setelah itu pada form utama, pada file-exit, klik akan muncul perintah memasukkan kode, lalu isi kode seperti ini:

Kemudian di run kan, ketika akan mengklik exit, aplikasi akan keluar.

Untuk selanjutnya, mendesain form Data Penduduk sesuai kebutuhan, Disini coba menggunakan Panel, caranya: pilih Tabulasi Standard-Panel, dan pada Object Inspector pada option Align = alTop, lihat gambar dibawah ini:

Untuk lebih baiknya, tulisan “panel” dihapus, caranya ke menu caption aj.

Sebelum mendesain lebih jauh, kita atur dahulu pada Object Inspector rubah option:

FormStyle      = FsMDIForm

WindowState = wsMaxsimized

Setelah itu, pada saat di Run kan, form Utama automatis akan membesar dibanding form Data Penduduk,tetapi form data penduduk masih berada posisi setara dengan form utama,seharusnya form data penduduk berada di dalam form utama(anak form) lihat gambar di bawah:

Untuk menjadikan formdatapenduduk ini menjadi anaka form, caranya = di form data penduduk, atur juga pada Object Inspector rubah option:

FormStyle      = FsMDIChild

WindowState = wsMaxsimized

Jangan lupa atur juga pada Tabulasi Project – Option(shift+ctrl+F11), atur seperti gambar di bawah ini:

Setelah itu Run kan, lihat perubahannya:

Formdatapenduduk pada saat di runkan, automatis akan membesar sendir seperti formutama, hanya saja pada formdatapenduduk jadi form anak, sehingga berada di dalam formutama.

Sebelum melangkah lebih jauh, periksa dahulu keefektifan aplikasi ini, yaitu itu pada saat di Run kan, dan buka form data penduduk, lalu tutup kembali, terlihat form data penduduk masih berada dibawah(tidah tetutup seluruhnya), lihat gambar:

Untuk supaya tetutup seluruhnya, caranya:

Pertama buka form data penduduk, kemudian pada option object inspector pilih event-onclose, klik 2x pada sebelah kanannya, terlihatlah kode-kode, kemudian ketikkan kode berikut:

Dapat dicoba sendiri hasilnya saat di run kan.

Untuk selanjutnya, mendesain form data penududuk, pertama ambil option win32-pagecontrol, kemudian ambil taruh di form data data penduduk, lihat gambar dibawah:

Setelah itu klik kanan pada tool tersebut, lalu new page, akan membuat halaman baru, lihat gambar:

Dan beri nama pada caption(TabSheet1& TabSheet2) menjadi “Biodata” dan “Keluarga”.

Dengan menggunakan tool ini, berfungsi untuk penempatan,pengisian data-data dari basis data nanti.

Sebelum mendesain lebih jauh, terlebih dahulu bagaimana cara basis data terkoneksi dengan delphi ini?

Pertama buat data modul baru yang terdapat pada delphi, caranya pilih option file-new-datamodule, tampilannya seperti ini:

Kemudian module ini beri nama = DM, hal ini agar efisien dalam pengisian kode nanti, kemudian save all dengan nama UnDm.

Setelah itu, ambil tool adoconection, caranya: pilih option Ado-Adoconection(ADODB) , kemudian masukkan ke data module, lalu, pada object inspectornya, LoginPrompt: False, lihat gambar:

Tool ini nantinya berfungsi untuk mengkoneksikan data base dari ms access ke delphi.

Setelah itu langsung saja koneksikan basis data tersebut melalui adoconection, caranya: klik 2x adoconection, muncul seperti ini:

Kemudian pilih Build… muncul lagi seperti ini:

Pilih Microsoft Jet 4.0 OLE DB Provider, lalu klik next, muncul lagi seperti ini:

Klik kemudian langsung saja pilih basis data yang sudah dibuat sebelumnya dengan ms access, lalu open, kemudian klik Tes Conection, bila muncul bacaan seperti ini:

Artinya data base yang dimasukkan sudah terkoneksi dengan delphi, lalu klik ok-ok.

Setelah itu, ambil tool ADOTable, caranya: berada pada option ADO-ADOTable, lalu pada Object Inspectornya:

Connection     : ADOConnection

TableName    : TablePenduduk

Lihat gambar:

Kemudian klik 2x TablePenduduk pada data modul, muncul data modul dari TblPenduduk, seperti ini:

Lalu, klik kanan di dalamnya, Add All Fields, setelah itu muncul seluruh keterangan dari basis data dari MS Access yang pertama kali dibuat, artinya basis data sudah terkoneksi. Setelah itu dalam data modul tersebut, klik satu persatu, misal pada NIK, KdPend, Nama, Agama, Pendidikan, Staka, Pekerjaan, dll, tekan klik arahkan ke form data penduduk, dalam hal ini termasuk desain sesuai kemauan kita, dan atur sesuai kebutuhan. Pada saat ditarik ke dalam form, akan muncul yang namanya DataSource, datasource ini nantinya akan berguna sekali dalam pengkoneksian database ke delphi, sehingga data source ini langsung saja beri nama= DtPenduduk, dan agar kelihatan rapih, data tersebut nantinya taruh di atas, lihat gambar:



Setelah itu, masukkan juga yang lainnya, caranya sama seperti yang sudah dijelaskan sebelumnya, tetapi sebelum itu, untuk Tabsheet kita bisa atur sedemikian yang diinginkan, atur sebesar mungkin, dan ini nantinya untuk pemasukkan data-data yang lain. Selanjutnya, memasukkan data Agama,dll, pertama ambil AdoTable taruh di Data Modul, seperti yang dijelaskan sebelumnya, untuk keterangannya:

TblAgama:

  • Connection           = AdoConnection
  • TableName          = TblAgama
  • Name                    = TblAgama

TblGolDrh:

  • Connection           = AdoConnection
  • TableName          = TblGolDrh
  • Name                    = TblGolDrh

TblKelainan:

  • Connection           = AdoConnection
  • TableName          = TblKelainan
  • Name                    = TblKelainan

TblPekerjaan:

  • Connection           = AdoConnection
  • TableName          = TblPekerjaan
  • Name                    = TblPekerjaan

TblPendidikan:

  • Connection           = AdoConnection
  • TableName          = TblPend
  • Name                    = TblPendidikan

TblStatus:

  • Connection           = AdoConnection
  • TableName          = TblStaka
  • Name                    = TblStatus

Lihat hasil dari pemasukkan tabel-tabel di atas:

untuk selanjutnya, klik 2x pada tabel-tabel di atas, seperti yang sudah dilakukan sebelumnya, misal pada TblAgama: klik 2x, setelah itu muncul DtModulAgama, langsung saja, klik kanan, lalu ctrl f, muncul “agama&uraian agama”, kemudian sorot seluruhnya, tarik ke form data penduduk, seteah itu muncul data source, dan beri nama DtAgama, lihat gambar berikut:

Sebelum melangkah lebih jauh, ada beberapa hal yang harus diperhatikan, untuk nanti dalam pengisian agama,goldarah, dll ini, disini menggunakan tool yang namanya “DbLookupCombobox”, tool ini nantinya merupakan untuk pengisian data agama, pendidikan, dll yang nangtinya disitu akan mengeluarkan hasil uraiannya, ini berada pada Tabulasi DataControls- DbLookupCombobox, lihat hasilnya:

Setelah ini, teruskan untuk data-data yang lainnya, lakukan seperti di atas, setelah selesai semua, lihat hasilnya:

Tetapi pada saat di run kan, buka data penduduk, disitu untuk pengisian agama, dll itu belum bisa diisi, lihat hasil runnya:

Jika di klik pada data agama di atas, itu belum bisa, dikarenakan ada beberapa hal yang harus diperhatikan. Untuk dapat diisi, caranya yaitu:

Pada data agama sebelahnya”DbLookupComboBox”, itu ada beberapa yang harus di perhatikan, diantaranya pada option Object Inspector, keterangannya sebagai berikut:

Untuk “Agama”:

  • ListSource                      = DtAgama
  • DataSource                    = DtPenduduk
  • ListField                         = UraianAgama
  • Keyfield                          = Agama
  • DataField                       = Agama

Untuk “GolDarah”:

  • ListSource                      = DtGolDrh
  • DataSource                    = DtPenduduk
  • ListField                         = UraianGolDarah
  • Keyfield                          = GolDarah
  • DataField                       = GolDarah

Untuk “Pekerjaan”:

  • ListSource                      = DtPekerjaan
  • DataSource                    = DtPenduduk
  • ListField                         = UraianPekerjaan
  • Keyfield                          = Pekerjaan
  • DataField                       = Pekerjaan

Untuk “Kelainan”:

  • ListSource                      = DtKelainan
  • DataSource                    = DtPenduduk
  • ListField                         = UraianKelainan
  • Keyfield                          = Kelainan
  • DataField                       = Kelainan

Untuk “Pendidikan”:

  • ListSource                      = DtPendidikan
  • DataSource                    = DtPenduduk
  • ListField                         = UraianPend
  • Keyfield                          = Pendidikan
  • DataField                       = Pendidikan

Untuk “Status”:

  • ListSource                      = DtStatus
  • DataSource                    = DtPenduduk
  • ListField                         = UraianStaka
  • Keyfield                          = Staka
  • DataField                       = Staka

Setelah semua sudah diatur, kemudian pengisian kode, caranya:

Pada option Object TreeView, klik FrmDtPenduduk, kemudian pada option object Inspector, klik Events-OnCreate, lalu disebelah OnCreate klik 2x, akan muncul untuk pengisian kode, setelah itu langsung saja ketik kode berikut ini:

Untuk selanjutnya, masukkan data-data yang lainnya ke dalam form data penduduk, seperti alamat, tgllahir, dll, caranya yaitu dengan menekan shift+F12 kemudian pilih DM, lalu klik ok, akan muncul data modul, setelah itu pilih di dalamnya TblPenduduk, klik 2x, akan muncul seperti ini:

Setelah itu, ambil beberapa data yang belum dimasukkan ke dalam form data penduduk, caranya sorot aja data yang ingin diambil, lalu klik tekan, geser ke dalam form data penduduk, setelah itu atur posisinya sedemikian rupa dan rapih sesuai aplikasi yang ingin dibuat, dan untuk data nama ayah&nama ibu, taruh di Tabulasi keluarga(sebelah biodata), lihat hasilnya:



Untuk selanjutnya memasukkan data jenis kelamin(JK), disini menggunakan tool namanya yaitu: DbRadioGroup, ini berada pada tabulasi DataControls- DbRadioGroup, setelah itu tarik ke form data penduduk(pada TabSheet), setelah itu atur pada object inspector:

  • DataSource         = DtPenduduk
  • DataField             = JK
  • Items                      = tulis à seperti gambar dibawah ini:

Values                    = tulis à seperti gambar dibawah ini:

Setelah itu di run kan dan pada jenis kelamin dapat diisi, lihat hasilnya:

Sebelum melangkah lebih jauh, ada beberapa hal yang harus diketahui, diantranya yaitu, tools-tools yang digunakan dalam delphi ini akan ditambahkan, sehingga tools yang diinginkan terpenuhi. Disini saya sudah mempunyai tools delphi 7 yang ingin digunakan nanti yang dikemas dalam satu folder, atau untuk mendapatkan tools ini, dapat dicari di google.com tentang tools delphi 7, lansung saja cara untuk menambahkan tools nya caranya yaitu:

  1. buka borland delphi 7

tutup semua form, view kode yang berada pada delphi 7, tampilan seperti di bawah ini:

setelah itu pilih option Tools-Environment Options…akan  terlihat seperti ini:

kemudian pilih Library, lihat gambar:

lalu pilih Library path, klik (sebelah paling kanan) dan akan muncul tampilan seperti ini:

kemudian pilih dan akan muncul tampilan seperti ini:

setelah itu cari folder tools delphi yang sudah disiapkan, misal pada alamat F:\data roy (2) on 192.168.1.227\Tugas roy delphi kampus\Components, setelah ketemu foldernya, klik tanda +, seperti gambar di bawah ini:

akan terlihat semua tools yang akan digunakan nanti, tetapi disini hanya beberapa saja yang akan dipakai, seperti: AlphaControl(AlphaDB & D7), ksdev(packages), dan VCL Skin.

setelah itu langsung saja cari dan pilih tools yang sudah disebutkan sebelumnya kemudian klik ok, misal pilih pada AlphaControl, klik ok, akan muncul seperti ini:

pilih Add, dan akan masuk dengan sendirinya ke Ordered list of Library paths, lihat hasil:

setelah itu kembali lagi ke sebelumnya pilih , tambahkan tools yang lainnya, ikuti langkah seperti sebelumnya, sehingga terlihat hasilnya seperti ini:

setelah itu klik ok-ok.

kemudian, pilih option file-open, kemudian cari tools AlphaDB-AlphaDB7.dpk, kemudian open, lihat tampilannya:

setelah di open, akan muncul seperti ini:

  1. pilih compile-Install, dan akan muncul sebuah informasi, kalau sudah  klik ok, artinya tools nya sudah terinstall.
  2. setelah itu, pada package-AlphaDB7.dpk, tutup, dan akan meminta akan di save atau tidak? Pilih saja No.
  3. selanjutnya menginstall yang namanya= DStyleD7.dpk, cara mengintallnya sama seperti sebelumnya yang sudah dijelaskan.
  4. kemudian menginstall = te_dsgn_d7.dpk dan te_db_dsgn_d7.dpk.

dan mengintall WinSkinD7.dpk, untuk menginstall yang ini ada perbedaan sedikit, lihat tampilannya ketika di compile, muncul seperti ini:

Dan ketika muncul seperti itu, langsung saja di close, dan install.

terakhir ada yang perlu diinstall lagi, yaitu dclqrt70.bpl, dan ini berada pada tabulasi component-Install Packages…, kemudian Add, dan cari pada alamat ini = C:\Program Files\Borland\Delphi7\Bin, setelah itu klik open, lalu ok.

Untuk melihat hasil instalan tadi, ini berada pada paling sebelah kanan bila dilihat, seperti ini(terlihat TE Shell, VCLSkin, QReport, dll):

Setelah itu tutup delphi bekas yang diinstall tadi dan buka kembali project delphinya.

kemudian akan dibuat, tombol-tombol nantinya seperti: Add, Delete, Post, Edit, Cancel, Close, dll. Untuk membuat seperti itu, disini menggunakan tool TeFxSpeedButton, ini berada pada tabulasi TE FX-TeFxSpeedButton, setelah itu ambil dan taruh pada form data penduduk, sebanyak tombol yang akan dibuat nanti, lihat hasilnya:

Kemudian pada masing-masing tombol beri keterangan sebagai berikut:

Untuk “Tombol Add”:

  • Caption                          = &Add
  • Nama                              = cmdAdd

Untuk “Tombol Edit”:

  • Caption                          = &Edit
  • Nama                              = cmdEdt

Untuk “Tombol Delete”:

  • Caption                          = &Delete
  • Nama                              = cmdDlt

Untuk “Tombol View”:

  • Caption                          = &View
  • Nama                              = cmdView

Untuk “Tombol Search”:

  • Caption                          = &Search
  • Nama                              = cmdSrc

Untuk “Tombol Close”:

  • Caption                          = &Close
  • Nama                              = cmCls

Untuk “Tombol Cancel”:

  • Caption                          = &Cancel
  • Nama                              = cmdCcl

Untuk “Tombol Post”:

  • Caption                          = &Post
  • Nama                              = cmdPst

Setelah itu lihat hasil seperti ini:

Setelah itu, baru beri kode untuk menghasilkan suatu tombol pernyataan yang sesuai.

Untuk pemberian kodenya, disini akan dibuat procedure baru yang namanya procedure fungsi & tak fungsi, gunanya adalah untuk supaya menfungsikan suatu tombol dimana misal, ketika akan menginput data dengan tombol add, maka tombol edit dan delete tak berfungsi, begitupun seterusnya. Langsung saja untuk memulainya, pertama tekan ctrl+F12, kemudian pilih UnDtpenduduk, setelah itu muncul kode-kode, lalu sorotkan ke atas ada kata” private { Private declarations }“,  kemudian di bawahnya tulis kode seperti ini:

setelah itu, tulislah kembali kode berikut ini(tulis di bawah tulisan seperti ini” {$R *.dfm} ):

sebelum melangkah lebih jauh, pada form data penduduk, pada NIK, KdPend, nama, dll, begitupun sama halnya dengan agama, GolDrh, dll, itu disebelah kanan diganti tulisannya dengan nama yang sama, misal pada DBEdit1 à NIK, DBEdit2 à KdPend, dst…lihat hasilnya:

setelah itu, tuliskan kode pada tombol Add, langsung saja klik 2x pada tombol Add, kemudian langsung tulis kode berikut ini:

setelah itu coba saja run kan, lalu anda pilih tombol Add, lalu inputkan data, kemudian post, lalu add kembali, atau tombol yang lainnya, silahkan mencoba…(untuk tampilan form sedikit dirubah pada nama, kdpend, dan NIK, tujuannya untuk mempermudah proses inputan data) lihat gambar:

Ket: tampilan form dapat berubah-rubah sesuai keinginan.

Untuk selanjutnya, membuat yang namanya form view, ini nantinya berfungsi sebagai hasil inputan data-data yang penting. Untuk membuatnya, pertama bikin form baru, file-new-form, kemudian beri ket: caption = Form View, name = FrmView, setelah itu ambil tool yang namanya QuickReport, itu berada pada tabulasi QReport-QuickRep, lihat hasil tampilan awalnya:

Setelah itu klik kanan pada QuickRep tersebut lalu pili Report Settings, muncul seperti ini:

Kemudian yang perlu diubah adalah page header, title, dan detail band, isikan pada length = 10,00…lihat gambar:

Setelah itu, pilih Apply lalu ok, sehingga tampak seperti ini:

Kemudian ambil tool QRLabel, berada pada QReport-QRLabel, lalu taruh di bagian page header, dan beri nama pada caption “SISTEM INFORMASI PENDUDUK”,   dan untuk titlenya, turunkan garisnya ke bawah sedikit,sehingga tampak seperti ini:

Kemudian ambil tool lagi yang namanya QRShape, berada pada QReport-QRShape, kemudian taruh di bagian title, lihat tampilan awalnya:

Lalu lihat ket. Pada propertiesnya sebagai berikut:

Pen à width =2

Shape = qrsHorLine

Width = 715

Kemudian copykan lagi, sehingga tampil seperti ini:

Setelah itu ambil lagi tool QRLabel, taruh dibagian title, kemudian ganti namanya dibagian captionnya, seperti NIK, KdPend, Nama, dll, lihat hasilnya:

Setelah itu masukkan tool QRDBText, berada pada QReport-QRDBText, lalu taruh dibagian Detail, lihat tampilannya:

DtSourchà DtView:

DtSet = Dm.TblPenduduk

AdoQuery:

Connection = Dm.AdoConnection

DtSourch = DtView

QRDBText

DtSet = AdoQuery

DtField = NIK

SOURCE CODE

  kirim ke teman |   versi cetak


Ada 5 komentar tentang artikel ini :

AcMbqLsKVQnzqQOi
Kamis, 10 April 14 - oleh : Ugtjqpkl
, <a href="http://climate1stop.net /Garcinia Cambogia">Garcinia Cambogia Review</a>, [url="http://climate1stop.net /Garcinia Cambogia"]Garcinia Cambogia Review[/url], 981073, <a href="http://garciniabac.com/ Garcinia Cambogia">Garcinia Cambogia for Weight Loss</a>, [url="http://garciniabac.com/ Garcinia Cambogia"]Garcinia Cambogia for Weight Loss[/url], rmnb, <a href="http://www.cheap-frames .co.uk/">Payday Loan UK</a>, [url="http://www.cheap-frames .co.uk/"]Payday Loan UK[/url], rwl, <a href="http://www.elysium-loun ge.com/Garcinia Cambogia">Cambogia Garcinia</a>, [url="http://www.elysium-loun ge.com/Garcinia Cambogia"]Cambogia Garcinia[/url], :-], <a href="http://tennising.net/Ga rcinia Cambogia">Garcinia Cambogia Side Effects</a>, [url="http://tennising.net/Ga rcinia Cambogia"]Garcinia Cambogia Side Effects[/url], pxb,

WOaxuvmWECfO
Selasa, 04 Maret 14 - oleh : Owjrbwls
And I think, that's not how it's transformed everything really., <a href="http://sonsofhedin.org ">Payday Loan UK</a>, [url="http://sonsofhedin.org "]Payday Loan UK[/url], 306446, <a href="http://www.findyourhost .co.uk">Payday Loans Online UK</a>, [url="http://www.findyourhost .co.uk"]Payday Loans Online UK[/url], yjkks,

aLZklxxBuGI
Selasa, 25 Februari 14 - oleh : Jtwxnrap
It's myself, very fast and easy to get if you re going to look at the expense of the sorts of tax so for £10., <a href="http://austinhelmethair .org/">Payday Loans Online</a>, jevk, <a href="http://www.leanbenchmar k.co.uk/">Pay Day Loan</a>, %-))), <a href="http://simpaydayloans.c o.uk/">Payday Loans Online UK</a>, bcr, <a href="http://popidolonline.co .uk/">Pay Day Loans UK</a>, cfxhv,

JseJdSmNKghCH
Rabu, 19 Februari 14 - oleh : Hobzvujr
5 billion shares to split the rich., <a href="http://www.f1gamers.com /">Australian online pokies</a>, xza, <a href="http://katpayday-loans. co.uk/">Payday Loans</a>, :-O,

Belajar dari awal tentang pemrogramman Delphi.
Selasa, 18 Juni 13 - oleh : Yunus
mencoba memahami.

Formulir Komentar | Aturan >>

Nama
Email
Judul Komentar
Komentar

 
   
   search

cari di  
 

   The Others

   Jajak Pendapat
Bagimana artikel yang dimuat ?

Sangat bagus
Bagus
Biasa
Tidak Bagus
Tidak Tahu


   Kalender

   Top Download
aplikasi database (20226)
Contoh Aplikasi (13633)
Contoh E-Book (delphi) (10820)
Source Code Program Toko (10631)
Program SMS (9455)
kumpulan icon (7680)
Import Data dari Excel (7306)
Export ke Excel (7212)
ebook delphi7 (6176)
Statusbar Lampu Disco (4899)
webcam (4462)
SMS MKIOS (4285)
Aplikasi YM dengan Delphi (4069)
Componen Koneksi ke MySQL (3907)
MDI Chlid + Lookup Form (3890)
DAO object (3769)
YM Pulsa Center (3763)
Installer Program Free (3762)
componen sortgrid (3762)
Messagedlg Bahasa Lokal (3762)
KLIKBCA WITH DELPHI (3762)
Rahasia Membuat Help Windows (3762)
XPres Effect (3762)
Database Server Firebird (3762)
Delphi 7 Protable (3762)
YMPulsa.1.0.0.7 (3761)
YM indo V1.0.0.4 update (3761)
YM indo V1.0.0.5 update (3761)
EGtalk Update (3761)
BDE Installer (3761)
MDI ChlidLookup Form (3761)
Ebook Masterhelp (3761)
Masterhelp (3761)
MySql Interprise (3761)
Component EdPanel (3761)
Appserv-MySQL (3761)
Compiler Masterhelp (3761)
E-Book Toko & MySQL Khusus Member (3761)
Ebook Kursus Online New (3761)
Componen Koneksi ke FireBird (3761)
YM indo V1.0.0.6 update (3760)
sms pilkada (3760)
Hint (3760)
Aplikasi WebCam (3760)
EGtalk Indonesia (3760)
Source Code YM (3760)
E-GateWay SMS (3760)
YM Pulsa Reaload (3756)
MINI SERVER PULSA (3666)
Parsing YM Server (3606)
Component KLIK BCA (VCL) (2376)
YSmart Autoit (Small Smart) (2165)
TymHTTP (Small) (1121)
MySQLHolic (1065)
source tulisgrid (1044)
KingSMS Gateway (1018)
source enumerasi (967)
source phoonebook (760)

   Artikel Terakhir
menggabungkan file wav suara dengan exe (embeded)
table
help
FindKey
tanya syntak mematikan komputer
menampilkan data dari database pada edit jika salah satu item combobox di select.
Bagaimana cara mengedit beberapa tabel melalui query?
cara merubah nilai
source biling warnet
Tanya kodingan
Monitoring Desktop
POP3/SMTP
Master, mohon bantuannya, bagaimana syntax untuk membackup dan me restore database ?
Delphi
[Ask]
tanya masalah di listview
KingSMS Gateway
Aplikasi SIP
download import excel
kestabilan data dbgrid
cara mengambil data dalam dbgrid
Update semua data di dBgrid
Mengintegrasikan Edit dengan Memo
cara menampilkan file help delphi 7 di windows 7
Membuat no urut dengan BUTTON tambah
Componen untuk database client server delphi 7 ???
stok barang minim
crosstab
combobox
cara membuat kolom menjadi baris
tentang bulan
membuat user
Mengunci Form
tanya listing
copy file exe dari server ke client secara otomatis menggunakan delphi
kadaluarsa
Gimmana mengatasi pesan error
Update Stok Barang
Mau nnya update SQL
mohon bantuannya
menghitung Total setor, total ambil dan saldo dari tabel database
Mas, aku mau nanya gimana cara tampilin file gambar berekstensi *.png
Penggajian
Mohon bantuan,fastreport
cara menampilkan bilangan genap n ganjil
mohon bantuannya
cara membuat procedure dan memanggilnya dan enumarasi
cara menulis pada string grid
MySQL Holic
membuat papan skor
sorting berdasarkan kecocokan
Tanya browse file dengan delphi
Update Artikel
satu TEdit1 Dua Kata
summary group
menguranggi stok barang secara otomatis
buat kwitansi dengan q report
membuat search engine
Pengurangan stok bersamaan
Cristal Report 8.5
Membatasi Nilai agar Nilai yang di Inputkan Tidak Boleh Negatif
Menggambil Sebagian String
Penggajian
Penggajian
Gimana source kode penghapusan data di dua tabel
update record tabel mySQL
tampilan dbEdit
QREPORT
newbie delphi mau tanya...
Help me

   Statistik Web
  Visitors : 2312097 visitors
  Hits : 46931 hits
  Month : 4049 users
  Today : 260 users
  Online : 7 users

   Visitors


  Edysoftware Template | 2007

Powered by auraCMS v1.62.