1:
2:
3:
4:
5:
6:
7:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; 
Shift: TShiftState); 
begin 
  if (Form1.RichEditVorschau.Focused)=true then 
  begin
    if (Shift=[ssCtrl]) and (Key=67) then Key:= 0;
  end;					

1:
2:
3:
4:
5:

procedure TForm1.KlartextKeyDown(Sender: TObject; var GedrueckteTaste: Word; SpezialTasten: TShiftState);
begin
 if (GedrueckteTaste in [vk_Control]) or (ssCtrl in SpezialTasten) then GedrueckteTaste := 0;
 {Wird eine Pfeiltasten, Pos1, BilbAuf oder BildAb, Shift, Alt oder Steuerung gedrückt, wird sie nicht behandelt}
end;