| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
aleshy Profissional

Registrado: Terça-Feira, 13 de Março de 2007 Mensagens: 627
|
Enviada: Seg Jul 26, 2010 11:32 pm Assunto: Controle do field required = true com cor (Resolvido) |
|
|
Boa noite amigos delphianos.
Preciso de um ajuda na seguinte questao:
Quero que os controles ligados aos fields do CDS que tem o valor REQUIRED = TRUE fiquem com uma cor X, tipo clInfoBk;
Entao quero fazer um loop verificando. Se o field é required = true entao o controle ligado a ele fica com a cor que pretendo.
Alguem ajuda? Tou perdido.
Valeu! _________________ Alex Vieira
Desenvolvedor
Salvador - Ba
Editado pela última vez por aleshy em Seg Jul 26, 2010 11:52 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
 |
rafmattos Colaborador

Registrado: Quinta-Feira, 11 de Fevereiro de 2010 Mensagens: 3416 Localização: Campo Grande/MS
|
Enviada: Seg Jul 26, 2010 11:43 pm Assunto: |
|
|
| Código: |
var
I : Integer;
begin
for I := 0 to Self.ComponentCount -1 do begin
if Components[I] is TDBEdit then begin
if (Components[I] as TDBEdit).Field.Required = TRUE then begin
(Components[I] as TDBEdit).Color := clInfoBk;
end;
end;
end;
end;
|
|
|
| Voltar ao Topo |
|
 |
aleshy Profissional

Registrado: Terça-Feira, 13 de Março de 2007 Mensagens: 627
|
Enviada: Seg Jul 26, 2010 11:51 pm Assunto: |
|
|
Tao simples que fica complicado
Valeu amigo! _________________ Alex Vieira
Desenvolvedor
Salvador - Ba |
|
| Voltar ao Topo |
|
 |
|