RES: [delphi-br] Pegar o Nome do Componente

2005-12-13 Por tôpico Elazar
Gerson
 
  if (Sender as TPanel).Color = clRed then
 (Sender as TPanel).Color := clBlue
  else if (Sender as TPanel).Color = clBlue then
 (Sender as TPanel).Color := clRed;

 
me desculpe mas onde estou nao tenho delphi...mas a ideia e esta...voce
pode usar o Sender...que e passado como parametro do procedimeto clique.
 
Elazar;

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Gerson Thomaz Santos
Enviada em: segunda-feira, 12 de dezembro de 2005 18:00
Para: Delphi-BR
Assunto: [delphi-br] Pegar o Nome do Componente


GeleiraCaros amigos,

Creio que ja deve ter sido postado na lista, mas como eu ja procurei
entra as mensagens antigas e não encontrei, 

alguem sabe uma maneira bem simples de pegar o nome do componente que eu
cliquei:

O objetivo real é o seguinte:

Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele
pra amarelo. Até ai tudo bem, eu poderia usar:

if Panel1.color = 'clNavy' then Panel1.color:='clYellow';

mas ai é q o bicho pega.

tenho q fazer essa verificação em um quadro de paineis que tem só 672
paineis hehehe agora ficou chato né ter q fazer em um por um...


então o que eu queria era algo tipo:

if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then
PAINEL_QUE_EU_CLIQUEI.color:='clYellow';

Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o
nome do bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço
todos os outros 671 paineis terem o mesmo  painel1onclick...



UFA... espero que tenham entendido..

abração a todos...  


Atenciosamente,
Gerson Thomaz Santos
Analista de Sistema





[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Yahoo! Grupos, um serviço oferecido por:

PUBLICIDADE


 
http://br.rd.yahoo.com/SIG=12f3le36e/M=386470.7632849.8508174.2369893/D
=brclubs/S=2137111264:HM/Y=BR/EXP=1134428447/A=3135788/R=2/id=noscript/S
IG=12c39trgo/*http://ad.br.doubleclick.net/clk;22846485;12120066;a?http:
//www.hoteis.com 

  _  

Links do Yahoo! Grupos


*   Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  

*   Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED] 
  

*   O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




[delphi-br] Pegar o Nome do Componente

2005-12-12 Por tôpico Gerson Thomaz Santos
GeleiraCaros amigos,

Creio que ja deve ter sido postado na lista, mas como eu ja procurei entra as 
mensagens antigas e não encontrei, 

alguem sabe uma maneira bem simples de pegar o nome do componente que eu 
cliquei:

O objetivo real é o seguinte:

Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele pra 
amarelo. Até ai tudo bem, eu poderia usar:

if Panel1.color = 'clNavy' then Panel1.color:='clYellow';

mas ai é q o bicho pega.

tenho q fazer essa verificação em um quadro de paineis que tem só 672 paineis 
hehehe agora ficou chato né ter q fazer em um por um...


então o que eu queria era algo tipo:

if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then 
PAINEL_QUE_EU_CLIQUEI.color:='clYellow';

Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o nome do 
bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço todos os outros 
671 paineis terem o mesmo  painel1onclick...



UFA... espero que tenham entendido..

abração a todos...  


Atenciosamente,
Gerson Thomaz Santos
Analista de Sistema





[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Pegar o Nome do Componente

2005-12-12 Por tôpico Vitor Luiz Redes
if TPanel( Sender ).Color = clActiveBorder then
TPanel( Sender ).Color := clBlack
else
TPanel( Sender ).Color := clActiveBorder;

Vitor.

  - Original Message - 
  From: Gerson Thomaz Santos 
  To: Delphi-BR 
  Sent: Monday, December 12, 2005 6:59 PM
  Subject: [delphi-br] Pegar o Nome do Componente


  GeleiraCaros amigos,

  Creio que ja deve ter sido postado na lista, mas como eu ja procurei entra as 
mensagens antigas e não encontrei, 

  alguem sabe uma maneira bem simples de pegar o nome do componente que eu 
cliquei:

  O objetivo real é o seguinte:

  Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele pra 
amarelo. Até ai tudo bem, eu poderia usar:

  if Panel1.color = 'clNavy' then Panel1.color:='clYellow';

  mas ai é q o bicho pega.

  tenho q fazer essa verificação em um quadro de paineis que tem só 672 paineis 
hehehe agora ficou chato né ter q fazer em um por um...


  então o que eu queria era algo tipo:

  if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then 
PAINEL_QUE_EU_CLIQUEI.color:='clYellow';

  Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o nome do 
bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço todos os outros 
671 paineis terem o mesmo  painel1onclick...



  UFA... espero que tenham entendido..

  abração a todos...  


  Atenciosamente,
  Gerson Thomaz Santos
  Analista de Sistema





  [As partes desta mensagem que não continham texto foram removidas]



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Pegar o Nome do Componente

2005-12-12 Por tôpico Gerson Thomaz Santos
Vitãão...

Tu salvou minha noite Kra...


valeu mesmo amigo... agora vou sair um pouquinho mais cedo :D:D:D:D

brigadão kra...  deu certinho ..


Abração

Gerson
  - Original Message - 
  From: Vitor Luiz Redes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, December 12, 2005 9:01 PM
  Subject: Re: [delphi-br] Pegar o Nome do Componente


  if TPanel( Sender ).Color = clActiveBorder then
  TPanel( Sender ).Color := clBlack
  else
  TPanel( Sender ).Color := clActiveBorder;

  Vitor.

- Original Message - 
From: Gerson Thomaz Santos 
To: Delphi-BR 
Sent: Monday, December 12, 2005 6:59 PM
Subject: [delphi-br] Pegar o Nome do Componente


GeleiraCaros amigos,

Creio que ja deve ter sido postado na lista, mas como eu ja procurei entra 
as mensagens antigas e não encontrei, 

alguem sabe uma maneira bem simples de pegar o nome do componente que eu 
cliquei:

O objetivo real é o seguinte:

Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele 
pra amarelo. Até ai tudo bem, eu poderia usar:

if Panel1.color = 'clNavy' then Panel1.color:='clYellow';

mas ai é q o bicho pega.

tenho q fazer essa verificação em um quadro de paineis que tem só 672 
paineis hehehe agora ficou chato né ter q fazer em um por um...


então o que eu queria era algo tipo:

if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then 
PAINEL_QUE_EU_CLIQUEI.color:='clYellow';

Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o nome 
do bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço todos os 
outros 671 paineis terem o mesmo  painel1onclick...



UFA... espero que tenham entendido..

abração a todos...  


Atenciosamente,
Gerson Thomaz Santos
Analista de Sistema





[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





  Yahoo! Grupos, um serviço oferecido por: 
PUBLICIDADE
  
 


  --
Links do Yahoo! Grupos

  a.. Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

  b.. Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]

  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo!. 



  [As partes desta mensagem que não continham texto foram removidas]



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html