Fórum Mudar a cor Painel automatico #488337
08/08/2014
0
Pessoal Boa Noite,
Como fazer que o painel mude de cor automatico, quando chegar uma determinada hora ?
exemplo quando o relogio do computador chegar as 14:00 hrs automaticamente a cor do painel mude para vermelho
Obrigado Deus abenço
Como fazer que o painel mude de cor automatico, quando chegar uma determinada hora ?
exemplo quando o relogio do computador chegar as 14:00 hrs automaticamente a cor do painel mude para vermelho
Obrigado Deus abenço
Watson Rocha
Curtir tópico
+ 0
Responder
Posts
09/08/2014
Renato Rubinho
Buenos,
Coloca um Timer no Form.
No onTimer, quando atingir a hora desejada, mude a cor.
Abraççç,
Renato
Coloca um Timer no Form.
No onTimer, quando atingir a hora desejada, mude a cor.
procedure Timer1Timer(Sender: TObject);
begin
if FormatDateTime('hh:nn',Now) >= '14:00' then
Panel1.Color := 'clRed';
end;
Abraççç,
Renato
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)