Citat:
dejov:
Evo ovako, radim bazu u paradoxu, i jedna od tabela treba da ima stavku u kojoj ce se cuvati slike. Kako to da uradim, i kako posle da ucitam novu sliku u delfiju iz aplikacije?
Recimo da imas u tabeli polja:
Field name Type
------------------
Naziv slike A
Slika G (graficko polje)
Postavi na formu "OpenPictureDialog","Image","Edit"(upisujes naziv slike),BitBtn(Otvori sliku),BitBtn(Sacuvaj sliku),Tabelu,DataSource...
Formiraj proceduru na "Otvori sliku"
kod
----
if OpenPictureDialog1.Execute then begin
image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
Formiraj proceduru na Sacuvaj sliku"
kod
----
Table1.Edit;
Table1.Append;
Table1Naziv.Value:=Edit1.Text; {indeksirano polje}
Table1Slika.Assign(Image1.Picture);
Table1.Post;
Slike upisane u bazu mozes pogledati kroz DbImage