Comando utilizado para o tratamento de exceções, segue um exemplo:
procedure TForm1.Button1Click(Sender: TObject);
var
x : Real;
begin
try
x:=StrToFloat(Edit1.Text);
except
ShowMessage('O valor digitado não é número');
end;
end;
O erro ocorrerá caso o valor informado em Edit1 não seja um número.
