Einzelnen Beitrag anzeigen

Borschti

Registriert seit: 1. Nov 2007
Ort: Marburg Lahn
235 Beiträge
 
Delphi 2007 Professional
 
#1

Memofeld in Tabelle schreiben?

  Alt 31. Mär 2008, 11:56
Datenbank: ADS • Version: 8.1 • Zugriff über: TDataSource u. TTable
Hallo,

ich habe ein kleines Problem mit dem wegschreiben von Daten in eine Tabelle, und zwar versuche ich den Text eines Memofeldes in ein Feld in einer Tabelle zu schreiben.

Nur das will nicht so ganz klappen, ich gebe euch am besten mal meinen Code damit ihr besser nachvollziehen könnt was ich meine:

Delphi-Quellcode:
for i := 0 to vddTable1.RecordCount do
   begin
     Memo1.Clear;
     Memo1.Text := VddTable1.FieldByName('Langtext').asstring;
     zwischS1 := Memo1.Lines.Count + zwischS1;
     Memo2.Lines.Text := Trim(Memo1.text);
     zwischS2 := Memo2.Lines.Count;
     zaehler := zwischS1 - zwischS2;
     zaehler2 := 0;
     zaehler2 := zaehler2 + zaehler;
     VddTable1.Edit;
     VddTable1.FieldByName('Langtext').asString := Memo2.Text;
     VddTable1.Post;
     vddTable1.Next;
   end;
Ich denke es liegt an einer kleinigkeit die ich außer acht gelassen hab, ist so ziemlich das erste mal das ich was mit .post mache also ist es ganz gut möglich das ich was vergessen hab

Danke schonmal für alle Antworten.

mfg
Alex
  Mit Zitat antworten Zitat