[[poliburro]]

Código Delphi [-]
 
Try
  //Tu código
Except
  On Error: Exception do
     showMesage('Ocurrió el siguiente error: ' + Error.Message;
End