Arsip: giamana cara nyimpan gambar ke db pake DBimage

more 13 years ago
putukaca
hi
di form saya isikan beberapa Tdbedit,Tdbimage dan Tbotton. Setelah semua diisikan, kok gambar nggak mau tersimpan ke DB ya? contoh tabelnya kita sebut tabel kawan yang berisi filed nama(varchar),alamat(Varchar) dan foto(blob). kode untuk menyimpannya (onclick pada Tbutton):
if dbedit1.field.asstring='' then
tbKawan.cancle
else
begin
tbKawan.Post;
tbkawan.refresh;
end;
ada bisa bantu nggak memperbaiki/nambahin kode diatas supaya gambarnya bisa kesimpan ke db. saya pake DB mysql.
thank's

more 13 years ago
putukaca
saya dah pake berbagai cara gambar tetap aja nggak mau kesimpan. saya pinginnya menyisipkan kode untuk simpan gambar pada kode yang saya kasikan berikut :
if dbedit1.field.asstring='' then
tbKawan.cancle
else
begin
tbKawan.Post;
tbkawan.refresh;
end;
nah harus diselipkan dibagian mananya? soalnya saya dah ubek2 tidak juga mau tersimpan ke DB. kalo pake TDBedit dengan kode diatas semua yang diisikan di TDBEdit tersimpan. help dong

more 13 years ago
mbahdien
pakai aja fungsi loadfile dari mysql. Jadi perintahnya menjadi 'Insert into gambar values(loadfile(path gambar))'. Dan gambar tadi di assign saja ke image(kalo aku biasanya pakai Timage nggak perlu TDBImage). And kalo gambarnya ekstensinya jpg atau jpeg pakai aja komponen ESDBIMage.

more 13 years ago
NiceDream
kl DBImage kan cm bisa file bmp aja, ada ga cara bwt nyimpen gambar yg ekstensi'a jpeg? maksud'a biar kecil kan kl bmp ukuran'a gede banget. Saya pernah dengar kt'a Tjpegimage tapi kok dicari lewat paman google ga ketemu2 yach? n sekali dapet cm cth sintax'a aja, ada yang tahu ga dimana cara download tjpegimage?

more 13 years ago
MrLee
harus di pisahkan pakai komponen TTable sendiri;
Table1.Edit; // Table1.append;
Table1FieldGbr.LoadFromFile('d:\gbrku.jpg');
Table1.post;
semoga terbantu;

more 13 years ago
donlego
// untuk load picture ke dbimage
table1.insert;
if OpenDialog1.Execute then
DBImage.Picture.LoadFromFile(OpenDialog1.filename);
// untuk save
if dbedit1.text='' then
table1.cancel else
table1.post;

more 13 years ago
alvonz
menurut saya sih gamabr jangan disimpan ke db apalagi gamabrnyayang gede ber mega2,udah aja di taruh ke folder cmn di dbnya simpan nama path dan nama file gambarnya. contoh
TTable1.fieldbyname('pathImage').asstring:=TEdit1.text;//Tedit1 disini isi dari path dan nama file
jadi db tidak terlalu besar
hanya saran saja sihh

more 13 years ago
NiceDream
@donie_a_hidayat: // untuk load picture ke dbimage table1.insert; if OpenDialog1.Execute then DBImage.Picture.LoadFromFile(OpenDialog1.filename); // untuk save if dbedit1.text='' then table1.cancel else table1.post;bukannya cara kaya gitu cuma ampuh sama file gambar BMP aja?n cara2 diatas emang bisa seh buat save gambar ke database tapi ga bisa diload

more 13 years ago
MrLee
maaf jika jawabannya kurang;
untuk load dari database harus di simpan ke file
dan jika JPG harus di tampilkan dgn TImage;
Table1FieldGbr.SaveToFile('d:\gbrku.jpg');
semoga berguna
more ...
- Pages:
- 1
- 2
reply |
Report Obsolete
Last Articles
- Project Group dalam Lazarus
- FastPlaz Database Explorer
- Release: FastPlaz Super Mom v0.12.22
- PascalClass #3: Web Development with Free Pascal
- Makna Pascal di Pascal Indonesia
- Kulgram : Instalasi Lazarus di Perangkat Berbasis ARM
- PascalClass #1: Analisa Database dan Machine Learning
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
- Mengenal OXYGENE – Pascal For .NET
- PascalTalk #5: UX: Research, Design and Engineer
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 3 months ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 months ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 months ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 1 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 8 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 8 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 8 years ago
Random Topic
- Koneksi Nokia & TComport
by wiedhodho in Network, Files, I/O & System more 13 years ago - blob atau link?
by simba in Bedah Kasus more 12 years ago - error koneksi mysql dari client ke server
by azharz in MySQL more 11 years ago - Permasalahan login ????
by sofian_coessoy in Bedah Kasus more 12 years ago - Solusi Ya Nih ..?
by umarbakri in Network, Files, I/O & System more 13 years ago - pascal dan unix
by simba in onLinux more 13 years ago - Sistem Informasi Geografis
by peucang in Hal umum tentang Pascal Indonesia more 13 years ago - Web Service dan ADO....?
by johnizzy in Tip n Trik Pemrograman more 12 years ago - komponen koneksi delphi7 ke mssql
by delphi_warrior in MsSQL more 11 years ago - Test your logic - QUIZ -
by ZeAL in OOT more 15 years ago