Fórum Buscar Forms do meu Sistema #264722
10/01/2005
0
Eis aqui a rotina, mas so me mostra formularios do Project/Options/Auto-Crete.
procedure TF_Menu.Button1Click(Sender: TObject);
Var
intC : Byte;
begin
For intC := 0 To Application.ComponentCount -1 Do
Begin
If(Application.Components[intC] is TForm)Then
ListBox1.Items.Add(TForm(Application.Components[intC]).Name);
End;
end;
Desde ja Agradeço se alguem me der um Retorno.
Obrigado.
Isaias
Isaiasn
Curtir tópico
+ 0Posts
11/01/2005
Isaiasn
Se alguem souber por favor me responda.
Obrigado.
Isaias
Gostei + 0
12/01/2005
Alexandresbo2
Entaum vc naum vai conseguir pegar os forms que estão do outro lado,pois como naum foram criados naum estão na memoria...
Uma vez precisei fazer algo parecido ....Entaum achei uma solução que é a leitura do exe( é bem complexo e se o aplicação for muito grande é demorado) e acabei desistindo disso. Bom se vc quiser posso procurar o fonte .
Gostei + 0
12/01/2005
Gandalf.nho
Duplicidade
[url]http://delphiforum.icft.com.br/forum/viewtopic.php?p=179314[/url]
Para maiores esclarecimentos pode mandar-me uma [url=http://delphiforum.icft.com.br/forum/privmsg.php?mode=post&u=8378]Mensagem Particular[/url].
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)