Verificar se o componente existe ou não

Delphi

28/08/2004

Como eu verifico se um componente existe ou não por uma instrução IF?



[b:1bdd09e26c]Título editado: ´Componentes´[/b:1bdd09e26c]

Astrogobild,
Escreva o título da mensagem com uma descrição de sua dúvida. Por favor, releia as [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=6689]Regras de Conduta[/url] do fórum.
Sandra/Moderação


Astrogobild

Astrogobild

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

28/08/2004

Colega,

Algo mais ou menos assim :
....
var i: Integer
begin
  for i:= 0 to (Form1.ComponentCount - 1) do
    begin
      //Pelo Nome
      if Form1.Components[i].Name = ´Meu_Componente´ then
ShowMessage(´Achei vc !);
      // ou pela classe
      if Form1.Components[i] is TButton then
        ShowMessage(´Vc eh botão !); 
    end;
end;


Se não for isso, por favor, dê mais detalhes do que vc pretende para tentarmos ajudá-lo...

T+


GOSTEI 0
Oscar Candido

Oscar Candido

28/08/2004

Tente usar isso:
  if assigned(Form1.FindComponent(´Seucomponente´´)) then
  begin
      seus comandos...
   end;

Espero ter ajudado
Um Abraço


GOSTEI 0
POSTAR