Criando uma Função em Delphi

private
	function <functionName>(<parameters>:<parameterDatatype>):<result dataType>;
    
Example:
	function Factors(iNum: Integer):Integer;
URANIUM235