encontrar varios componentes
ola tenho um form com varios componentes EDIT e quero que ao iniciar a form, o programa me mostre quantos EDIT eu tenho na tela, nao sei se me fiz claro, por exemplo quando eu clico em um botao eu quero que uma variavel pesquise quantos componentes TEdit existem na minha form e me retorne o numero existente.[color=darkred:4ac964c3b1][/color:4ac964c3b1]
Jacksone
Curtidas 0
Respostas
Qmd
27/10/2003
var
i, qtde : integer;
begin
qtde := 0;
for i := 0 to Pred(ComponentCount) do
if Components[i] is TEdit then Inc(qtde);
ShowMessage( ´Número de TEdits encontrados : ´ + IntToStr(qtde) );
end;
:wink:
i, qtde : integer;
begin
qtde := 0;
for i := 0 to Pred(ComponentCount) do
if Components[i] is TEdit then Inc(qtde);
ShowMessage( ´Número de TEdits encontrados : ´ + IntToStr(qtde) );
end;
:wink:
GOSTEI 0