如何从TMemo组件向MS Access数据库添加多行?

Sid*_*ang 3 delphi ms-access memo delphi-2010 tadoquery

我有一个名为ADO的数据库t_codemeaning,下面是表结构:

t_codemeaning
  codemenaing_code AS Text
  codemenaing_title AS Text
  codemenaing_description AS Text
Run Code Online (Sandbox Code Playgroud)

我添加了所有表格ADOQuery1.

我点击了这个Delphi脚本的按钮:

ADOQuery1.edit;
ADOQuery1codemeaning_title.value := edit1.text;  
ADOQuery1codemeaning_description.value := memo1.lines.text;  
ADOQuery1.post;
Run Code Online (Sandbox Code Playgroud)

当我在备忘录中添加单行时,那么每件事都很好.

但是当我在memo1中添加多行文本时,它会显示一个错误:

多步操作产生错误.检查每个状态值.

如何解决这个问题?


我的最后一个进展,我创建了一个新的字符串变量aValue并将memo1.lines.text添加到其中:

  aValue:=memo1.lines.text;
  aValue := StringReplace(StringReplace(aValue, '#10', '', [rfReplaceAll]), '#13', '', [rfReplaceAll]);
Run Code Online (Sandbox Code Playgroud)

我将ADOQuery1codemeaning_description.value ....的脚本更改为:

ADOQuery1codemeaning_description.value := aValue;  
Run Code Online (Sandbox Code Playgroud)

仍然有同样的错误......

kob*_*bik 9

在数据库中定义您的description字段Memo(而不是Text),然后从中删除所有持久字段ADOQuery1,然后再次添加它们,以便ADOQuery1codemeaning_description类型为ftMemo.

无需逃脱或更换CRLF.