Crear form si solo tengo su nombre como string

[ASAPLTDA]

Código Delphi [-]
procedure CreateFormFromName( const FormName : string);
var 
  fc : TFormClass; 
  f  : TForm;
begin 
  fc := TFormClass(FindClass(FormName)); 
  f  := fc.Create(Application); f.Show;
end;

en la forma debe añadir:


initialization
RegisterClass(T Fnombre de la forma);

[ASAPLTDA]

https://stackoverflow.com/questions/...e-form-by-name

Código Delphi [-]
procedure TFMENU.CreateFormFromName(const FormName : string);
var
  ObjClass: TFmxObjectClass;
  NewForm: TCustomForm;
  w_ModalResult:Integer;
begin
 // ObjClass := TFmxObjectClass(GetClass(ClassName));
  ObjClass := TFmxObjectClass(GetClass(FormName));

  if ObjClass = nil then
    Exit;

  NewForm := ObjClass.Create(Self) as TCustomForm;
  if Assigned(NewForm) then
     begin
      NewForm.ShowModal(
      procedure(ModalResult: TModalResult)
      begin
        w_ModalResult:= ModalResult ;
 

      end);
     end;
end;

PD SOLUCION ENVIADA POR ULISES V EN WHATSAPP DELPHI EN ESPAÑOL