procedure charactersListBoxDrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);

This is charactersListBoxDrawItem, a member of class TForm1.