因为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;希望不用加标识符的办法,就能够解决
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;希望不用加标识符的办法,就能够解决
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货