Sandrila Ltd Delphi Code

// Converts an integer to its string equivalent
function  fStr(i: integer): string;

function fStr(i: integer): string;
var
  s: string;
begin
  Str(i, s);
  fStr := s;
end;

Home