Fórum Imagem Randônica ! Tem Como ? #188209
13/10/2003
0
Caros colegas ,
[size=24:2117ade424]Programadores[/size:2117ade424]
Fiz um sistema e na tela inicial , eu gostaria de por , por exemplo 2 imagens (TImage) , um com um [b:2117ade424]Papai-Noel[/b:2117ade424] e o outro um que simbolize [b:2117ade424]Ano Novo[/b:2117ade424] . Aí o meu sistema pega e começa a contar as datas , suponto , hoje é 24 de dezembro , na tela inicial tá em branco , sem nada , amanhã ( 25 de dezembro ) , o cliente acessa o sistema e a imagem que representa o natal aparece , um visible :=true ! E no outro dia 26 de dezembro , o usuário abre o sistema e a imagem já não está mais lá , o form volta a ficar em branco , e quando for 1 de janeiro a imagem que representa o Ano novo aparece !
Agradeço desde Já
[size=24:2117ade424]Programadores[/size:2117ade424]
Fiz um sistema e na tela inicial , eu gostaria de por , por exemplo 2 imagens (TImage) , um com um [b:2117ade424]Papai-Noel[/b:2117ade424] e o outro um que simbolize [b:2117ade424]Ano Novo[/b:2117ade424] . Aí o meu sistema pega e começa a contar as datas , suponto , hoje é 24 de dezembro , na tela inicial tá em branco , sem nada , amanhã ( 25 de dezembro ) , o cliente acessa o sistema e a imagem que representa o natal aparece , um visible :=true ! E no outro dia 26 de dezembro , o usuário abre o sistema e a imagem já não está mais lá , o form volta a ficar em branco , e quando for 1 de janeiro a imagem que representa o Ano novo aparece !
Agradeço desde Já
Tiagojmilam
Curtir tópico
+ 0
Responder
Posts
13/10/2003
Beppe
Tenta assim:
Ataliba
if (MonthOf(Date) = 12) and (DayOf(Date) = 25) then Image.Picture.Assign(imgNatal.Picture) if (MonthOf(Date) = 1) and (DayOf(Date) = 1) then Image.Picture.Assign(imgAnoNovo.Picture);
Ataliba
Responder
Gostei + 0
13/10/2003
Salupe
Pegue o dia e o mes da Data do Sistema e faça o caminho do image achar a imagem desejada para o dia em questão e o visible true.
Você terá que fazer vários ifs e elses, dependendo da quantidade de imagens, e no último else, o image terá o visible False;
Fazendo assim você só precisará de um image.
para indicar o caminho utilize a linha assim:
ImageLogo.Picture.LoadFromFile(´C:\pasta\imagem.Jpg´);
Espero ter ajudado
Você terá que fazer vários ifs e elses, dependendo da quantidade de imagens, e no último else, o image terá o visible False;
Fazendo assim você só precisará de um image.
para indicar o caminho utilize a linha assim:
ImageLogo.Picture.LoadFromFile(´C:\pasta\imagem.Jpg´);
Espero ter ajudado
Responder
Gostei + 0
15/10/2003
Rafaelgm
Tenta assim:
Ataliba
if (MonthOf(Date) = 12) and (DayOf(Date) = 25) then Image.Picture.Assign(imgNatal.Picture) if (MonthOf(Date) = 1) and (DayOf(Date) = 1) then Image.Picture.Assign(imgAnoNovo.Picture);
Ou então isso:
imgNatal.Visible := (MonthOf(Date) = 12) and (DayOf(Date) = 25); imgAnoNovo.Visible := (MonthOf(Date) = 1) and (DayOf(Date) = 1);
Rafael Monteiro
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)