Delphi 7 SynEdit - OnKeyDown - Ord('C') - löscht den Text .. soll aber Text kopieren

[paule32.jk]

Hallo,
ich nutze die SynEdit Komponenten für Delphi.
In der eigentlichen SynEdit Komponente fange ich ein OnKeyDown ab...
Das Event löscht mir aber den Text, und kopiert nicht einfach.
Woran kann das liegen ?

Ich verwende folgenden Code:

Code:

procedure TFrame19.CopyButtonClick(Sender: TObject);
begin
  SynEdit1.CopyToClipboard;
end;

procedure TFrame19.SynEdit1KeyDown(
  Sender: TObject; var
  Key   : Word;
  Shift : TShiftState);
begin
  if ssCtrl in Shift then
  begin
    if key = Ord('C') then begin CopyButtonClick(Sender);  exit; end;
  end;
end;