Ir para conteúdo
Fórum Script Brasil

gildo

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Posts postados por gildo

  1. Olá Amigos.

    Pelo pouco que sei, para controlar exceções no delphi, isto é, evitar que o programa pare ao emitir mensagens de erro, bastaria utilizar a seguinte estrutura:

    try

    // O código que você quer controlar o erro

    except

    // O que deve ser feito caso aconteça o erro

    end;

    Mas está acontecendo, quando verifico se uma string contém números, utilizando a função abaixo descrita, que quando vai executar o comando StrToInt o programa, caso a string tenha letras, pára e mostra a mensagem de erro EConvertError. Como faço para que isto não ocorra, isto é, que o programa não pare com a citada mensagem de erro?

    function StrIsInteger(const S: string): boolean;

    begin

    try

    StrToInt(S);

    Result := true;

    except

    Result := false;

    end;

    end;

    Obrigado.

×
×
  • Criar Novo...