Se puede, pero has de utilizar la función
FindClass para buscar la clase a inicializar a través de su nombre y registrar dicha clase antes de localizarla utilizando el método
RegisterClass. Ej:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
x: string;
begin
x := 'TForm1';
with TFormClass(FindClass(x)).Create(Self) do
begin
ShowModal;
Free;
end;
end;
initialization
RegisterClass(TForm1);