Pegar nome do formulário runtime?
Olá,
Será que alguém sabe como posso pegar o nome de todos os formulários da minha aplicação e mostralos num memo?
tentei usar uma mesma rotina q tenho que limpa todo conteúdo dos edits mas não funcionol.
desde já agradeço toda ajuda.
Rodolfo Luiz.
Será que alguém sabe como posso pegar o nome de todos os formulários da minha aplicação e mostralos num memo?
tentei usar uma mesma rotina q tenho que limpa todo conteúdo dos edits mas não funcionol.
desde já agradeço toda ajuda.
Rodolfo Luiz.
Rood_luiz
Curtidas 0
Respostas
Denisbetim
15/09/2003
é o seguinte...
var i: integer;
begin
for i := 0 to application.componentcount-1 do
{ou for i := 0 to application.componentes.count-1 do}
begin
memo1.lines.add(application.components[i].name);
end;
espero que funcione... qualquer coisa me manda um email..
denisbetim@yahoo.com.br
var i: integer;
begin
for i := 0 to application.componentcount-1 do
{ou for i := 0 to application.componentes.count-1 do}
begin
memo1.lines.add(application.components[i].name);
end;
espero que funcione... qualquer coisa me manda um email..
denisbetim@yahoo.com.br
GOSTEI 0
Aristodemo
15/09/2003
é o seguinte...
var i: integer;
begin
for i := 0 to application.componentcount-1 do
{ou for i := 0 to application.componentes.count-1 do}
begin
memo1.lines.add(application.components[i].name);
end;
espero que funcione... qualquer coisa me manda um email..
denisbetim@yahoo.com.br
Olá Denis, nesta função todos os componentes da aplicação seriam listados... o + correto seria:
for i := 0 to Screen.FormCount-1 do ...Screen.Forms[i].name
Abraços...
GOSTEI 0
Denisbetim
15/09/2003
Não concordo, porque você estaria pegando os nomes dos componentes que tem como owner APPLICATION... e o que tem como owner application? formulários... para pegar nome de componentes de um formulário voce teria que fazer o seguinte:
application.components[i].components[j].name
teste antes de tudo!
application.components[i].components[j].name
teste antes de tudo!
GOSTEI 0