[ruina]

como apunte de despues del café: sustituye ese mensaje por un raise:

Código Delphi [-]
raise exception.create('Conexión incorrecta');