Como Chamar Uma Função ?

[Guest Alessandro]

Onde eu coloco essa função ?

function IsInteger(TestaString: String) : boolean;

begin

try

StrToInt(TestaString);

except

On EConvertError do result := False;

else

result := True;

end;

end;

Como eu faço para chamar ela ?

Eu sei que é simples mas eu não sei ainda....

[Corposemalma]

coloque a descricao da funcao no cabeçalho junto com as outras

function IsInteger(TestaString: String) : boolean;

o código pode ficar em quanlquer lugar da unit, depois do {Implemantation} e antes do end.

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

para usar:

if IsInteger(edit1.text) = true then
// faca o que precisar

Da uma olhada aqui tambem: http://scriptbrasil.com.br/forum/index.php...ndpost&p=109750 <- explicacao legalzim