Tampilkan postingan dengan label Delphi 7. Tampilkan semua postingan
Tampilkan postingan dengan label Delphi 7. Tampilkan semua postingan

Rabu, 24 Juni 2015

Cara Membuat Menu Navigasi Dengan DevExpress Di Delphi 7

Assalamu'alaikum wr wb.

 Urusan Desain Tampilan memang hal yang paling utama untuk kenyamanan End User. Berangkat dari hal itu kali ini saya mau sharing tentang cara membuat Menu Navigasi di Delphi dengan memanfaatkan salah satu component delphi yaitu Dev Express. Sobat Tahu kan menu Navigasi itu seperti apa ? contoh hasil akhir yang kita inginkan adalah seperti di bawah ini
Cara membuatnya silahkan ikuti step-step berikut :

1. Silahkan Download dan Install component  DevExpress untuk delphi tujuh. Link Download ada pada postingan sebelumnya yang membahas cara membuat menu Office 2010 pada Delphi

2. Selesai install, silahkan buka Delphi Sobat

3. Masuk ke Pallete Win32 Tambahkan Komponen ImageList ke Form Sobat

4. Klik 2 kali Komponen ImageList kemudian Add (tambahkan 9 Icon ekstensi *.bmp atau *.ico) -> Apply -> OK
Membuat Menu Navigasi dengan DevExpress

5. Masuk Ke Pallete Dev Express kemudian tambahkan komponen dxNavbar ke Form Sobat. atur property sebagai berikut :
Align = alLeft
OptionImage -> SmallImage = ImageList

Membuat Menu Navigasi dengan DevExpress


6. Klik Dua kali komponen dxNavbar pada Form Sobat. Klik menu groups dan tambahkan 3 group. atur masing-masing property grup Sebagai berikut :
Caption = Terserah sobat
SmallImageIndex = Urutan gambar yang ada di ImageList / step 4 (di mulai dari 0). pilih salah satu misal 1

Membuat Menu Navigasi dengan DevExpress

7. Masih pada Pengaturan dxNavbar, Klik menu Items dan tambahkan 6 Item. atur property masing-masing Item sebagai berikut :
Caption = Terserah Sobat
SmallImageIndex = Urutan gambar yang ada di ImageList / step 4 (di mulai dari 0). pilih salah satu misal 3

Membuat Menu Navigasi dengan DevExpress

8. Masih pada Pengaturan dxNavbar, Klik menu Link Designer. Tambahkan Item 1 dan 2 ke Group 1, Item 3 dan 4 ke Group 2 dan Items 5 dan 6 ke Group 3 Caranya klik 1 kali pada salah satu group dan klik 1 kali pada item yang mau ditambahkan pada group tersebut kemudian klik button (+) atau bisa juga dengan drag and drop
Membuat Menu Navigasi dengan DevExpress

9. Klik menu View kemudian Pilih Skin Menu Navigasi Sesuka Sobat.

Membuat Menu Navigasi dengan DevExpress

10. Kita sudah berhasil membuat menu navigasi.

Membuat Menu Navigasi dengan DevExpress

Sabtu, 20 Juni 2015

Cara Membuat Menu Seperi Office 2007 di Delphi 7

Tampilan Office 2007 Memang Memukau dan Sangat Menggoda. Dengan Menu Ribbonnya, Ia Mampu Menyedot Perhatian Saya Sehingga terbersit Niat di hati untuk membuat aplikasi dengan Menu Office 2007 Tersebut (Sok Puitis) hehe.

Ok. Kita Fokus ke Pembahasan. Kali ini admin mau sharing tentang cara membuat menu seperti tampilan Microsoft Office 2007. Namanya adalah menu Ribbon. Lohh Katanya Seperti Office 2010 bagaimana sih ? saya anggap sama karena bentuknya sama. :)

Biar gak buang-buang waktu karena admin banyak kerjaan jadi langsung aja.

Step 1 : Download dulu software atau component yang yang dibutuhkan. dalam Hal ini adalah DevExpress. Download disini

Step 2 : Install component yang di download tadi. saya anggap sudah beres karena saya tidak meragukan kemampuan sobat dalam hal instal menginstal.

step 3 : Buka Delphi sobat ! Perhatikan Pallete-nya. Jika seperti dibawah ini, berarti instalasi sudah sukses.


