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

Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.

[es] :: Pascal / Delphi / Kylix :: Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.

[ Pregleda: 3513 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

bronko123

Član broj: 112716
Poruke: 4
85.222.164.*



Profil

icon Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.23.11.2006. u 06:24 - pre 212 meseci
Ne znam kako da ubacim sliku na formu Delphija iz ADO, a pri tome da u bazi bude upisana putanja? Pa eto ako neko ima malo vremena i za mene
 
Odgovor na temu

IgorMedo
Igor Madjeric
Doboj

Član broj: 101335
Poruke: 30
*.teol.net.



Profil

icon Re: Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.23.11.2006. u 07:42 - pre 212 meseci
Na paleti Additional imaš komponentu image. postaviš je na forum konektuješ se pročitaš putanju iz baze i učitaš je u sliku i to je to.
image1.Picture.LoadFromFile('Putanjaslike');
 
Odgovor na temu

bronko123

Član broj: 112716
Poruke: 4
85.222.164.*



Profil

icon Re: Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.23.11.2006. u 09:51 - pre 212 meseci
I dalje mi nije jasno

[Ovu poruku je menjao bronko123 dana 23.11.2006. u 13:55 GMT+1]
 
Odgovor na temu

badam

Član broj: 78553
Poruke: 97
62.108.111.*



+2 Profil

icon Re: Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.23.11.2006. u 14:16 - pre 212 meseci
onda detaljnije:
postavis na formu i jednu ADOQuery komponentu. konektujes je na bazu. u SQL joj ukucas:

Code:

SELECT * FROM nazivtabelesapoljemsaputanjomdoslike

dupli klik na ADOQuery1 i Add Fields. dodas Fieldove koji su ti potrebni (obavezno onaj koji sadrzi putanju do slike).

onda u OnCreate forme na kojoj se sve to nalazi stavis:

Code:

ADOQuery1.Open


a u ADOQuery1.AfterScroll stavis kako ti je IgorMedo rekao:

Code:

image1.Picture.LoadFromFile(ADOTable1nazivpoljasaputanjomdoslike.Value)


Pozdrav
 
Odgovor na temu

chips
Blazin Srdjan

Član broj: 14803
Poruke: 342
212.200.78.*



Profil

icon Re: Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.23.11.2006. u 21:16 - pre 212 meseci
procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
if Button = TNavigateBtn(nbInsert) then begin
OpenDialog1.Execute;
AdoTable1.FieldByName('slike').AsString:=OpenDialog1.FileName;
end;
if Button = TNavigateBtn(nbPost) then begin
Image1.Picture.LoadFromFile(ADOTable1.fieldbyname('slike').Text);
end;
end;

procedure TForm1.ADOTable1AfterScroll(DataSet: TDataSet);
begin
If ADOTable1.fieldbyname('slike').Text<>''then begin
Image1.Picture.LoadFromFile(ADOTable1.fieldbyname('slike').Text);
end;
end;





naprimer.
Sto puta sam ti SRPSKI rekao:
ono što jednom crack-uješ,
ne možeš više da patch-uješ!
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Ubacivanje slike u Delphi preko ADO. Molim Vas za pomoc.

[ Pregleda: 3513 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

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