HowTo: Datenfelder (MEMO) zu anderem Datentyp (RT) migrieren

[hacki]

Danke Xaver,

ich habe Delphi und die BDE bemüht und das erfolgreich:

Code:

 Var Memodata  : TStringList;

 Memodata := TStringList.Create;


 try
  MainForm.DB_UpgradeTable.FindFirst;

  While not DB_UpgradeTable.Eof do
  begin
    MainForm.DB_UpgradeTable.Edit;
    Memodata.Clear;

    Memodata.Text := MainForm.DB_UpgradeTable.FieldByName 
                                         ('UebBeschreibung').AsVariant;
    Memodata.Add(' ');
    Memodata.Add('nun kommt Feld2');

    Memodata.Append( MainForm.DB_UpgradeTable.FieldByName
                                         ('UebVariation').AsVariant );

    MainForm.DB_UpgradeTable.FieldByName
                      ('UebBeschreibungREd').AsVariant := Memodata.Text;
    
    MainForm.DB_UpgradeTable.Post;
    MainForm.DB_UpgradeTable.Next;
  end;
 finally
 end;


 Memodata.Free;

das funzt nun....

danke nochmal

gruß
Hacki