
(*
 Delphi Object and Component Reference
#{bmc bm10.BMP} Str example
function MakeItAString(I: Longint): string;
{ Convert any integer type to a string }
var
  S: string[11];
begin
  Str(I, S);
  Result:= S;
end;
begin
  Canvas.TextOut(10, 10, MakeItAString(-5322));
end; 
