Fórum Mudar propriedade do componente atravéz do nome em uma strin #256812

01/11/2004

0

Salve pessoal do forum!
Eu tenho uma stringList onde tem o nome de alguns botoes existentes no meu Form eu gostaria de saber como faço para atribuir um valor a cada botão atravéz do nome ...
Por exemplo tenho na minha strngList:

Btn_Novo
Btn_Excluir
Btn_Salvar

Quero fazer com que a propriedade Enabled seja false -> Btn_Novo.Enabled := false;
E assim com todos os nomes de componentes que eu tiver na minha stringList


Mmoreira

Mmoreira

Responder

Posts

01/11/2004

Gurc

Bom, você poderá usar a função FindComponent da classe TComponent. Esta função procura um componente entre os outros (do array Components) de um possuidor (owner) da classe TComponent. Para usá-la coloque, por exemplo, a seguinte instrução no seu método de seu Form:

FListaDeBotoes: TStringList;

(...)

var
  i: Integer;

(...)

for i := 0 to FListaDeBotoes.Count - 1 do
begin
  (Self.FindComponent(FListaDeBotoes[i]) as TButton).Enabled := True;
end;


Isto deve resolver.
Qualquer dúvida, estamos aí.

Gustavo Royer Chaurais


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar