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

时间:2013-02-14 21:20:06

标签: delphi ms-access delphi-2010 memo tadoquery

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

t_codemeaning
  codemenaing_code AS Text
  codemenaing_title AS Text
  codemenaing_description AS Text

我在ADOQuery1添加了所有表格。

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

ADOQuery1.edit;
ADOQuery1codemeaning_title.value := edit1.text;  
ADOQuery1codemeaning_description.value := memo1.lines.text;  
ADOQuery1.post;

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

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

  

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

如何解决这个问题?


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

  aValue:=memo1.lines.text;
  aValue := StringReplace(StringReplace(aValue, '#10', '', [rfReplaceAll]), '#13', '', [rfReplaceAll]);

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

ADOQuery1codemeaning_description.value := aValue;  

仍然有同样的错误...

1 个答案:

答案 0 :(得分:9)

在数据库中将description字段定义为Memo(而不是Text),然后从ADOQuery1中删除所有持久字段,然后重新添加,以便ADOQuery1codemeaning_description类型为ftMemo

无需转义或替换CRLF