| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
amg129
Ens
Registrado: 11 Oct 2006Mensajes: 44
|
 Publicado: Jue 26 Oct, 2006 1:47 pm Asunto: mostrar mensaje segun la hora del dia |
 |
|
//Mostrar SALUDO SEGUN HORA DEL DIA
unsigned short Hora, Minuto, Segundo;
DecodeTime(Time(),Hora, Minuto,Segundo);
if(Hora>7)&&(Hora<13)
ShowMessage("Buenos Dias");
if(Hora>13)&&(Hora<20)
ShowMessage("Buenos Tardes");
if(Hora>20)
ShowMessage("Buenos Noches ");
QUE FUCNION PUEDO UTILIZAR ??
DecodeTime no me vale |
|
| Volver arriba |
|
 |
seth
Cmdr
Registrado: 16 Nov 2003Mensajes: 129
|
| Publicado: Jue 26 Oct, 2006 3:50 pm Asunto: Tarea Programada |
|
|
Buenos Dias.
Puedes hacer una tarea programada en panel de control y que ejecute tu aplicacion a las horas que necesites y hay tomar la hora del dia y asi puedes enviar el mensaje valla de acuerdo a la hora....
saludos. |
|
| Volver arriba |
|
|
Angel
Master
Registrado: 15 Abr 2003Mensajes: 2311Ubicación: Toledo (España)
|
| Publicado: Jue 26 Oct, 2006 4:07 pm Asunto: |
|
|
Yo uso esta función. La puedes poner en el evento OnCreate o en OnCloseQuery del formulario principal.
| Código: | Word Whora, Wminu, Wsegu, Wmili;
DecodeTime(Time(), Whora, Wminu, Wsegu, Wmili);
if (100 * Whora + Wminu > 730 && 100 * Whora + Wminu < 1501)
cDespedida = "Buenos dias.";
else
if (100 * Whora + Wminu > 1500 && 100 * Whora + Wminu < 2101)
cDespedida = "Buenas tardes.";
else
cDespedida = "Buenas noches.";
cDespedida = "Fin de la sesión de trabajo. " + cDespedida;
ShowMesage(cDespedida);
return; |
_________________
Un saludo
Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA) |
|
| Volver arriba |
|
|
amg129
Ens
Registrado: 11 Oct 2006Mensajes: 44
|
| Publicado: Jue 26 Oct, 2006 6:00 pm Asunto: |
|
|
 Muchas Gracias Ángel, lo probaré |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
