un Registrio que empiece de 1 cada mes!!

		Foros Club Delphi > Principal > Varios
un Registrio que empiece de 1 cada mes!!

Herramientas

Buscar en Tema

Desplegado

21-02-2008

rafita

Miembro

Registrado: ago 2003

Ubicación: Cuenca- España.

Posts: 309

Poder: 23

Hola,

prueba algo así

Código:

var FechaDesde, FechaHasta : TDateTime;
     Dia, Mes, Ano : Word;

...

DecodeDate(DateTimePicker1.Date, Ano, Mes, Dia);
// primer día 
FechaDesde:=ReCodeDate(Ano, Mes, 1);
// último día
FechaHasta:=ReCodeDate(Ano, Mes, DaysInMonth(DateTimePicker1.Date));

Un saludo,

__________________
Rafita.

« Tema Anterior | Próximo Tema »

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Ultimo dia Viernes de cada mes	Ricsato	Varios	6	14-12-2006 00:08:52
Fondo de Cada Dia - MonthCalendar	jevo19100	OOP	3	06-02-2006 15:45:25
Interbase cada vez más lento...	AMINOA2R	Firebird e Interbase	1	17-11-2005 17:47:00
Una Transacción por cada Tabla????	AGAG4	Conexión con bases de datos	5	22-12-2004 03:24:44
Pulsar una letra en un DBgrid y que vaya al campo que empiece por esa letra	Nbull	SQL	8	16-12-2004 17:58:01

La franja horaria es GMT +2. Ahora son las 23:08:20.