Hola foro
Resulta que no se como devolver dos parametros de una funcion
Por ejemplo:
Código:
procedure TForm1.Button1Click(Sender: TObject);
var: Hora1, Min1, Hora2, Min2 : Integer;
TotHora,TotMin: String
begin
Instrucciones
.
.
// Se que una llamada normal seria asi
HorasMinutosEnTurno( Hora1, Min1, Hora2, Min2);
//Pero yo quiero que la funcion me devuelva dos valores
¿Como recogo aqui el valor de TotalHoras y el TotalMinutos de la funcion?
end;
Function HorasMinutosEnTurno(HoraInicio,MinutosInicio,HoraFinal,MinutosFinal:Integer):String;
var : TotalHoras, TotalMinutos : String
begin
Instrucciones
...
...
TotalHoras:= a lo que sea
TotalMinutos := a lo que sea
end ;
Muchas gracias de antemano.
Salu2.