Funciones que regresan valor

[zvf]

Quiero saber como se hace para que una funcion regrese un valor, y si es posible regresar mas de un valor en una funcion, dentro de la misma unit y como hacerlo cuando la funcion esta dentro de otra unit.

Por ejemplo la mando llamar:

Código Delphi [-]
  haz_algo (a,b);

y la funcion esta asi:

Código Delphi [-]
  procedure haz_algo (var1 : integer; var2: string) ;
  begin
    //aqui quiero que se regrese un valor
 end;

Y saber si es verdad que toma la variable a, dentro de la funcion con el nombre de var1 y la variable b con el nombre var2.

GRACIAS!