anchor.diff:    TAbBytes.StrPCopy(@PHeader.uid, AB_TAR_L_HDR_ARR8_0);  { Stuff zeros }
     TAbBytes.StrPCopy(@PHeader.gid, AB_TAR_L_HDR_ARR8_0);  { Stuff zeros }
     tempStr := PadString(IntToOctal(Length(Value)+1), SizeOf(PHeader.Size)); { Stuff Size }
  -  Move(tempStr[1], PHeader.Size, Length(tempStr));
  +  pBytes := TEncoding.ANSI.GetBytes(tempStr);
  +  Move(pBytes[0], PHeader.Size, Length(pBytes));
     TAbBytes.StrPCopy(@PHeader.ModTime, AB_TAR_L_HDR_ARR12_0);  { Stuff zeros }
     { Check sum will be calculated as the Dirty flag is in caller. }
     PHeader.LinkFlag := Ord(LinkFlag);  { Stuff Link FlagSize }
     TAbBytes.StrPCopy(@PHeader.Magic.gnuOld, AB_TAR_MAGIC_GNUOLD); { Stuff the magic }
     TAbBytes.StrPCopy(@PHeader.UsrName, AB_TAR_L_HDR_USR_NAME);
  -  AnsiStrings.StrPCopy(PHeader.GrpName, AB_TAR_L_HDR_GRP_NAME);
  +  TAbBytes.StrPCopy(@PHeader.GrpName, AB_TAR_L_HDR_GRP_NAME);
     { All else stays as Zeros. }
     { Completed with L/K Header }
   
  
positive.code: 
  procedure TAbTarItem.SetModTime(const Value: Int64);
  var
    S: AnsiString;
  begin
    if FTarItem.ItemReadOnly then { Read Only - Do Not Save }
      Exit;
    { ModTime is extendable in PAX Headers, Remember PAX extended Header Over Rule File Headers }
    FTarItem.ModTime := Value; { Store our Virtual Copy }
    S := PadString(IntToOctal(Value), SizeOf(Arr12));{ Stuff to header }
    Move(S[1], PTarHeader.ModTime, Length(S));
    FTarItem.Dirty := True;
  end;
  
  
negative.code:                         { 257-264, $101-108, identifier, usually 'ustar'#00'00' }
      UsrName : array [0..AB_TAR_TUSRNAMELEN-1] of Byte;
                          { 265-296, $109-128, username, null terminated ASCII string }
      GrpName : array [0..AB_TAR_TGRPNAMELEN-1] of Byte;
                          { 297-328, $129-148, groupname, null terminated ASCII string }
      DevMajor: Arr8;     { 329-336, $149-150, major device ID (UNIX style, ASCII coded Octal) }
      DevMinor: Arr8;     { 337-344, $151-158, minor device ID (UNIX style, ASCII coded Octal) }
  