[es] - više inf iz baze u jednu čeliju???

saxa
nikolina zorica
student
zagreb

Član broj: 266531
Poruke: 55
*.adsl.net.t-com.hr.

Profil

^{09.10.2011. u 01:17 - pre 152 meseci}

IME VISIINA TEŽINA
maja 170 30
ana 155 40
tanja 160 50
petra 160 60

imam npr ovakvu bazu. I sad bih htjela ispisati u nekoj tablici (npr. StringGrid) podatke na način:

VISINA ---- TEŽINA ---- IME
160 ---- 50, 60 ---- tanja, petra

ovo je kod kojim izvlačim podatak u prvu kolonu

Form1.ADOQuery1.Close;
Form1.ADOQuery1.SQL.Clear;
Form1.ADOQuery1.SQL.Add('SELECT * FROM tablica WHERE VISINA Like 160);
Form1.ADOQuery1.Active := true;
Form1.ADOQuery1.Open;

i sad, kako da ubacim podatke u ostale kolone (čelije), s obzirom da su različiti i da ih trebam odvojit zarezom...

hvala unaprijed

Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739

+92 Profil

Re: više inf iz baze u jednu čeliju???

^{09.10.2011. u 21:48 - pre 152 meseci}

> ovo je kod kojim izvlačim podatak u prvu kolonu

> Form1.ADOQuery1.Close;
> Form1.ADOQuery1.SQL.Clear;
> Form1.ADOQuery1.SQL.Add('SELECT * FROM tablica WHERE VISINA Like 160);
> Form1.ADOQuery1.Active := true;
> Form1.ADOQuery1.Open;

> i sad, kako da ubacim podatke u ostale kolone (čelije), s obzirom da su različiti i da ih trebam odvojit zarezom...

Ti sa ovim upitom dobijaš sve kolone date tabele, za prikaz je najlakše da koristiš neki DBGrid, recimo default Delphijev TDBGrid. Ako mora u StringGrid onda ideš redom po dobijenim slogovima i ubacuješ ih, npr:

Code:

var
  Temp: string;
begin
  while not AdoQuery.Eof do
  begin
     Temp := AdoQuery.Fields[0].AsString + ',' + AdoQuery.Fields[1].AsString;
     StringGrid.Cells[0, 1] := Temp ; // Ne znam tacnu sintaksu ali otprilike je to ideja
     AdoQuery.Next;
  end;
end;

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Odgovor na temu

_deran_

Član broj: 69493
Poruke: 252
*.dynamic.sbb.rs.

+1 Profil

Re: više inf iz baze u jednu čeliju???

^{09.10.2011. u 22:04 - pre 152 meseci}

Za firebird bazu bi ovako nekako izgledao upit:

Code:
select visina, list(tezina), list(ime) from tablica group by visina

Nisi navela koja je baza u pitanju.

Odgovor na temu

saxa
nikolina zorica
student
zagreb

Član broj: 266531
Poruke: 55
*.adsl.net.t-com.hr.

Profil

Re: više inf iz baze u jednu čeliju???

^{10.10.2011. u 12:13 - pre 152 meseci}

Hvala SAVKIĆ to je to .. nisam znala da kad pišeš petlju

while not AdoQuery.Eof do

treba na kraju ić

AdoQuery.Next;

hvala ... radi

(btw ...ACCESS je u igri)

Odgovor na temu