Buscar

Como verificar se uma string contém um inteiro?

Código

 function IsInteger(TestaString: String) : boolean;
 begin
  try
  StrToInt(TestaString);
  except
  On EConvertError do result := False;
  else
  result := True;
  end;
 end;

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Object pascal
Adicionada dia: 06/06/03
Por: Felipe Monteiro
Visualizada: 12525 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009