ADO Oracle -Fehlermeldungen

[p80286]

hallo zusammen.

manchmal taucht folgende Fehlermeldung auf, ohne daß man sich einer Schuld bewußt ist:

Zitat:

Fehler bei einem aus mehreren Schritten bestehenden Vorgang. Prüfen Sie die einzelnen Statuswerte.

beim Wechsel der .Cursorlocation von clUseClient auf clUseServer wurde daraus:

Zitat:

Der Accessor ist kein Parameteraccessor

Nach einigem Hin und Her bin ich dann mit Hilfe der Fehlerausgabe auf die Fehlerursache gestoßen, Ein nicht ganz sauberes Datumsfeld to_char(meinfeld) ergibt 0004-11-11 00:00:00.
(Wo das wohl wieder herkommt??)
Hier meine Fehlerausgbe: (muß ich noch was dran tun, vor allem eine eigene Routine, und das with und .....)

Delphi-Quellcode:

sError : String;
iError : Integer;
dummy  : string; { Ausgabe-Datensatz }
dumfld : string; { Ausgabe-Datenfeld }
....
try
  dumfld:=DM_1.mQuery1.fields[i].AsString;
except
  with DM_1.ADOConnection do begin
    if errors.Count>0 then begin
      sError:='ADO-Error: '+CRLF;
      for iError := 0 to Errors.Count - 1 do begin
        sError:=serror+Format('RecordNo: %d %s',[cnt,dummy])+CRLF;
        sError:=serror+Format('FieldName: %s FieldNo: %d',[DM_1.mQuery1.fields[i].FieldName,i])+CRLF;
        sError:=serror+Format('FieldCont.: %s',[dumfld])+CRLF;
        sError:=serror+Format('Error-No.: %d)',[Errors[iError].Number])+CRLF;
        sError:=serror+Format('%s; (SQLState: %s)',[Errors[iError].Description, Errors[iError].SQLState])+CRLF;
        sError:=serror+Format('Source: %s', [Errors[iError].Source])+CRLF;
        sError:=serror+Format('NativeError: %d', [Errors[iError].NativeError])+CRLF;
        ShowMessage(sError);
      end;
    end;

Ich hoffe da kann der eine oder andere etwas mit anfangen.

Gruß
K-H