Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Dia en DateTimePicker (https://www.clubdelphi.com/foros/showthread.php?t=12920)

nicocer 30-07-2004 20:39:01

Dia en DateTimePicker
 
Hola amigos !!!!!!!

Se puede averiguar de un DateTimePicker el Día (EJ: si es Lunes Marte ....etc)??? Seguro q va hace en ingles pero no importa.


Gracias , pero no lo puedo encotrar.
Saludos
Nicocer

roman 31-07-2004 02:17:04

En realidad no es un asunto del DateTimePicker sino de un valor TDate que es el tipo de datos de la propiedad Date del DateTimePicker.

Así pues, dada cualquier fecha (valor TDate) puedes usar la función DayOfWeek que te devolverá un número de 1 a 7 correspondiente al día de la semana (1 Domingo, 2 Lunes, 3 Martes, etc.)

Para convertir este número a una palabra puedes usar un arreglo:


Código Delphi [-]
const
  DiasSemana: array[1..7] of String = (
    'Domingo', 'Lunes', 'Martes', 'Miércoles', 'Jueves', 'Viernes', 'Sábado'  
  );

Resumiendo, obtienes el día de la semana (en español) con


Código Delphi [-]
DiasSemana[DayOfWeek(DateTimePicker.Date)];

// Saludos

marcoszorrilla 31-07-2004 14:56:49

También puedes hacer algo como esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(FormatDateTime('dddd',DateTimePicker1.date));
end;

Un Saludo.


La franja horaria es GMT +2. Ahora son las 08:07:28.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi