Hola...
En tu método de clase liberas la forma que creas, así que al salir de la función,
Reference tendrá un valor no válido.
En este caso sería mejor solo hacer algo como:
Código Delphi
[-]
class function TParentForm.ShowWindow: TModalResult;
begin
with Self.Create(nil) do
try
Result := ShowModal
finally
Free
end
end;
Si te fijas, el método de clase no recibe ningún parámetro y solo devuelve el resultado de
ModalResult...
Saludos...