procedure charactersListBoxKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);

This is charactersListBoxKeyDown, a member of class TForm1.