As vezes precisamos criar um Form em tempo de execução, a partir de uma classe especializada de TForm, apenas com métodos, criando os componentes dinamicamente, ex:

type
  TMyForm = class(TForm)
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  end;

E nos deparamos com o erro:

Project MyProject.exe raised exception class EResNotFound with message ‘Resource TMyForm not found’.

Solução:

  • Crie o formulário chamando o método TMyForm.CreateNew().
begin
  FMyForm:= TMyForm.CreateNew(Application);
  FMyForm.AlphaBlend:= True;
  FMyForm.AlphaBlendValue:= AlphaBlendValue;
  FMyForm.FormStyle:= fsStayOnTop;
end;

Atenção:

  • Este formulário não pode criado automaticamente pelo projeto.
  • Não pode ser criado pelos métodos Application.CreateForm() ou TMyForm.Create().
Bookmark and Share: