- Ich schreibe eine Komponente die von TCustomControl abgeleitet ist. Nun will ich das OnKeyDown/OnKeyPress-Event abfangen und bearbeiten, damit ich am Ende folgendes machen kann:
if Key=#13 then ProzedurAufruf(Params);
bzw.
if Key=VK_F1 then ProzedurAufruf(Params);
Sie dir doch den Quelltext von anderen TWinControl an, einfach
procedure KeyDown(var Key: Word; Shift: TShiftState); dynamic;
und
procedure KeyPress(var Key: Char); dynamic;
überschreiben... Wo ist das Problem...