因为memo中有很多行,我用下面的办法不能保存回车换行。var
  str: string;
  i: integer;
begin
  with query1 do
  begin
    for i:=0 to memo1.lines.count-1 do
    begin
      str := str + memo1.lines.string[i];     //可以通过,但是不能保存memo的格式  
      //str := str + memo1.lines.string[i] + #13#10;  //数据库提交的时候保错
    end;
    Close;
    SQl.Clear;
    SQL.Add('update table1 set column1 = :value where column1 = ''value''');
    ParamByName('value').AsString := str;
    Execsql;
  end;
end;希望不用加标识符的办法,就能够解决