procedure charactersListBoxKeyPress(Sender: TObject; var Key: Char);

This is charactersListBoxKeyPress, a member of class TForm1.