Crear form si solo tengo su nombre como string

[roman]

Algo como

Form := TForm(GetClass('TForm2'));

// Saludos

[RJF]

Gracias ROMAN aunque sigo con problemas, mira

Código Delphi [-]
var
i,j : Integer;
vFormu: TForm;
formu: Tformclass;
texto,cadena: string;
archivo,archivo2 : textfile;
begin
...
 
AssignFile(archivo,'listaForm.dat');
Reset(archivo);
while not Eof(archivo) do
begin
  Readln(archivo,texto);
  Formu := TFormClass(GetClass('form2')); //con 'Tform2' tampoco funciona
  Application.CreateForm(formu,vFormu);
  for j := 0 to vformu.ComponentCount -1 do
   if vformu.Components[j] is TButton then
   begin
    TButton(vformu.Components[j]).enabled := false;
    ShowMessage(TButton(vformu.Components[j]).Caption);
   end;
end;
CloseFile(archivo);
end;

Algo que vean mal ? Sugerencias ?

Editado:
Creo que estoy encerrado en mi problema, porque tengo que registrar la clase de Tform2 para que lo anterior funcione pero vuelvo a lo mismo solo tengo el nombre del formulario 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