Werte aus Oracle Datenbank in Variable auslesen

[AnyKey]

Hi,

ich habe folgendes Problem, ich muss aus jeder Zeile in der Datenbank den wert in ein array speichern, um mir später daraus ein XML zusammen zu bauen. Das Problem an der sache ist jetzt dass ich die Werte nicht in mein array bekomme... hoffe es kann mir jemand helfen. -> ich denke mal mit welcher komponente man arbeitet wird relativ egal sein, geht nur um ein allgemeines beispiel.

Deklaration:

Delphi-Quellcode:

    ColumnFeatures: record
      RowsInDB: Integer;
      ColumnName: array of string;
      ColumnSize: array of Integer;
      ColumnType: array of Integer;

hier die stelle aus meinem Code an dem das Auslesen funktioniert:

Delphi-Quellcode:

    OraQuery1.SQL.Clear;
    OraQuery1.SQL.Add('SELECT COUNT (*) FROM '+Tabelle);
    OraQuery1.Active := true;
    ColumnFeatures.RowsInDB := OraQuery1.Fields[0].Value;
    OraQuery1.Active := false;

und hier wo ich eines der arrays befüllen will und immmer Fehlermeldungen bekomme.

Delphi-Quellcode:

 OraQuery1.SQL.Clear;
    OraQuery1.SQL.Add('SELECT TECO_FIELD_NAME FROM '+Tabelle);
    OraQuery1.Active := true;
    OraQuery1.Open;
    for i := 0 to ColumnFeatures.RowsInDB do
    begin
      ColumnFeatures.ColumnName[i] := OraQuery1.Fields[0].Text[i];
    end;

und zwar bekomme ich folgende Fehlermeldung schon beim ersten durchlaufen der Schleife:

Im Projekt ... ist eine Exception der Klasse EAccsessViolation aufgetreten. Meldung: Zugriffsverletzung bei Adresse ... in Modul ...'. Lesen von Adresse 00000000'.


Hoffe es kann mir jemand helfen. Ich habe in der zeile die in der Schleife ist auch schon versucht es über Fields[i].Value zu machen das funktioniert aber auch nicht.

Gruß
AnyKey