TADOQuery-Komponente

[Jumpy]

Ich hab eine Frage zur Komponente TADOQuery (hier q), also bitte ggf. verschieben, falls das hier am falschen Ort gefragt ist.

Ich verstehe nicht den Unterschied zwischen den Fields und Recordset. Hintergrund: Ich will die Datenmenge sequentiell durchgehen.

Delphi-Quellcode:

q.recordset.MoveFirst
while not q.Recordset.EOF do
  begin
  showmessage(q.recordset.Fields[1].Value); //Kommt oft Fehlermeldung von wegen Konvertierung von Typ variabel geht nicht.

  showmessage(q.Fields[i].AsString); //Das geht, zeigt aber immer nur (RecordsetCount mal) den ersten Datensatz an.
  q.Recordset.MoveNext;
  end;

Die folgende Variante ist ein Mischmasch, der irgendwie läuft, aber richtig kommts mir nicht vor:

Delphi-Quellcode:

q.recordset.MoveFirst
while not q.Recordset.EOF do
  begin
  showmessage(q.Fields[i].AsString);
  q.MoveBy(1);
  end;

Was ist nun der Unterschied zw. Fields und Recordset.Fields? Wie mach man das sauber?

[DeddyH]

Auf das Recordset musst Du im Normalfall gar nicht direkt zugreifen. Das Recordset ist die Ergebnismenge der Abfrage (also die Zeilen), Fields sind die Felder (also die Spalten), die Du abgefragt hast. Auf Fields kannst Du direkten Einfluss nehmen, auf das Recordset nicht.

Delphi-Quellcode:

q.First;
//zeilenweise durchgehen
while not q.EOF do
  begin
    //spaltenweise durchgehen
    for i := 0 to q.Fields.Count - 1 do
      ShowMessage(q.Fields[i].AsString);
    q.Next;
  end;

[p80286]

Zitat von Jumpy:

Ich verstehe nicht den Unterschied zwischen den Fields und Recordset. Hintergrund: Ich will die Datenmenge sequentiell durchgehen.

versuch es doch einmal so:

Delphi-Quellcode:

MyDM.ADOQuery1.open;
if not MyDM.ADOQuery1.eof then begin
  repeat
    ErgList.Add(MyDM.ADOQuery1.fields.FieldByNumber(1).asstring);
    //ErgList.Add(MyDM.ADOQuery1.Fieldbyname('feldname').asstring);
    MyDM.ADOQuery1.Next;
  until MyDM.ADOQuery1.Eof;
end;
MyDM.ADOQuery1.Close;

Gruß
K-H

[Jumpy]

Dank euch beiden, das reicht mir doch schon. Ich werd mal auf die Benutzung des Recordset verzichten und direkt durch die "Query wandern".