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!!!