:wacko: No componente Edit ou qualquer outro que que trabalha com string, ao converter para Integer um valor diferente de numeral a aplicação retorna com erro de incompatibilidade de tipo. Como poderia efetuar uma comparação no valor do componente antes de efetuar a converção de tipo? O Edit deverá aceitar somente a entrada de inteiros. editei as seguintes linhas if (Edit1.Text = '') or (Edit1.Text = "abcdef') or .... or.... then Edit1.SetFocus; Nessa condição é inviavel, haveria necessidade de comparar n possibilidade de valores no componente.
