Ispis podataka iz baze u Memo komponentu (BCB6)

[ dzesika60 @ 17.03.2010. 14:00 ] @

Pozdrav ,
interesuje me kako se moze prilikom prolaska kroz celu tabelu neka polja upisati u Memo komponentu.
npr. u slogu imam vise polja ali samo 2 polja zelim da prikazem u Memo komponenti na Formi , npr:
Table1->FieldValues["ime"] i
Table1->FieldValues["prezime"].
ako uradim ovako stampa samo poslednji slog i to pezime:

Code:
Table1->First();
while(!Table1->Eof)
{

Memo1->Text= Table1->FieldValues["ime"];
Memo1->Text= Table1->FieldValues["prezime"];

Table1->Next();
}

[ Wajda.W @ 17.03.2010. 16:41 ] @

Zato sto si u istu promenljivu smestila prvo ime, a zatim u tu istu prezime prepisala preko imena.
U oba slucaja ti stoji Memo1->Text, a trebalo bi da ti je jednom Memo1->Text, a jednom Memo2->Text
Ne mozes u jednoj promenljivoj pamtiti 2 podatka.

[ dzesika60 @ 18.03.2010. 09:56 ] @

Wajda ,kapiram tvoj odgovor, ali ja sam htela da program ispisuje svaki novi slog u novoj liniji Memo komponente.
Da li imas ideju pomocu koje komponente to da uradim?
Pozdrav

[ Wajda.W @ 18.03.2010. 14:45 ] @

Iskreno, ne radim sa BCB6, ustvari uopste ne radim sa BCB-om.
Ali mislim da bi mozda trebalo ovako nekako da se uradi.

Code:

Table1->First();
while(!Table1->Eof)
{

Memo1->AddNewLine();
Memo1->Text = Table1->FieldValues["ime"];
Memo1->Text += " ";
Memo1->Text += Table1->FieldValues["prezime"];

Table1->Next();
}

p.s. Ovo je samo neki psoudokod kako je mislim da bi trebalo da se uradi, ne znam koje metode postoje za memo komponentu.
Ako ne postoji ovakva metoda za novi red, onda probaj da posle svakog sloga na kraj stavis znak za novi red...
Ovako nesto:

Code:

Table1->First();
while(!Table1->Eof)
{

Memo1->Text = Table1->FieldValues["ime"];
Memo1->Text += " ";
Memo1->Text += Table1->FieldValues["prezime"];
Memo1->Text += "\n";

Table1->Next();
}

U svakom slucaju treba ce ti operacija konkatenacije (nastavljanja) stringova za kolone istog sloga da bi oni bili u istom redu, a ne operacija dodele, ona ce obrisati prethodne vrednosti.

Nadam se da sam nesto pomogao.
Pozdrav

[ tkaranovic @ 18.03.2010. 21:54 ] @

Isto ne koristim BCB6 nego ECB2010 ali bi ovaj kod koji šaljem trebalo da radi i u BCB6:

Code (cpp):

 Memo1->Text = Memo1->Text + Table1->FieldValues["ime"] + "\r\n";               //\r\n -> cflf

 Memo1->Text = Memo1->Text + Table1->FieldValues["prezime"] + "\r\n";

//ili:

 Memo1->Lines->Add(Table1->FieldValues["ime"]);

 Memo1->Lines->Add(Table1->FieldValues["prezime"]);

[ dzesika60 @ 22.03.2010. 10:27 ] @

tkaranovicu tenks, rade oba nacina.Ja sam iskomplikovala - presula sam podatke iz baze u file, a zatim sadrzaj file prikazala u Memo komp. Po tvom je skroz ok i jednostavnije.
Pozdrav.