anchor.diff:          Item.SubItems.Add(IntToStr(fDemand[DemandID].Loc_Unit.UID));
         end
         else
  +      begin
           Item.SubItems.Add('nil');
  +        Item.SubItems.Add('-');
  +      end;
   
         if Serf = nil then
           Item.SubItems.Add('nil')
  
positive.code:         Item.SubItems.Add(IntToStr(Loc_Unit.UID));
        end
        else
          Item.SubItems.Add('nil');
  
        Item.SubItems.Add(GetEnumName(TypeInfo(TKMDemandType), Integer(DemandType)));
        Item.SubItems.Add(GetEnumName(TypeInfo(TKMDemandImportance), Integer(Importance)));
  
negative.code: 
        Item.SubItems.Add(IntToStr(fOwner));
        Item.SubItems.Add(IntToStr(aI));
        Item.SubItems.Add(gRes.Wares[fDemand[DemandID].Ware].Title); //Use demand ware, as offer could be nil after redispatching
  
        if fOffer[OfferID].Loc_House = nil then
        begin
          Item.SubItems.Add('nil');
          Item.SubItems.Add('-');
        end
        else
        begin
          Item.SubItems.Add(gRes.Houses[fOffer[OfferID].Loc_House.HouseType].HouseName);
  