Q:  This question concerns how to transfer the text in a TMemo component on a form to a TMemofield in a Paradox table.  In the application in question, there is a TMemo field on the form and, when a Paradox record is read from the table, shows the contents of the memo field on the form by doing a TMemofield.lines.assign(TMemo).  This works fine to show the memo field on the form.  Then, the user  changes the text and we want to move the changed text back to the TMemofield.  You can't just do a  TMemofield := TMemo, like you can in Objectpal, and I've tried every combination I can think of and it either generates a syntax error or runtime error.  I don't want to use a db-aware component because of the way the application is designed.

A:  This is not necessarily so very easy.  I made an example for you.

procedure TForm1.Button1Click(Sender: TObject);
var
  t: TTable;
begin
t := TTable.create(self);
with t do
begin
  DatabaseName := 'MyAlias'; {personal alias}
  TableName := 'MyTbl.db';
  open;
  edit;
  insert;
  fieldByName('TheField').assign(memo1.lines); {This is it!}
  post; {required!!!}
  close;
end;  { End of the with statement. }
end;