procedure InsertItem(Index: Integer; const S: WideString; AObject: TObject); virtual;

This is InsertItem, a member of class TTntStringList.