SystemStr (Delphi)

From RAD Studio Code Examples
Jump to: navigation, search

Description

This example makes a simple string conversion routine and then prints an integer to the screen.

Code

function MakeItAString(const ANumber: LongInt): String;
begin
  { Convert any ordinal type to string }
  Str(ANumber, Result);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Canvas.TextOut(10, 10, MakeItAString(-5322));
end;

Uses