Hallo,
Ich habe folgendes Problem.
Ich versuche einen Export zu schreiben in diverse .dbf Dateien. Die dbf-Dateien sind mit der Struktur schon vorhanden und leer in einem Verzeichnis abgelegt.
Nun möchte ich diese Dateien abfüllen (siehe Code beispiel).
Nun erhalte ich immer einen EOutOfMemory...Obwohl genügent speicherplatz vorhanden ist und ich auch keine memoryleaks habe...
Zusagen ist das es ca. 35 Tabellen sprich .dbf-Dateien sind welche ich so abfülle.
Jemand eine Idee oder schon erfahrungen mit in .dbf Files exportieren?
Delphi-Quellcode:
FDbfFile := TDbf.Create(nil);
FDbfFile.FilePath := AFile.DirectoryName;
FDbfFile.TableName := AFile.FileName;
FDbfFile.ReadOnly := False;
FDbfFile.Open;
// Dann eine while schlaufe um die zu exportierenden Daten:
it.First;
while it.HasData do begin
FDbfFile.Insert;
// Dann hier ein Integer abfüllen
FDbfFile.Fields.FieldByName(AName).AsInteger := 0;
// Habe auch schon so probiert AValue = Int
FDbfFile.SetFieldData(FDbfFile.Fields.FieldByName(AName), @AValue, True);
it.Next;
FDbfFile.Post;
end;
FDbfFile.Close;
FDbfFile.Free;
Vielen Dank!