Einzelnen Beitrag anzeigen

Real_Thunder

Registriert seit: 25. Apr 2006
197 Beiträge
 
#1

TRichEdit und [STRG+ENTER]

  Alt 26. Jul 2006, 10:36
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
  Mit Zitat antworten Zitat