TRichEdit und [STRG+ENTER]

[Real_Thunder]

Ich habe volgenes Problem


Ich möchte das eine bestimmte Aktion Ausgelößt wird wenn ich die STRG + Enter Taste innerhalb eines Richtextes drücke

ok, es klappt auch über das OnKeyDown Ereignis:

Delphi-Quellcode:

procedure TMessage_Fenster.enter_textKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (ssCtrl in Shift) and (Key = VK_RETURN) then begin
    Key := 0;
    button1.Click;
    enter_text.clear
  end;
end;

Das ereignis wird auch ausgeößt.....
Doch wenn ich enter drücke, dann übernimmt er den Zeilenvorsub gleich wieder, und der Cursor steht in der 2. Zeile, das jedoch wegen dem Key:=0; nicht passieren dürfte...

währe nett wenn jmand eine Lösung hätte....

P.S. wenn ich es nur mit enter mache, dann benutze ich OnKeyPress

und dort macht er es wie gewollt.. doch bei onkeypress kann ich keine tastenkombination abfangen...

MfG Real_Thunder

[marabu]

Hallo,

vergiss OnKeyDown und definiere die Tastenkombination als ShortCut in deiner ActionList.

Grüße vom marabu

[Real_Thunder]

Wie Wo Wann mache ich das ?

Habe noch nie mit Actionlist gearbeitet...

Könntest du mir Erklären wie man das macht ?

[marabu]

Ziehe die Komponente TActionList aus der Standardpalette auf deine Form, Öffne deren Editor mit einem Doppelklick auf die Komponente und erzeuge eine Action. Trage bei ShortCut Strg+Enter ein und im event handler für OnExecute rufe deinen Code auf, falls RichEdit.Focused.

marabu

[Mavarik]

Zitat von marabu:

Hallo,

vergiss OnKeyDown und definiere die Tastenkombination als ShortCut in deiner ActionList.

Grüße vom marabu

Btw.:Wo ist der Vorteil?

Frank

[marabu]

Hallo Frank,

die Vorteile sind aus meiner Sicht

• ein standardisiertes und zentralisiertes ShortCut-Management (maintainability)
• die ShortCuts kommen garnicht erst bei den Controls an (information hiding)
• außerdem können sie so noch beim Kunden konfiguriert werden (useability)

Grüße vom marabu

[Mavarik]

Ahh ok...

Habe auch noch nicht damit gearbeitet...

Dacht immer die Kombo ist "nur" für die entsprechenden Buttonleisten da...

Werde es mir mal ansehen...

Grüsse Frank

[Real_Thunder]

Bekomme das Irgendwe nit gebacken... Finde den Shortcut STRG + Enter nicht und wie ordne ich die Actionlist dem TRichEdit zu ?

[marabu]

Nicht doch - mit dem Kopf durch die Wand!

Ich habe dir eine Demo angehängt, die dir zeigt wie du vorgehen kannst.

marabu

[Real_Thunder]

Ahhh.. mußte erstmal mit der Logik die hinter der Actionlist steht klarkommnen.... naja auf jedenfall es hat wunderbar Funktioiert..

DANKE

MfG Real Thunder