Hallöchen,
ich habe hier eine Tabelle TADMemTable, mit der ich die Struktur über FieldDefs erstelle, fülle und anschließend auf die Festplatte via SaveFoTile im Binärformat schreibe.
Problem:
Das Memofeld wird überraschend nach 10 Zeichen abgeschnitten
Wird eine Tabellenstruktur über eine TADMemTable auf dem Formular zur Designzeit erstellt und via DBGrid+DBMemo+DBNavigator zur Laufzeit gefüllt und im Binärformat gespeichert, so wird das Memo nicht abgeschnitten.
Jemand eine Idee, woran das liegen könnte?
Alle anderen mir bekannten Komponenten machen dies nicht.
Beispiel
Code:
[...]
Table.Create...
Table.FieldDefs.Add('Nr', ftInteger, 0, False);
Table.FieldDefs.Add('Name', ftString, 20, False);
Table.FieldDefs.Add('MemoFeld', ftMemo, 10, False);
try
Table.CreateDataSet;
Table.BeginBatch;
for i := 1 to 10 do begin
Table.Append;
Table.FieldByName('Nr').AsInteger := i;
Table.FieldByName('Name').AsString := 'x';
Table.FieldByName('MemoFeld').AsString := 'Das ist ein Memofeld';
Table.Post;
end;
Destin.EndBatch;
Destin.SaveToFile(<Filename.dat', sfBinary);
except
[...]
end;