Fórum Problemas com Componentes #190229
22/10/2003
0
Olá Galera,
Estou apanhando para identificar Componetes.
Tenho um Form com quatro botões (Bt1,Bt2,Bt3,BtControle) e Dois Edits(Edit1,EditNomeComponente). Estou tentando gerar um codigo para o botão BtControle que torne invisivel o controle que eu digitar o nome no EditNomeComponente.
Já usei um código onde identifico o tipo do Componente (TEdit, TButton, etc) e através do findcomponent torno falso a propriedade visible. Gostaria de saber se existe uma foram de fazer isso sem identificar o tipo do componente.
Tentei da forma abaixo e muitas outras mas não achei uma solução.
procedure TForm1.BtControleClick(Sender: TObject);
var
Componente : TComponent;
Classe : TClass;
begin
Componente:=FindComponent(´EditNomeComponente´);
Classe:=Componente.ClassType;
[color=red:c763d847d4] Classe(Componente).Visible:=False;[/color:c763d847d4]
end;
Onde tento torna-lo invisivel não acerto.
Abraço. :oops:
Estou apanhando para identificar Componetes.
Tenho um Form com quatro botões (Bt1,Bt2,Bt3,BtControle) e Dois Edits(Edit1,EditNomeComponente). Estou tentando gerar um codigo para o botão BtControle que torne invisivel o controle que eu digitar o nome no EditNomeComponente.
Já usei um código onde identifico o tipo do Componente (TEdit, TButton, etc) e através do findcomponent torno falso a propriedade visible. Gostaria de saber se existe uma foram de fazer isso sem identificar o tipo do componente.
Tentei da forma abaixo e muitas outras mas não achei uma solução.
procedure TForm1.BtControleClick(Sender: TObject);
var
Componente : TComponent;
Classe : TClass;
begin
Componente:=FindComponent(´EditNomeComponente´);
Classe:=Componente.ClassType;
[color=red:c763d847d4] Classe(Componente).Visible:=False;[/color:c763d847d4]
end;
Onde tento torna-lo invisivel não acerto.
Abraço. :oops:
Aavanco
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)