TRichEdit schluckt Tastendrücke

[Der schöne Günther]

Ich lege einen Button auf ein Formular und gebe dem Button Cancel = True . Ab sofort kann ich mich darauf verlassen dass seine Aktion ausgelöst wird wenn jemand die Escape-Taste drückt.

Legt man ein TRichEdit auf das Formular funktioniert das nicht wenn das TRichEdit den Fokus hat. Wie komme ich da wieder raus? In meinem RichEdit interessiert es mich nicht ob jemand die Escape-Taste drückt.

[nahpets]

KeyPreview der Form auf True setzen und dann eventuell sowas?

Delphi-Quellcode:

procedure Tform1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  Case Key Of
    13 : Begin 
           // Hier das machen, was bei ESC passieren soll.
           DeinCancelButtonClick(Sender);
         End;
  End;
end;

[Der schöne Günther]

Ja, aber ich würde lieber die Ursache beim TRichEdit anfassen anstatt immer im Hinterkopf behalten zu müssen "Achtung, wenn ein RichEdit im Spiel ist, dann auf jedem Formular immer noch Sonderbehandlungen einbauen".

[Sherlock]

Das geht wohl recht in die Tiefe und ist ein altbekanntes Problem: http://stackoverflow.com/questions/2...n-tedit-doesnt

Du könntest also eventuell eine eigene Version des TRichEdit erzeugen, das den Esc-Key nicht mehr einfängt.

Sherlock

[Der schöne Günther]

Vielen Dank, das sieht so aus als ob man damit weiterkommen könnte.

Wenn auch unnötig viel Aufwand für so etwas

[mm1256]

Wobei aber die Vorgehensweise mit

Code:

KeyPreview = true

- bitte korrigiert mich wenn ich falsch liegen sollte - die einzige Lösung ist, die auch mit z.B. einem TMemo, einem DBGrid der den Focus hat usw. funktioniert.

[stahli]

Hat denn ESC eine Funktion im RichEdit? ("Änderungen verwerfen" oder so?)

Dann wäre der User vielleicht gar nicht erfreut, wenn das umgebogen würde...

[Der schöne Günther]

Das ist ein guter Einwand. Aber mir fällt kein Nutzen ein.

Für Enter und Tab würde mir einfallen dass man den sehr wohl im RichEdit haben möchte. Und tatsächlich dafür hat ein TRichEdit auch zwei Boolean-Eigenschaften WantReturns und WantTabs . Aber an die Escape-Taste scheint keiner gedacht zu haben...

[Klaus01]

https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx

Code:

Esc   Stop drag-drop.           While doing a drag-drop of text.

Grüße
Klaus

[Der schöne Günther]

Na klar! Vielen Dank!

Wieder was gelernt.