Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   problemas con fechas (https://www.clubdelphi.com/foros/showthread.php?t=38119)

alfil123 04-12-2006 02:11:26

problemas con fechas
 
hola amigos tengo un problemita con dos DateTimePicker, bueno necesito que a uno se le asigne el ultino dia de un mes y al otro el primer dia de ese mes, bueno yo estaba pensando en usar 2 combobox uno con los mes o el otro con los años pero no encuentro la propiedad con la cual darle a los DateTimePicker el mes y el año del combo.
bueno gracias

fjav182 04-12-2006 02:41:40

Que tal, utiliza la propiedad Date del DateTimePicker para indicarle la fecha que quieras que te marque, puedes tomarla de un Combo o de un Edit, solo toma en cuenta que al utilizar un Text o Caption primero habra que convertirla a Date para que sea compatible con la propiedad del DateTimePicker.

Por ejemplo puedes asignar una fecha en un Edit llamado Edit1 y para asignar la fecha al DateTimePicker utiliza la siguiente instruccion:

Código Delphi [-]
DateTimePicker1.Date := StrToDate(Edit1.Text);


O bien puedes indicarle algun valor directamente o desde alguna variable sin necesidad de utilizar otro componente.

Claro que la fecha que le asignes debera respetar el formato establecido en el DateTimePicker p.ej. "dd/mm/aaa"

Espero te sirva de ayuda.

kuan-yiu 04-12-2006 12:55:53

Tienes la función EndOfAMonth que te devuelve el último día de un mes y StartOfTheMonth que te devuelve el primero.
Búscalas en la ayuda de Delphi, que seguro que encuentras todo lo que necesitas.

vtdeleon 04-12-2006 17:58:11

Cita:

Tienes la función EndOfAMonth que te devuelve el último día de un mes y StartOfTheMonth que te devuelve el primero.
No conocia esas funciones. Pero que funcion mas extraña la de StartOfTheMonth, pues se supone que todo mes comienza por 1.

Saludos

seoane 04-12-2006 18:04:40

Cita:

Empezado por vtdeleon
No conocia esas funciones. Pero que funcion mas extraña la de StartOfTheMonth, pues se supone que todo mes comienza por 1.

Y eso es exactamente lo que hace la función, devolver la fecha correspondiente al día 1. Últimamente delphi tiene funciones para todo :D

Código Delphi [-]
Result := EncodeDate(LYear, LMonth, 1);

vtdeleon 04-12-2006 18:11:18

Lo mejor seria
Código Delphi [-]
function StartOfTheMonth(...);
begin
result:=1;
end;
:D

kuan-yiu 04-12-2006 18:31:45

Cita:

Empezado por seoane
[...] Últimamente delphi tiene funciones para todo :D
[...]

Y las hay peores...
Hace unos meses necesité realizar una serie de controles muy estrictos con fechas y me leí todas las funciones que tiene Delphi en la ayuda... ¡¡Algunas incluso están repetidas!!


La franja horaria es GMT +2. Ahora son las 02:06:13.

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