Acessar variável de Form criado dinamicamente via código
Galera, criei uma procedure para chamar meus forms para não ter que ficar repetindo o código sempre que for criar um form
A procedure:
procedure CriaForm(FormName: String);
var FormClass: TFormClass;
Form: TForm;
begin
FormClass := TFormClass(FindClass(FormName));
Form := FormClass.Create(Application);
//Form.Inserir := True;
Form.ShowModal;
Form.Free;
end;
Até ai tudo blz, como podem ver tem um código comentado ali:
Tenho o form de classe TfrmCadItens que estou chamando assim:
CriaForm('TfrmCadItens');
Nesse form tem a variável pública Inserir
Como comentei na procedure eu não consigo acessar essa variável, claro pois não tem como o delphi saber qual form estou chamando e agora como faço pra acessar isso dessa forma?
Obrigado!
Discussão (5)
Carregando comentários...