Fórum Criar Form sem declarar o mesmo na uses #267138
02/02/2005
0
Agradeço desde já.
Steve Narancic
Steve_narancic
Curtir tópico
+ 0Posts
02/02/2005
Paulo_amorim
Além do form que vc quer abrir, passe como parâmetro também a ComponentClass (TForm1, por exemplo) . Assim, vc faz:
supondo que seus parâmetros sejam Sender: TForm e TSender: TCOmponentClass, faça
Application.CreateForm(TSender, Sender);
Espero que ajude
Até+
Gostei + 0
02/02/2005
Steve_narancic
Gostei + 0
02/02/2005
Beppe
TFormClass = class of TForm; TLancadorCadastro = class(...) private FFormClass: TFormClass; ... public FormClass: TFormClass read FFormClass write FFormClass; ... end;
O código do clique no botão seria:
with FFormClass.Create(Application) do try ShowModal; finally Free; end;
Nas telas em que vc tem este componente, adicione a linha:
LancadorCadastro1.FormClass := TClientesForm;
ou
LancadorCadastro1.FormClass := TFornecedoresForm;
ou
...
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)