delphi的memo问题，怎么将在memo中输入换行后的多行数据都保存到数据库的一个字段下面

delphi的memo问题，怎么将在memo中输入换行后的多行数据都保存到数据库的一个字段下面
我的代码如下：
if not SameText(trim(Memo2.Lines.Text),'') then
begin
rzms:=Memo2.Lines.Text;//Memo2是在界面上接收输入的数据
rzID:='R'+FormatDateTime('yyyymmddhhmmss',Now());
With ADOQuery2 do
begin
Close;
SQL.Clear;
sqlstr:='insert into hrp_rwrz values('''+rzID+''','''+s+''','''+rwsxbs+''','''+datetimetostr(now)+''','''+rzms+''')';
SQL.Add(sqlstr);
ExecSQL;
end;
end;
在memo2中我输入以下数据：
a（回车后换行）
b
结果只要a被保存了，但是b没有被保存到这个数据库的nvarchar字段下
我按一位大哥的意思修改如下：
if not SameText(trim(Memo2.Lines.Text), '') then
begin
rzms := Memo2.Lines.Text; //Memo2是在界面上接收输入的数据
rzID := 'R' + FormatDateTime('yyyymmddhhmmss', Now());
with ADOQuery2 do
begin
Close;
SQL.Clear;
sqlstr := 'insert into hrp_rwrz values(''' + rzID + ''',''' + s + ''',''' + rwsxbs + ''',''' + datetimetostr(now) + ''',:rzms)';
SQL.Add(sqlstr);
Parameters.ParamByName('rzms').Value := rzms;
ExecSQL;
end;
end;
但是出现以下问题：
下面这句话执行怎么有错误啊，
Parameters.ParamByName('rzms').Value := rzms;
说rzms找不到
我已经声明定义rzms：string;
数据库里面这个字段是：ms
但我换了还不行啊