My project is written with Delphi 12.1.
I have the procedure

procedure TFormXY.EditKeyPressPos(Sender: TObject; var Key: Char);

to control the entries of different TEdit fields.
I asign this procedure to TEdit objects during the

FormCreate(Sender: TObject);

This works fine for a TEdit but not for TLabeledEdit, for example by

LabeledEditXY.OnKeyPress            := EditKeyPressPos;

but why?