SecondsBetween

[ale_metall]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
minutos, segundos, segundosResto: Int64;  momento1,momento2:Tdatetime;
begin
momento1:=strtodatetime('20/10/07 22:30:10');
momento2:=(time)
segundos:= Function SecondsBetween(momento1,momento2): Int64;
minutos:= segundos div 60;
segundosResto:= segundos mod 60;
Edit1.Text:= IntToStr(minutos) + ' minutos y '
+ IntToStr(segundosResto) + 'segundos';
end;

Podrian decirme que estoy haciendo mal???

Delphi 6!!
los errores son: missing operator or semicolon.
Expression expected but 'FUNCTION' found
Missing parameter type
Unknown directive: 'minutos'

Aclaro, necesito trabajar con tipo de datos: tdatetime y que me devuelva enteros!!!

gracias amigos!!!