Office 2010 1

step 5 : Pada Pallete ExpressBar, Tambahkan Komponen dxBarManager dulu, setelah itu dxRibbon.
step 6 : klik dua kali komponen dxBarManager lalu tambahkan Beberapa Toolbar

Office 2010 2

step 7 : Klik Kanan Pada komponen dxRibbonTab1 -> Add Tab. kemudian pada masing-masing Tab ganti Captionnya pada Object Inspector

Office 2010 3

Step 8 : Klik 1 Kali Tab Home. Lihat Pada Object TreeView Sobat -> dxRibbon -> dxRibbonTab1 -> Group -> Add Item

Office 2010

Step 9 : Klik 1 Kali Item yang tadi ditambahkan pada Group (tdxRibbonTabGroup). Perhatikan Object Inspector Sobat. ToolBar -> Pilih Salah Satu Toolbar yang tadi dibuat dengan dxBarManager (Pada Step 6)

Office 2010 4

Step 10 : Ulangi Langkah 8 dan 9 Agar Semua Toolbar ditambahkan pada tdxRibbonTabGroup. Hasil Sementara Seperti dibawah ini :

Office 2010 5

Step 11 : Klik Kanan Pada salah satu dari tiga Toolbar tersebut -> Add Large Button. Ubah Captionnya sesuai Kebutuhan. Jika Ingin Menambahkan gambar Pilih LargeGlyph

Office 2010 6

Step 12 : Saya Kira Tugas Saya Sudah Selesai. Selamat Berkreasi dan Silahkan Kembangkan Sendiri
 Membuat Form Loading Splash Screen dengan Delphi

Membuat Form Loading Splash Screen dengan Delphi

Form Splash Screen adalah sebuah form yang pertama kali dijalankan pada saat aplikasi dibuka. Biasanya Form ini berisi seputar informasi yang sedang dijalankan sebelum form utama ditampilkan. contohnya dapat anda lihat ketika menjalankan IDE Delphi 7 atau Delphi XE5 anda. maka yang pertama kali muncul itulah yang disebut splash screen.

Berangkat dari hal itu saya tertarik untuk membuat postingan ini. tentang cara membuat form splash screen tersebut. Pada contoh ini saya memiliki 3 buat form dimana form pertama saya gunakan sebagai splash screen dan form kedua sebagai form utama. sedangkan form 3 sebagai form tambahan.

1. Buka File Delphi Projek anda dengan menekan CTRL+F11

2. Tambahakn SysUtils dalam Uses projek tersebut

3. Langkah terakhir silahkan ganti code setelah begin dan sebelum end. pada file projek tersebut dengan code berikut.

01// Splash Screen Delphi
02begin
03  SplashScreen := TSplashScreen.Create(Application);
04  try
05    SplashScreen.Show;
06    Application.Initialize;
07    SplashScreen.Update;
08    // Sesuaikan dengan Jumlah dan Nama Form yang digunakan
09    Application.CreateForm(TForm2, Form2);
10    Application.CreateForm(TForm3, Form3);
11    Sleep(5000); // Sesuaikan dengan keinginan anda
12    SplashScreen.Hide;
13    finally
14    SplashScreen.Free;
15    end;
16    Application.Run;
17    end;
4. Sebelum melakukan langkah ketiga diatas, Pastikan anda telah mengganti nama form1 dengan nama SplashScreen. sedangkan untuk form kedua dan ketiga biarkan saja.
Jika anda membutuhkan contoh projek saya. anda dapat mendownloadnya disini.

Sabtu, 14 Februari 2015

Cara Membuat Captha Di Delphi 7

Captcha biasanya digunakan oleh programmer untuk menambah pertahanan pada sebuah sistem yang dibangun. Captcha sendiri seringkali berupa kode-kode yang terdapat dalam sebuah gambar. Jumlah kode tentu saja bervariasi tergantung si pembuat captcha tersebut. Secara sederhana penggunaan captcha adalah untuk memastikan bahwa sebuah proses pada program benar-benar dijalankan oleh manusian (bukan robot atau script hacker) oleh karena captcha banyak kita jumpai pada aplikasi berbasis website.

Meski Aplikasi desktop jarang menggunakan Captcha, saya kira tidak ada salahnya jika kita belajar bagaimana memasang captcha pada inputan form seperti gambar dibawah ini sehingga sebuah aksi tidak akan dapat dilakukan jika kode captcha yang diketikan salah. Kita patut bangga karena komponen captcha dibuat oleh orang indonesia. Nama component captcha delphi ini adalah TCenadepCaptcha silahkan download disini.

Tutorial Cara Memasang Captcha Di Delphi

1. Install Komponen Captcha yang sudah anda download sebelumnya. Silahkan baca postingan sebelumnya jika anda tidak paham bagaimana menginstall komponen di delphi disini caranya sama seperti menginstall component aplha skin delphi.

2. Tambahkan sebuah komponen image dan beberapa komponen seperti gambar diatas kemudian tambahkan komponen captcha (biasanya di pallete terakhir) lalu atur propertinya seperti gambar berikut

Tutorial Cara Memasang Captcha Di Delphi

Contoh Source code lengkap implementasi captcha dan validasinya dapat anda download disini. Happy Coding. :)

Cara Membuat Koneksi Database Mysql Ke Delphi 7


Assalamu'alaikum wr wb.
Admin akan Sharing bagaimana Mengkoneksikan Database MySQL ke Delphi. Anggap saja Kita Akan Membuat software data siswa dengan database MySQL

Step 1 - Sekilas Tentang MySQL

MySQL adalah Database yang Multi Fungsi, Artinya Database ini dapat digunakan Oleh berbagai macam bahasa pemrograman entah itu java, php, Visual basic atau delphi. Karena kecanggihannya MySQL kerap menjadi Pilihan Dalam Membangun Aplikasi yang menampung banyak Data. kabarnya Untuk Data yang dapat ditampung oleh database ini hingga ratusan ribu data. Pada Saat Postingan ini dibuat, Tools-Tools MySQL berbasis Visual Sudah Banyak Kita Jumpai, entah Itu MySQL Front, HeidiSQL, PHPMyAdmin dan semacamnya. sehingga kita tidak perlu lagi mengetikkan perintah secara manual. enak bukan?. Admin Sendiri lebih condong ke PHPMyadmin Untuk Membuat Database Menggunakan MySQL.

Bagaimana Mendapatkan PHPMyAdmin ? Jawabannya adalah dengan cara menggunakan Beberapa Tools seperti xampp, appserve, vertigo serve, wampp serve. Dapat Anda Download Pada Situs Resminya.

Setelah Anda Download, Silahkan di Instal. Kemudian Jalankan Apache dan MySQL. Untuk Menjalankan PhpMyadmin, Buka Browser Anda Kemudian Ketikan alamat berikut : http://localhost/phpmyadmin 

Step 2 - Membuat Database

Untuk Membuat Database di MySQL dengan Tool PhpMyadmin caranya sangat mudah. Pertama-tama Pastikan Webserver dan MySQL anda sudah jalan.

Koneksi Database MySQL ke Delphi

Kedua, Buka Browser Anda lalu ketikan http://localhost/phpmyadmin 
Ketiga, Buat Database dengan mengetikan nama database lalu create
Keempat, Klik 1 kali Pada Database yang sudah anda buat

Koneksi Database MySQL ke Delphi

Kelima, Buatlah Tabel-Tabel sesuai Kebutuhan Anda. Pada Contoh Ini saya akan membuat tabel Buku dengan jumlah coloum=5.

Koneksi Database MySQL ke Delphi


Keenam, Isikan Keterangan Pada Masing-Masing Coloum Sesuai Keinginan Sobat
Koneksi Database MySQL ke Delphi

Untuk Urusan Database Kita Anggap Sudah Beres. Just For Sample. Kita Sudah Berhasil Membuat Database Belajar dengan 1 TabelBuku.

Step 3 - Koneksi Database MySQL Ke Delphi 

Untuk Mengkoneksikan Database MySQL ke Delphi, Disini Kita Membutuhkan sebuah component atau software Connector ODBC dari MySQL. Anda dapat Mendownloadnya Disini. Selesai Mendownload Silahkan Diinstal. Selanjutnya

Koneksi Database MySQL ke Delphi

Koneksi Database MySQL ke Delphi

Koneksi Database MySQL ke Delphi


Koneksi Database MySQL ke Delphi

Kosongkan Passwordnya Jika Anda Tidak Menggunakan Password Pada PhpMyAdmin. 
Sampai Disini Kita Sudah Berhasil Membuat Sebuah Datasource. Selanjutnya Buka delphi Anda.
Tambahkan Beberapa Komponen Pada Form Anda.

AdoKoneksi= ada di Pallete ADO
AdoQuery = ada di Pallete ADO
Datasource = Ada di Pallete DataAcces
DBGRID = Ada Di Pallete DataControl

Untuk Sementara, Begini Nih, Tampilan Form Saya

Koneksi Database MySQL ke Delphi

Nah, Mari Kita Atur Property Masing-Masing Komponen Untuk Mengkoneksikan database yang sudah kita buat, Caranya :

1. Klik 1 Kali Pada Komponen AdoKoneksi > Pada Objek Inspector : Login Prompt=False, Connection String=Build > Next >

Koneksi Database MySQL ke Delphi

Koneksi Database MySQL ke Delphi

Koneksi Database MySQL ke Delphi

2. Klik 1 Kali Pada Komponen Datasource > Pada Objek Inspector : Dataset=AdoQuery
3. Klik 1 Kali Pada Komponen AdoQuery > Pada Objek Inspector : SQL=select * from nama tabel yang berada di database, Connection=AdoKoneksi, Active=True
4. Klik 1 Kali Pada Komponen DBGRID > Pada Objek Inspector : Datasource=Datasource1
Yeeee Berhasil, Hasil Saya Seperti ini :

Koneksi Database MySQL ke Delphi

Membuat Laporan Quick Report Delphi 7

Assalamu'alaikum wr wb.
Fungsi Sebuah Laporan Tentu Sudah Sobat Pahami Bukan?
Pada Postingan ini. Admin Ingin Sedikit Share Bagaimana Membuat Laporan dengan Memanfaatkan Component QuickReport Dari Delphi. Caranya Bagaimana? Ikuti saja Langkah dibawah ini :

Pertama. Dan Yang paling Utama. Pastikan Anda Sudah Memahami Bagaimana Koneksi Database Ke Delphi Berikut Tentang CRUD (Create Read Insert Update dan Delete) Data pada Database Tersebut. Kenapa Penting? Karena Report alias Laporan akan Mengambil Data Dari Database. Jika Anda Belum Faham Bagaimana Koneksi Database dan CRUD Data Silahkan Baca Postingan Sebelumnya !

Kedua, Silahkan Tambahkan Component QuickReport dengan Cara Klik MenuComponent > Install Package > Add > Silahkan Cari Komponen-nya Pada"C:\Program Files\Borland\Delphi7\Bin" > Nama Componentnya adalahdclqrt70.bpl 
Selesai Menambahkan Component Silahkan Lihat Komponen yang sudah anda tambahkan Pada Pallete Terakhir.


Ketiga, Buka Menu File > Other > Report.
Keempat, Klik Dua Kali Pada Report Tersebut Lalu Atur Sesuai Kebutuhan > Apply > OK

Membuat Laporan Dengan QuickReport Delphi

Kelima, Tambahkan 1 Buah AdoQuery/AdoTable (Atur Koneksinya). Selanjutnya Masuk Ke Pallete QReport > Tambahkan Beberapa KomponenQRLabel > Atur Property-nya

Keenam, Tambahkan Beberapa Komponen QRDBText > Atur Property-nya.
Yang Perlu Diganti dalam Mengatur Property dari QRDBText adalah :

Dataset dan DataFiled pada Object Inspector.

Contoh Desain saya Seperti ini (Saya Memanfaatkan AdoQuery yang ada di Datamodule sehingga tidak perlu menambahkannya ke Form Quick Report)

Membuat Laporan Dengan QuickReport Delphi

Yang Terakhir, Untuk Memanggil laporan Yang Sudah Kita Buat Dengan Button, Tambahkan Kode ini 
1QReport.QuickReport2.Preview;
Hasil saya Seperti ini 

Membuat Laporan Dengan QuickReport Delphi

NB : Jika pada laporan anda hanya muncul 1 data sedangkan pada tabel database anda memiliki beberapa data, anda perlu mengatur setting Quickreport di Object inspector Dataset -> AdoQuery/AdoTable