anchor.diff:    var lItem := elements[aIndex];
     if lItem = nil then exit nil;
     if &type = typeOf(NSString)  then begin
  -    exit MZString.NSStringwithMonoInstance(^MonoString(lItem));
  +    exit MZString.NSStringWithMonoString(^MonoString(lItem));
     end;
     var lTmp := &type.alloc();
     exit id(lTmp).initWithMonoInstance(lItem);
  
positive.code:   var lElements := elements;
    if &type = typeOf(String) then begin
      for i: Integer := 0 to count -1 do begin
        lTmp[i] := MZString.NSStringwithMonoInstance(^MonoString(lElements[i]));
      end;
    end else begin
      for i: Integer := 0 to count -1 do begin
  
negative.code:   exit Foundation.NSString.stringWithCharacters(^unichar(mono_string_chars(^MonoString(instance)))) length(mono_string_length(^MonoString(instance)));
  end;
  
  class method MZString.NSStringWithMonoString(s: ^MonoString): NSString;
  begin
    if s = nil then exit nil;
    exit Foundation.NSString.stringWithCharacters(^unichar(mono_string_chars(^MonoString(s)))) length(mono_string_length(^MonoString(s)));
  