Como retorno variables en un procedimiento
 

Hola a todos, nesecito ayuda de como retornar un valor en un procedimiento por ejemplo el siguiente seudocodigo:

Código Delphi [-]
procedure Buscar(registro:string, nombre:string);
             var
                 dato,edad:string;
             begin
                    proceso informacion
             end;

¿como hago para retornar los valores de dato y edad? Muchas Gracias:)

Podes pasar parámetros por referencia:

Código Delphi [-]
procedure Buscar(Nombre: string; var Edad: Integer; var OtroDato: string);
begin
  //ubicar el registro;
  Edad := YearsBetween(Now, Alumno.FechaNacimiento);
  OtroDato := Alumno.NombreDeLaNovia;
end;

Hasta luego.

;)

Hola,

... porque los procedimientos no retornan valores como sí pueden hacerlo las funciones. :)