Tienes varias posibilidades, la más rápida:
Usar un procedimiento de esta forma:
Código Delphi
[-]
Procedure HorasMinutosEnTurno(HoraInicio, MinutosInicio,
HoraFinal, MinutosFinal:Integer;
var TotalHoras, TotalMinutos: String);
Así devuelves en TotalHoras y TotalMinutos los valores que necesitas..
Claro, que si necesitas usar el valor de la función original solo para mostrarla, podrías componer la cadena a devolver:
Código Delphi
[-]
var
TotalHoras: Integer;
TotalMinutos: Integer;
begin
Result := Format(%d horas %d minutos', [TotalHoras, TotalMinutos])
end;
Otra opción sería crear un tipo registro que tenga los 2 valores y devolver en la función un registro de ese tipo...
Saludos...