Keyup Ereigniss dynamisch erzeugen?? Wie??

[Schuster]

Sorry

sollte vielleich auch die procedure schreiben.

Delphi-Quellcode:

procedure TFormErstellen.GebDatKdAnlegen_KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
    ShowMessage('hallo');
end;