[firebase-br] mudar propriedades dee componentes criado dinamicamente
João Borges Claudino Junior
joao.claudino em lanweb.com.br
Sex Fev 11 13:16:17 -03 2005
pessoal depois de criar componetes dinamicamente no meu formulário,
quero depois poder acessar suas propriedade, com faço isso?
estou criando eles assim:
procedure
TfrmPesquisaAv.cria_chk(inttop,intleft:integer;strname,strcaption:string;tag
:integer);
var
chk:TcheckBox;
begin
chk:=TcheckBox.Create(self);
chk.visible:=false;
chk.parent:=self;
chk.left:=intleft;
chk.top:=inttop;
chk.name:=strname;
chk.Caption:=strcaption;
chk.font.Color:=clBackground;
chk.Color:=$00F0F0F0;
chk.Font.Style:=[fsBold];
chk.visible:=true;
chk.Width:=250;
chk.Tag:=tag;
end;
depois tento acessar eles assim:
for cont:=0 to frmPesquisaAv.ComponentCount-1 do
begin
if ((frmPesquisaAv.Components[cont] is TCheckBox)and
( leftstr(inttostr(frmPesquisaAv.Components[cont].Tag),1)='1' )) then
begin
ShowMessage('chk');
// chk_checado(frmPesquisaAv.Components[cont],true);
// frmPesquisaAv.com
end;
end;
o problema é que quero mudar propriedades relativas a um certo tipo de
componemte mas na ultima a cima, não dá certo
alguém sabe a soulução?
Mais detalhes sobre a lista de discussão lista