anchor.diff:  
   { // type conversion }
   
  -function Int2Str(const i: integer): string;
  -begin
  -  Str(i,Result);
  -end;
  -
  -function Int2Str(const i: int64): string;
  -begin
  -  Str(i,Result);
  -end;
  -
  -function Float2Str(const f: double): string;
  -begin
  -  //Str(f:0:2,Result);
  -  Result := FloatToStr(f);
  +function Int2Str(const i: integer; const w: integer = 0): string;
  +begin
  +  if w = 0 then Str(i,Result) else Str(i:w,Result);
  +end;
  +
  +function Int2Str(const i: int64; const w: integer = 0): string;
  +begin
  +  if w = 0 then Str(i,Result) else Str(i:w,Result);
  +end;
  +
  +function Float2Str(const f: double; const l: integer = 0; const d: integer = 0): string;
  +begin
  +  if (l > 0) or (d > 0) then Str(f:l:d,Result) else Result := FloatToStr(f); // Str(f,Result);
   end;
   
   function Bool2Str(const b: boolean): string;
  
positive.code: procedure WebRead(const newLine: boolean = false); overload; inline;
  procedure WebRead(var str: string; const newLine: boolean = false); overload; inline;
  procedure WebRead(var int: integer; const newLine: boolean = false); overload; inline;
  procedure WebRead(var int: int64; const newLine: boolean = false); overload; inline;
  procedure WebRead(var real: double; const newLine: boolean = false); overload; inline;
  procedure WebRead(var bool: boolean; const aLabel: string; const newLine: boolean = false); overload; inline;
  
negative.code: unit webCRT;
  
  (*****************************************************************************
    webCRT unit - v.1.1
    -------------------
  # Description: 
    This unit makes web development using Pascal becomes simple and easy. It's
  