Como hacer para que una funcion regrese varios valores

[yusnerqui]

Hola
Esta otra también puede servirte:

Código Delphi [-]
Type
  TMyResult=Record
    V1:integer;
    V2:Real;
  End;

///después

Function MultiValor:TMyResult;
Begin
  Result.V1:=1;
  Result.V2:=5,67;
End;

Espero te sirva.

Saludos

[yusnerqui]

Hay que leer mejor, puse mi respuesta solo por el título de tu pregunta, lo ciento creo que lo que necesitas es pasar los parámetros de fecha a tu función por dirección en ves de por valor, así cuando esta retorne tendrá en dichas variables las fechas seleccionadas. Sería algo como:

Código Delphi [-]
function Input2Fechas(Caption:String;Msg:String;Var FechaI :TDateTime; Var FechaF:TDateTime ):Boolean;
var FF:TfrmInput2fechas ;
begin
FF:=TfrmInput2fechas.Create(nil);
FF.Caption:=Caption;
FF.lblTexto.Caption:=Msg;
FF.ShowModal;
FechaI:=FF.txtInicio.date;
FechaF:=FF.txtFin.date;
result:=FF.Resultado;
FF.Destroy;
end;

aunque aclaro que la solución de los records que te di tambien podría ser una vía, pero esta última se ajusta más a lo que tienes hecho.

Saludos