anchor.diff:      procedure Write(const Value: Extended      ); reintroduce; overload; virtual; abstract;
       procedure Write(const Value: Integer       ); reintroduce; overload; virtual; abstract;
       procedure Write(const Value: Cardinal      ); reintroduce; overload; virtual; abstract;
  +    procedure Write(const Value: Int64         ); reintroduce; overload; virtual; abstract;
       procedure Write(const Value: Byte          ); reintroduce; overload; virtual; abstract;
       procedure Write(const Value: Boolean       ); reintroduce; overload; virtual; abstract;
       procedure Write(const Value: Word          ); reintroduce; overload; virtual; abstract;
  
positive.code: procedure TKMemoryStreamBinary.Read(out Value: Extended);       begin inherited Read(Value, SizeOf(Value)); end;
  procedure TKMemoryStreamBinary.Read(out Value: Integer);        begin inherited Read(Value, SizeOf(Value)); end;
  procedure TKMemoryStreamBinary.Read(out Value: Cardinal);       begin inherited Read(Value, SizeOf(Value)); end;
  procedure TKMemoryStreamBinary.Read(out Value: Byte);           begin inherited Read(Value, SizeOf(Value)); end;
  procedure TKMemoryStreamBinary.Read(out Value: Boolean);        begin inherited Read(Value, SizeOf(Value)); end;
  procedure TKMemoryStreamBinary.Read(out Value: Word);           begin inherited Read(Value, SizeOf(Value)); end;
  
negative.code:     procedure Write(const Value: Extended      ); override;
      procedure Write(const Value: Integer       ); override;
      procedure Write(const Value: Cardinal      ); override;
      procedure Write(const Value: Int64         ); override;
      procedure Write(const Value: Byte          ); override;
      procedure Write(const Value: Boolean       ); override;
      procedure Write(const Value: Word          ); override;
  