Forms dinâmicos

Delphi

19/09/2006

function Tform_Principal.CriarFormPeloNomeDaClasse(const ONomeDaClasse: String): TForm;
var
Classe: TFormClass;
begin
Classe := TFormClass(FindClass(ONomeDaClasse));
Result := Classe.Create(Application);
result.Show;
result.Top := 0;
Result.Left :=0;
end;
Nesta função eu crio forms via código, só que depois quando vou passar parâmtros para eles fico meio na onça, pois não tenho uma variável de referência, para chamá-la. Ex: form.show;
Gostaria de saber se há alguma forma melhor de procurar depois o form instanciado, sem ser: screen.forms[c]. etc, etc.
Valeu galera.


Cabal

Cabal

Curtidas 0

Respostas

Cesar Romero

Cesar Romero

19/09/2006

olha esta thread
http://forum.clubedelphi.net/viewtopic.php?t=80868&start=0&postdays=0&postorder=asc&highlight=

eu postei algo parecido


GOSTEI 0
POSTAR