Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Ubacivanje slika u bazu

[es] :: Pascal / Delphi / Kylix :: Ubacivanje slika u bazu

[ Pregleda: 1858 | Odgovora: 10 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.



+5 Profil

icon Ubacivanje slika u bazu06.06.2018. u 23:37 - pre 70 meseci
Kako da ubacim sliku u bazu pomocu adotable?Ja to uradio,kako sam mislio ali mi u bazi to polje pise longa data image,ili tako nesto....Meni treba da je ubacim,samu sliku ili putanju i da je posle vidim u dbgridu ili ako je bas velika,kada kliknem na neko polje da postavim neki image i da se tu prikaze?
 
Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.



+5 Profil

icon Re: Ubacivanje slika u bazu07.06.2018. u 12:22 - pre 70 meseci
Ovako ubacujem sliku,pomocu ovog koda...

ADOTable1.FieldByName('Slika').Assign(Image2.Picture.Graphic);

i access mi prikazuje u toj koloni 'long binary data'...
 
Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.



+5 Profil

icon Re: Ubacivanje slika u bazu07.06.2018. u 13:16 - pre 70 meseci
Uspeo sam to,ali samo sa bitmap slikama,ostale ne moze,da li postoji mogucnost da bira sve vrste slika?
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: Ubacivanje slika u bazu07.06.2018. u 13:20 - pre 70 meseci
To zavisi od Accessa, mozes li rucno iz Accessa da ubacis istu jpeg sliku koju pokusavas iz programa?
 
Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.



+5 Profil

icon Re: Ubacivanje slika u bazu07.06.2018. u 13:32 - pre 70 meseci
Mislim da nije do Accessa,vec do koda koji koristim,jer ima samo komponentu TBitmap,pa sa njom i radi,da li postoji neka univerzalna za sve formate slika,ili bar za većinu?
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: Ubacivanje slika u bazu07.06.2018. u 14:36 - pre 70 meseci
Ne kapiram kako samo TBitmap? Delphi moze raditi bez problema sa jpg, tiff, gif slikama, nove verzije i png.
 
Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.



+5 Profil

icon Re: Ubacivanje slika u bazu07.06.2018. u 14:44 - pre 70 meseci
Napravio sam da kada kliknem na dbgrid neki od redova,da mi sliku prikaze posebno na image,zbog velicine slika...a kod sam nasao na netu,ali ako promenim nesto u kodu,onda nece...

var
bmp: TBitMap;
begin
bmp := TBitmap.Create;
try

LoadBitmapFromBlob(bmp, TBlobField(adoquery3.FieldByName('Slika')));
Image2.Picture.Assign(bmp);
// bmp.SaveToFile(dlgopenpic1.FileName);
finally
bmp.Free;
end;


Procedure LoadBitmapFromBlob(Bitmap: TBitmap; Blob: TBlobField);
var
ms, ms2: TMemoryStream;
begin
ms := TMemoryStream.Create;
try
Blob.SaveToStream(ms);
ms.Position := 0;
Bitmap.LoadFromStream(ms);
finally
ms.Free;
end;
end;
 
Odgovor na temu

salvaric
Novi Sad

Član broj: 53995
Poruke: 204
*.dynamic.isp.telekom.rs.



+4 Profil

icon Re: Ubacivanje slika u bazu08.06.2018. u 08:19 - pre 70 meseci
Za slike ti je, što se tiče access baze, u koliko se radi o većoj količini slika, bolje da čuvaš u nekom dir nego u samoj bazi, a putanju samo u bazi, pa je samo prilikom selektovanja u ado komponenti očitaš putanju i otvoriš u TImage komponenti.
Nikad izvini!
 
Odgovor na temu

popmilan76

Član broj: 295089
Poruke: 1337
*.dynamic.isp.telekom.rs.



+5 Profil

icon Re: Ubacivanje slika u bazu01.10.2018. u 21:54 - pre 66 meseci
Da ne pisem ponovo..Pomocu ovog koda vrsim ubacivanje slika u bazu...

adotable1.Open;
...
ADOTable1.FieldByName('Slika').Assign(dbimage1.Picture.Graphic);
...
..
adotable1.Post;


Pitanje glasi kako da izmenim sliku,posto sva polja su mi dbedit,pa je i dbimage,jer ta tabela ima samo jedan rekord,pokusao sam da stavim umesto insert , edit,sto mi delovalo logicno međutim nista se ne desava...

 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: Ubacivanje slika u bazu01.10.2018. u 23:11 - pre 66 meseci
> Pitanje glasi kako da izmenim sliku,posto sva polja su mi dbedit,pa je i dbimage,jer ta tabela ima samo jedan rekord,pokusao
> sam da stavim umesto insert , edit,sto mi delovalo logicno međutim nista se ne desava...

Sa Edit bi trebalo da radi, npr ovako nesto za string polje:

Table.Open;
Table.First;
Table.Edit;
Table.Fields[0].AsString := 'Izmena';
Table.Post;

Ako ti i dalje ne radi za sliku, pokusaj preko LoadFromStream, pogledaj u helpu primer za TBlobField
 
Odgovor na temu

FranjoZG
Franjo Popović
Programer
Zagreb

Član broj: 328819
Poruke: 298
*.cust.tele2.hr.



+4 Profil

icon Re: Ubacivanje slika u bazu10.10.2018. u 16:37 - pre 66 meseci
Vidim da je tema stara, ali...
zašto koristiš Access a ne recimo FireBird koji je besplatan i Delphi s njim radi izvrsno?

Radio sam to s Firebirdom i nema problema s bilo kojom vrsom slike ili bilo čega.
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Ubacivanje slika u bazu

[ Pregleda: 1858 | Odgovora: 10 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.