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.