Simplemente declara el record en la misma unit en que tienes la definición de tu función.
y cuando la llames puedes hacer algo así:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
g,h:Integer;
begin
g := Form2.MiFuncion(parametros).money;
h := Form2.MiFuncion(parametros).percent;
end;