eu uso assim.
Function Saudacao : string;
begin
result:='Boa-noite!';
if (time>=0.25) and (time<0.5) then result:='Bom-dia!';
if (time>=0.5) and (time<0.80) then result:='Boa-tarde!';
end;
como usar :
Label1.Caption:=Saudacao+' Hoje é '+formatdatetime('dddddd',date);
Francisco Oliveira
Desenvolvimento de Sistemas
e Rotinas com Fontes Delphi
ettv...@bol.com.br
--- Em delphi-br@yahoogrupos.com.br, "rafaelpinto19" <rafaelpi...@...>
escreveu
>
>
>
> Boa Tarde Galera,
>
> Pessoal, eu sei que é uma coisa bem básica, mas não
estou
> conseguindo resolver este problema:
>
> Quero Só colocar uma condição com Hora...exemplo... Se HORA
< =
> 11:59 tem que aparecer na Label1.Caption:= "Bom DIA" Se não := "BOA
> TARDE". Parece Ser uma coisa Bem Simples, mas não estou conseguindo
> resolver. Não sei se precisa colocar uma variável. Não sei se
tem qu
> econverter... Se alguém puder ajudar...iria ficar muito grato!!!!
>
[As partes desta mensagem que não continham texto foram removidas]
