Source position: tiObject.pas line 789
protected procedure TPerObjThreadList.SetItems(
i: Integer;
const AValue: TtiObject
); override;