RichEditで、改行不可にするには？

解決

かんとく  2019-02-26 12:21:16  No: 49711  IP: 192.*.*.*

お世話になっております。
Windows10,DelphiXE2です。

「TRichEdit」を配置して、「WantReturns」のプロパティをFalse（Trueのチェックを外した）にしましたが、アプリケーションの実行時、そのRichTextでキーボードの「Enter」キーを押すと、改行してしまいます。

RichEditで改行しないようにするには、どうしたらよろしいでしょうか。
よろしくお願い申し上げます。

編集 削除
AAA  2019-02-26 17:52:03  No: 49712  IP: 192.*.*.*

procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
    if KEY = 13 then KEY := 0;
end;

編集 削除
かんとく  2019-02-27 13:46:19  No: 49713  IP: 192.*.*.*

ありがとうございました。
思うとおりになりました。
ちなみに、「RichEdit」の「WantReturns」プロパティが「True」のままでも、改行しなくなりました。

本当にありがとうございました。

編集 削除
あ  2019-03-02 22:11:48  No: 49714  IP: 192.*.*.*

参考までになのですが、ペーストで改行文字を貼り付けた場合、改行が入ってしまいませんか？

編集 削除
かんとく  2019-03-14 09:13:05  No: 49715  IP: 192.*.*.*

あさん、ありがとうございます。

ペーストで改行文字を貼り付けた場合、改行が入りました。
どうするか、もうちょっと考えてみます。
ありがとうございます。

編集 削除