Source position: controls.pp line 318
type TUTF8KeyPressEvent = procedure(
Sender: TObject;
var UTF8Key: TUTF8Char
) of object;