My project is written with Delphi 12.1.
I have the procedure
<code>procedure TFormXY.EditKeyPressPos(Sender: TObject; var Key: Char);
</code>
<code>procedure TFormXY.EditKeyPressPos(Sender: TObject; var Key: Char);
</code>
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
<code>FormCreate(Sender: TObject);
</code>
<code>FormCreate(Sender: TObject);
</code>
FormCreate(Sender: TObject);
This works fine for a TEdit but not for TLabeledEdit, for example by
<code>LabeledEditXY.OnKeyPress := EditKeyPressPos;
</code>
<code>LabeledEditXY.OnKeyPress := EditKeyPressPos;
</code>
LabeledEditXY.OnKeyPress := EditKeyPressPos;
but why?