Bei OnKeyDown wird noch Shift: TShiftState übergeben.
Wenn ssCtrl in Shift enthalten ist, wird die Strg-Taste gedrückt!
Delphi-Quellcode:
procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (ssCtrl in Shift) and (Key = 13) then
// ...
end;
@Cyberbob:
Warum kompliziert, wenn's auch einfach geht?