Procedure Str (VarNumérica:comprimento:casas decimais , VarString)
                                                          opcional               opcional

Converte uma variável Numérica para uma variável String com a opção de formatação .

Exemplo:
var
   X: Real;
   Y:Integer;
   S1,S2:String;
begin
    X:= 154.3245;
    Y:= 3679;
    Str(X:5:2,S1);
    Str(Y,S2);
end;

Procedure Val(VarString, VarNumérica, Código:Integer)

Converte uma String para uma variável Numérica. O Código é uma variável do tipo Integer que conterá um código de erro (diferente de zero), para o caso de a string não ser conversível.

Exemplo:

uses Dialogs;
var
   I, Codigo: Integer;
begin
   { Pega texto na caixa de edição }
   Val(Edit1.Text, I, Codigo);
   { Erro durante conversão para inteiro? }
   if Codigo<> 0 then
       MessageDlg('Erro na posição: ' + IntToStr(Codigo), mtWarning, [mbOk], 0);
   else
       Canvas.TextOut(10, 10, 'Valor = ' + IntToStr(I));
end;