Fórum function #203911

Boa tarde, eu de novo!

Já consegui desenvolver um dbnavigator para mim, que está funcionando redondo. Agora a minha dúvida é outra. Tenho o trecho de código a seguir:

***

function TDmoPrincipal.LocalizaUltimoRegistro(Conexao: TSQLConnection;Tabela: string;CampoCodigo: string): string;
var
qryRecupera: TSQLQuery;
UltimoRegistro: string;
begin
result := ´´;
qryRecupera := TSQLQuery.Create(Nil);
qryRecupera.SQLConnection := Conexao;

qryRecupera.SQL.Add(´SELECT MAX(´+CampoCodigo+´)´
+´ FROM ´ + Tabela;
qryRecupera.Open;

UltimoRegistro := qryRecupera.Fields[0].AsString;

result := UltimoRegistro;

qryRecupera.Close;
freeandnil(qryRecupera);
end;

***

O delphi está me indicando o seguinte erro: ´Function needs return type´.

Ele está bêbado? Eu indiquei o tipo de retorno da função que preciso (string), e estou utilizando a variável Result.

Estou esquecendo alguma outra coisa?

Ah, antes que me perguntem, o header da função está declarado na cláusula public.


Fico grato se alguém puder ajudar.
:D