ClientDataSet speicherfehler [EDBClient Invalid Parameter]

**Kytrix**

Delphi-Quellcode:

			procedure TFMain.FormCreate(Sender: TObject);

Var sExePath: String;

    CDS: TClientDataSet;

begin

  sExePath:=ExtractFilePath(Application.ExeName);

  If not FileExists(sExePath+'UserMailDB.xml') then

  begin

    CDS:= TClientDataSet.Create(Self);

    CDS.FieldDefs.Add('Absender', ftString, 0);

    CDS.FieldDefs.Add('Empfanger', ftString, 0);

    CDS.FieldDefs.Add('Betreff', ftString, 0);

    CDS.FieldDefs.Add('Inhalt', ftMemo, 0);

    CDS.FieldDefs.Add('Datum', ftDateTime, 0);

    CDS.FieldDefs.Add('Bytes', ftInteger, 0);

    CDS.FieldDefs.Add('ID', ftAutoInc, 0);

    CDS.CreateDataSet;

    CDS.SaveToFile(sExePath+'UserMailDB.xml', dfXML); //Hier bekomme ich die Fehlermeldung//

    ClientDSOut.LoadFromFile(sExePath+'UserMailDB.xml');

  end

  else

  begin

    ClientDSOut.LoadFromFile(sExePath+'UserMailDB.xml');

  end;

end;

Ich bekomme an der markierten Quellcodestelle die Fehlermeldung "Projekt Projekt1.exe raised exception class EDBClient with Message 'Invalid Parameter'. Process stopped use Step or Run to continue."

Kann mir jemand weiterhelfen?

Danke im vorraus.

ClientDataSet speicherfehler [EDBClient Invalid Parameter]

ClientDataSet speicherfehler [EDBClient Invalid Parameter]

Forumregeln