anchor.diff:    HandIndex := 0;
     FillChar(IntParams, SizeOf(IntParams), #0);
     FillChar(WordParams, SizeOf(WordParams), #0);
  +  FillChar(SmallIntParams, SizeOf(SmallIntParams), #0);
     FillChar(FloatParam, SizeOf(FloatParam), #0);
     AnsiStrParam := '';
     for I := 0 to High(UnicodeStrParams) do
  
positive.code:   Result.WordParams[0] := aParam2;
    Result.WordParams[1] := aParam3;
    Result.WordParams[2] := aParam4;
  end;
  
  
  
negative.code:     gicpt_Int2:       Result := Result + Format('[%10d,%10d]', [Data.Integers[0], Data.Integers[1]]);
      gicpt_Int3:       Result := Result + Format('[%10d,%10d,%10d]', [Data.Integers[0], Data.Integers[1], Data.Integers[2]]);
      gicpt_Int1Word3:  Result := Result + Format('[%10d,%10d,%10d,%10d]', [Data.Integers[0], Data.Words[2], Data.Words[3], Data.Words[4]]);
      gicpt_Int1SmInt3: Result := Result + Format('[%10d,%10d,%10d,%10d]', [Data.Integers[0], Data.SmallInts[2], Data.SmallInts[3], Data.SmallInts[4]]);
      gicpt_AnsiStr1:   Result := Result + Format('[%s]', [ReplaceStr(Data.AsAnsiString(0), #0, '#')]);
      gicpt_Ansi1Int2:  Result := Result + Format('[%s]', [ReplaceStr(Data.AsAnsiString(0), #0, '#')]);
      gicpt_Ansi1Int3:  Result := Result + Format('[%s]', [ReplaceStr(Data.AsAnsiString(0), #0, '#')]);
  