Em 09/05/06, Francisco Thiago <[EMAIL PROTECTED]> escreveu:
>
> for i:=0 to ComponentCount - 1 do
> if (Components[i].InheritsFrom(TDBEdit)) and
> TDBEdit(Components[i]).Field.Required then
> TDBEdit(Components[i]).Color = clRed;
>
>
> Você pode adaptar para perguntar se o componente tem a propriedade Field e
>
> algum tipo de modificador de cor.
> Ai ficaria show de bola.
>
> Se você usar herança de formulários, coloque isso no OnCreate do seu
> formulário básico.
>
>
> Se você aceitar a sugestão de descobrir as propriedades, poste o código
> aqui
> na lista pro pessoal poder utilizar. Okay?
>
>
> []'s e espero que sirva.
>
>
> Francisco Thiago de Almeida
> Enter & Plug Informática
> Divisão: Desenvolvimento e Banco de dados
> Franca / SP
> msn: [EMAIL PROTECTED]
> http://enterplug.no-ip.com/sistema_ctrc/
>
>
> ----- Original Message -----
> From: "Fellipe Henrique" <[EMAIL PROTECTED]>
> To: <delphi-br@yahoogrupos.com.br>
> Sent: Tuesday, May 09, 2006 3:54 PM
> Subject: Re: [delphi-br] Como pintar um Controle vinculado a um Field?
>
>
> Olá Luiz, não era bem isso... :o)
>
> O que eu quero é pintar o DBEdit, mas sem ter que menciona-lo, pois
> imagina
> um cadastro com 50 campos? Queria algo meio genérico...
>
> Obrigado,
> []s
>
>
> Em 09/05/06, Luis Lopes <[EMAIL PROTECTED]> escreveu:
> >
> > if TField(SeuDBEdit.DataField).Required then
> > SeuDBEdit.Color = clRed;
> >
> >
> >
> > Luis Alberto
> > Belo Horizonte - MG
> >
> >
> > ---------------------------------
> > Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no
> > celular e anti-spam realmente eficaz.
> >
> > [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.ard.yahoo.com/SIG=12fuinp6a/M=396559.7942981.9356151.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1147206158/A=3634211/R=2/id=noscript/SIG=15494h0pu/*http://lt.dell.com/lt/lt.aspx?CID=12387&LID=335659&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs
> >
> > ------------------------------
> > *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]<
> [EMAIL PROTECTED]<http://[EMAIL PROTECTED]/?subject=Unsubscribe>
> >
>
> >
> > - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> > Serviço do Yahoo! <http://br.yahoo.com/info/utos.html>.
> >
> >
>
>
> --
>
> _________________________________
> Fellipe Henrique
> [EMAIL PROTECTED]
> "Venham até a borda, ele disse.
> Eles disseram: Nós temos medo.
> Venham até a borda, ele insistiu.
> Eles foram, Ele os empurrou...
> E eles voaram."
> (Guillaume Apollinaire)
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
> _______________________________________________________
>
> Abra sua conta no Yahoo! Mail: 1GB de espaço, alertas de e-mail no celular
> e anti-spam realmente eficaz.
> http://br.info.mail.yahoo.com/
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
>
> *Yahoo! Grupos, um serviço oferecido por:* PUBLICIDADE
>
> <http://br.ard.yahoo.com/SIG=12f340noq/M=396559.7942981.9356151.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1147219129/A=3634211/R=2/id=noscript/SIG=15494h0pu/*http://lt.dell.com/lt/lt.aspx?CID=12387&LID=335659&DGC=BA&DGSeg=DHS&DURL=http://www1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3ddhs>
> ------------------------------
> *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]<[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>.
>
>
--
_________________________________
Fellipe Henrique
[EMAIL PROTECTED]
"Venham até a borda, ele disse.
Eles disseram: Nós temos medo.
Venham até a borda, ele insistiu.
Eles foram, Ele os empurrou...
E eles voaram."
(Guillaume Apollinaire)
[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]
Yahoo! Grupos, um serviço oferecido por: | |
|
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 Termos do Serviço do Yahoo!.