Datenbank - Ergebnisse von SELECT verarbeiten

Jason_Frost

Hi

mich würde interessieren wie ich das Ergebnis des unten dran stehen select aufrufs verarbeite? Genauer würde ich halt gerne die einzelnen elemente einer Selectanweisung in ein Array speichern und diese dann weiterzuverarbeiten! Also nicht in eine grafische ausgabe einbauen!

// Ein TTable erzeugen.
TQuery* Query = new TQuery(this);
Query->DatabaseName = "AccessMDB";
//table->TableName = "DomainTable";

//table->Active = true;

Query->SQL->Clear();
Query->SQL->Add("select * from DomainTable");
Query->Open();

[ Dieser Beitrag wurde am 10.08.2002 um 09:15 Uhr von Jansen editiert. ]

KlausB

Hallo

meinst du etwa soetwas?

aSQL = "Select * from 'auftragk.dbf'";
Query1->Close();
Query1->SQL->Clear();
Query1->SQL->Add (aSQL);
Query1->Open ();
AuftragNeu->iAufNr = Query1->Fields->Fields[0]->AsInteger + 1;

MfG
Klaus

Versuchs mal so:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
     int AnzSpalten=5;

     Query->Close();
     Query->SQL->Clear();
     Query->SQL->Add("select * from DomainTable");
     Query->Open();
     Query->First();

     while (!Query->Eof)
     {
           for (int i=0;i<=AnzSpalten;i++)
           {
               Memo1->Lines->Add(Query->Fields->Fields[i]->AsString);
           }
           Query->Next();
     }
}

Mir ist noch schleierhaft wozu Du die Table brauchst. Ausserdem erzeuge ich datenbankkomponenten grundsätzlich nicht zur Laufzeit, sondern platziere sie in einem extra Datenmodul, zwecks Übersichlichkeit.

MfG
F98
www.fatman98.de.vu -> Delphi -> Datenbanken

Sunday

zwecks speicherplatz macht es schon sinn die Querys oder Tables erst zur laufzeit zu erzeugen.

die anzahl der felder bekommt man über Query1->FieldCount;

Jason_Frost

Kann mich einfach nur bei euch bedanken ! Hab - denk ich mal - so ziemlich alle Infos die ich gebraucht habe nun zusammen