Dikarenakan seringnya ada thread yang menanyakan bagaimana cara memasukkan / menyimpan dan menampilkan data image (*.jpg) ke MySQL,
maka dengan ini saya membuat suatu tip dan trik tersebut. Untuk selanjutnya kita ikuti langkah berikut :
maka dengan ini saya membuat suatu tip dan trik tersebut. Untuk selanjutnya kita ikuti langkah berikut :
1. Pertama siapkan database MySQL (saya menggunakan versi 4.0.18) serta tablenya dengan field bertipe BLOB (mau BLOB, MEDIUMBLOB, atau LONGBLOB [asal jangan SpongeBob heheheheee... :D :D :D]).
Untuk langkah ini anda dapat menggunakan skrip berikut :
2. Buat aplikasi dengan komponen yang bisa membuat koneksi ke MySQL (disini saya menggunakan Zeos [bukan promosi lho]).
Set koneksinya dan sisipkan komponen Table. Isi Property 'TableName' pada komponen Table ke tabel 'gambar', dan aktifkan.
3. Tambahkan komponen TDataSource dan set properties 'DataSet' - nya ke komponen Table.
4. Tambahkan komponen DBNavigator untuk bernavigasi. Set property VisibleButtons pada nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh = false, karena kita disini hanya butuh untuk bernavigasi.
5. Klik ganda pada komponen table, dan klik kanan pada 'Field List Editor' dan pilih 'Add all field' atau Ctrl+F.
6. Tambahkan komponen TOpenPictureDialog untuk memudahkan dalam pencarian gambar JPG. Aturlah Property 'Filter' - nya supaya file yang di support hanya untuk file JPG.
7. Tambahkan komponen TImage dan atur posisi dan propertiesnya sesuai sengan keinginan anda.
8. Tambahkan komponen TButton untuk mengeksekusi TOpenPictureDialog dan set Captionnya dengan 'Cari Gambar'.
9. Buat fungsi yang akan menyimpan data gambar (.jpg) ke tabel dengan skrip berikut :
9. Klik ganda pada komponen TButton dan sisipkan skrip berikut :
10.Pada event OnDataChange pada komponen TDataSource, sisipkan fungsi untuk menampilkan gambar yang telah dibuat. Skripnya adalah sebagai berikut :
11.Coba aplikasi anda jalankan Apabila anda telah mengikuti langkah-langkah tersebut, maka anda telah berhasil membuat aplikasi yang dapat menyimpan serta menampilkan file gambar JPG dengan menggunakan database MySQL. Contoh source code dari aplikasi ini, dapat anda donwload di Public Folder dengan nama JPGMySQL.rar. Ingat!!! disini saya memakai komponen Zeos untuk koneksi ke MySQL. Anda dapat menggantinya dengan komponen kesayangan anda. Hint: Sebenarnya trik tersebut bisa di terapkan pada database apapun, asalkan field dari tabelnya bertipe BLOB. Sekian untuk tip's & trik's kali ini, sampai jumpa lagi di artikel selanjutnya dan Tetap Semangat !!!
|
2. Buat aplikasi dengan komponen yang bisa membuat koneksi ke MySQL (disini saya menggunakan Zeos [bukan promosi lho]).
Set koneksinya dan sisipkan komponen Table. Isi Property 'TableName' pada komponen Table ke tabel 'gambar', dan aktifkan.
3. Tambahkan komponen TDataSource dan set properties 'DataSet' - nya ke komponen Table.
4. Tambahkan komponen DBNavigator untuk bernavigasi. Set property VisibleButtons pada nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh = false, karena kita disini hanya butuh untuk bernavigasi.
5. Klik ganda pada komponen table, dan klik kanan pada 'Field List Editor' dan pilih 'Add all field' atau Ctrl+F.
6. Tambahkan komponen TOpenPictureDialog untuk memudahkan dalam pencarian gambar JPG. Aturlah Property 'Filter' - nya supaya file yang di support hanya untuk file JPG.
7. Tambahkan komponen TImage dan atur posisi dan propertiesnya sesuai sengan keinginan anda.
8. Tambahkan komponen TButton untuk mengeksekusi TOpenPictureDialog dan set Captionnya dengan 'Cari Gambar'.
9. Buat fungsi yang akan menyimpan data gambar (.jpg) ke tabel dengan skrip berikut :
|
|
10.Pada event OnDataChange pada komponen TDataSource, sisipkan fungsi untuk menampilkan gambar yang telah dibuat. Skripnya adalah sebagai berikut :
|
11.Coba aplikasi anda jalankan Apabila anda telah mengikuti langkah-langkah tersebut, maka anda telah berhasil membuat aplikasi yang dapat menyimpan serta menampilkan file gambar JPG dengan menggunakan database MySQL. Contoh source code dari aplikasi ini, dapat anda donwload di Public Folder dengan nama JPGMySQL.rar. Ingat!!! disini saya memakai komponen Zeos untuk koneksi ke MySQL. Anda dapat menggantinya dengan komponen kesayangan anda. Hint: Sebenarnya trik tersebut bisa di terapkan pada database apapun, asalkan field dari tabelnya bertipe BLOB. Sekian untuk tip's & trik's kali ini, sampai jumpa lagi di artikel selanjutnya dan Tetap Semangat !!!
Random Articles
- Aplikasi Modern Dengan Bahasa Pascal
- Membuat kontrol db aware
- Membuat Exe application Delphi sekecil mungkin
- Menggambar Kurva (Bezier)
- Proposal Proyek: qxpascal
- Menyembunyikan file dalam gambar dgn delphi II
- Tulis/Baca "string" di file .INI
- Check MySQL Service on Our PC
- Meng-Indonesia-kan Message Dlg
- Comport
AI Forward

๐ We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Recent Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago