[Alegun]

Код:

var
  frmclss: TFormClass;
  f: TForm;
begin
  frmclss := TFormClass(FindClass('SomeString'));
  f:= frmclss.Create(Self);
  f.Show;
end;

до этого должна быть выполнена RegisterClass(TSomeString), без предварительной регистрации намного сложнее