Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Tastatureingabe abfangen und ersetzen (https://www.delphipraxis.net/145978-tastatureingabe-abfangen-und-ersetzen.html)

blooddog_90 11. Jan 2010 19:34


Tastatureingabe abfangen und ersetzen
 
Hallo, ich will bei einem Memofeld, verhindern das beim Memofeld die Leertaste erscheint.
D.h. ich muss den Tastendruck irgendwie abfangen. Ich schätze in "OnKeyDown" werde ich das realisieren mit Hilfe
von "Key".

Ja aber wie? :-D


Ich bin euch sehr dankbar für eure Hilfe.

s.h.a.r.k 11. Jan 2010 19:45

Re: Tastatureingabe abfangen und ersetzen
 
Ich nutze immer das OnKeyPress-Ereignis:
Delphi-Quellcode:
procedure TMemo1.OnKeyPress(Sender: TObject; var Key: Char);
begin
  if (key = #32) then
  begin
    key := #0;
  end;
end;

daywalker9 11. Jan 2010 19:47

Re: Tastatureingabe abfangen und ersetzen
 
hi!

fang das keypress von deinem TMemo ab und mach folgendes:
Delphi-Quellcode:
 
if key= #32 then key:=#0;

schade zu spät :(

blooddog_90 11. Jan 2010 21:14

Re: Tastatureingabe abfangen und ersetzen
 
Ja, das hab ich schon mal so gehabt. Nur ohne Raute Zeichen :-D

Dann danke ich euch recht herzlich!

Und wie entferne ich es sofort beim Copy&Paste?

s.h.a.r.k 11. Jan 2010 21:18

Re: Tastatureingabe abfangen und ersetzen
 
Das ist eine andere Frage, daher solltest du, nach ausreichender Suche, einen anderen Thread eröffnen! Hier im Forum solltest du aber alles finden was du brauchst. Ich habe damals die Windows-Botschaften abgefangen und den Text dann entsprechend geparst,


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz