Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Mehrzeiliges TEdit bzw. LineBreak in TMemo verhindern?

**PeterPanino**

Delphi-Quellcode:

			procedure TSchöneForm.SchönesMemoKeyPress(Sender: TObject; var Key: Char);

begin

  if Key = Chr(VK_RETURN) then

    Key := #0;

end;

Danke, das funktioniert aber nicht beim Einfügen aus der Zwischenablage - deswegen habe ich ja OnChange verwendet.

PeterPanino Registriert seit: 4. Sep 2004 1.465 Beiträge Delphi 10.4 Sydney	#9 AW: Mehrzeiliges TEdit bzw. LineBreak in TMemo verhindern? 13. Dez 2010, 10:01 Zitat von Björn Ole: markieren Delphi-Quellcode: procedure TSchöneForm.SchönesMemoKeyPress(Sender: TObject; var Key: Char); begin if Key = Chr(VK_RETURN) then Key := #0; end; Danke, das funktioniert aber nicht beim Einfügen aus der Zwischenablage - deswegen habe ich ja OnChange verwendet.
	Zitat