3

という名前のテーブルを持つ ADO データベースを取得しましたt_codemeaning。以下はテーブル構造です。

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;

メモに1行追加すると、すべてFineです。

しかし、memo1 に複数行のテキストを追加すると、エラーが表示されます。

複数ステップの操作でエラーが発生しました。各ステータス値を確認してください。

これを修正するには？

私の最後の進歩として、新しい文字列変数 aValue を作成し、それに memo1.lines.text を追加しました。

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

そして、ADOQuery1codemeaning_description.value .... のスクリプトを次のように変更します。

ADOQuery1codemeaning_description.value := aValue;

それでも同じエラーが発生しました...

4

1 に答える 1

9

descriptionフィールドをMemoDB のように ( ではなく)定義してから、Textすべての永続フィールドを から削除し、タイプがADOQuery1になるようにそれらを再度追加します。ADOQuery1codemeaning_descriptionftMemo

エスケープまたは置換する必要はありませんCRLF。

于 2013-02-14T21:56:04.973 に答える