Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 16-12-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 24
Caro Va por buen camino
Hola Vlady, supongo que te refieres al día que cae el primer día de mes, para ello puedes utilizar la función DayOfTheWeek que te da el día de la semana de un fecha X.

Código Delphi [-]
var
 Dia : Integer;
 FechaIni : TDateTime;
begin
 FechaIni := EncodeDate(2008,7,1);
 Dia := DayOfTheWeek(FechaIni);

Tu le pasas como parametros el mes y año, para el ultimo día de mes priemro tendrías que obtener cuantos días trae ese mes con EndOfTheMonth.

Edito.- Se me ha ido decirte que DayOfTheWeek te va ha devolver un valor entre 1 y 7, donde 1 es lunes, 7 domingo y asi respectivamente.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Tu primer condon winzo Humor 5 22-10-2008 00:12:50
primer programa y primer empleo josi La Taberna 36 17-07-2008 22:30:41
el primer condon gmontes Humor 9 17-05-2007 01:08:48
Mi primer ordenador!!!! FunBit Noticias 34 06-12-2005 23:22:10
Primer Registro alcides Varios 5 04-05-2005 17:34:37


La franja horaria es GMT +2. Ahora son las 01:20:57.


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