FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Paso de parametros
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 ; Salu2. |
#2
|
|||
|
|||
Tienes varias posibilidades, la más rápida:
Usar un procedimiento de esta forma: 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: 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... |
#3
|
|||
|
|||
Ok. Mensaje captado.
¿Y la llamada de la funcion como seria para recoger los dos totales en variables diferentes? |
#4
|
|||
|
|||
La primera opción es un procedimiento, y la llamada sería más o menos así:
|
#5
|
|||
|
|||
Vale asunto solucionado.
Muchas gracias Marcos. Salu2 |
|
|
|