O componente vcs vão achar no Planeta Delphi:
http://www.delphi.eti.br/arquivos.php?p=6&area=componentes
----- Original Message -----
From: Alexandre
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 01, 2006 8:29 AM
Subject: Re: [delphi-br] Cor quando receber focus
Desculpem-me colegas... O e-mail era p ser em pvt. Foi mal!
Alexandre
----- Original Message -----
From: Alexandre
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 01, 2006 8:22 AM
Subject: Re: [delphi-br] Cor quando receber focus
Olá Fabiano.
Pode enviar p mim tb...
Obrigado.
Alexandre
----- Original Message -----
From: Fabiano Frizzo
To: delphi-br@yahoogrupos.com.br
Sent: Monday, July 31, 2006 11:33 PM
Subject: Re: [delphi-br] Cor quando receber focus
Amigo Tenho um Componente Chamado SSCompXP ele Faz isso Automatico Para
vc ..
Se vc quiser me mande e-mail em PVT que te envio Ok
----- Original Message -----
From: Karin Schiochet
To: delphi-br@yahoogrupos.com.br
Sent: Monday, July 31, 2006 6:22 PM
Subject: Re: [delphi-br] Cor quando receber focus
Bem eu fiz da segunte forma em um programa que estou
fazerdo.
Criei uma Unit com nome Unitfunção e nela coloco os
procedimentos e funções de uso mais comuns.
Ex.
// Declaração dos procedimentos
procedure CorEntrada(Sender: TObject);
procedure CorSaida(Sender: TObject);
Implementation
Uses DB;
procedure CorEntrada(Serder: TObject);
Begin
if (Sender id TEdit) then
(Sender as TEdit).Color:= clActiveCaption
else if (Sender is TMaskEdit) then
(Sender as TMaskEdit).Color:=
clActiveCaption
else if (Sender is TMemo) then
(Sender as TMemo).Color:=
clActiveCaption
else if (Sender is TDBEdit) then
(Sender as TDBEdit).Color:=
clActiveCaption
else if (Sender is TDBMemo) then
(Sender as TDBMemo).Color:=
clActiveCaption
Fazendo a mesma coisa para a procedure CorSaida, e
depois basta colocar nos eventos "OnEnter" e "OnExit"
a chamada para essas procedures. Ex.
CorEntrada(Sender);
Espero ter ajudado,
Karin Klayton
>
> Alguem tem alguma rotina que quando o TEdit ou
> TComboBox receber o
> foco mudar de cor. Por exemplo, a cor do TEdit é
> branco quando o TEdit
> receber o foco mudar para a cor amarelo. Precisa ser
> uma rotina pois
> fazer em cada TEdit vai dar trabalho..rs
>
>
>
>
>
>
>
>
_______________________________________________________
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale
o discador agora!
http://br.acesso.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[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
