So das meiste hab ich jetzt selbst rausgefunden.
Ich muß jetzt nur noch die Procedure aufrufen aber da meckert der Compiler mit "nicht genügend wirkliche Parameter"
Code wie folgt:
Delphi-Quellcode:
procedure TForm1.EditKeyDownMarkiert(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ((Shift = [ssCtrl]) and (Key = $56)) then Einfuegen1Click;
end;