Fórum Como criar uma função (Function) #178203

Olá amigo,

A estrutura básica de uma função é a seguinte:

Function Nome_Funcao(Parametros) : Resultado;

Por Exemplo:

Function NumeroParaPalavra(Numero : Integer) : String;
begin
Result := IntToStr(Numero);
end;

Você deve notar que existe uma variável implícita (Result) que retornará o resultado da função.
Para declarar uma função sem parâmetros, faça da mesma maneira.
Por Exemplo:

Function Data_Atual : TDate;

Observando que TODA função deve retornar um resultado.
Caso não precise retornar o resultado, você deverá usar uma procedure.
Ex: Procedure Soma(A: Integer; B: Integer)

Espero ter ajudado.
Qualquer dúvida, entra em contato.

Barcelos
osbarcelos@hotmail.com