Formularios creados por referencia

[cervexa]

Llamo a un formulario con:

  FormaClase:=TFormClass(GetClass('TExp'+inttostr((Sender as TToolButton).Tag)));
  if FormaClase<>nil then
    begin
      Forma:=FormaClase.Create(Self);
      Forma.ShowModal;
      Forma.Free;
    end;

Quería, antes del showmodal dar valores a variables publicas del form llamado, pero no sé como hacerlo. Y despues de cerrar el formulario recuperar el valor de esas variables.