Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   DayOfTheWeek --- martes? lunes? -- en delphi? (https://www.clubdelphi.com/foros/showthread.php?t=15046)

raffagia 08-10-2004 03:46:23

DayOfTheWeek --- martes? lunes? -- en delphi?
 
perdon por seguir molestando pero, necesito una funcion para ssaber a partir de una fecha, ke dia es(lunes, martes,,etc.),, he leido soluciones pero desde la base de datos,,,
keria aalgo ke funcione desde delphi..
lei algo como una funcion,,

DayOfTheWeek(date:tdatetime)

pero parece ke no esta definida en el delphi normal...
como la uso??? o de donde la saco??

gracias

Raffaaa

marcoszorrilla 08-10-2004 07:34:37

Prueba con este ejemplo que es muy simple:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
MiFecha:Tdate;
begin
MiFecha:=Date;
ShowMessage(FormatDateTime('dddd',MiFecha));
end;

Un Saludo.

Lepe 08-10-2004 09:07:03

Si te refieres a Delphi Educacional o Personal.... pues no sé que decirte, en delphi 6 Empresarial si viene.
Código Delphi [-]
  function DayOfTheWeek(const AValue: TDateTime): Word;

Unidad DateUtils. Tambien hay otras funciones relacionadas para averiguar el 2º martes de un mes concreto, para ello puedes usar las funciones:
Código Delphi [-]
   DayDayofTheWeekInMonth(Fecha, y, m, an, d);
   function EncodeDayOfTheWeekInMonth(year, month, an, d):TdateTime
Donde an indica si es la primera semana del mes, segunda etc...

Saludos

raffagia 08-10-2004 18:04:05

Muchas gracias
 
muchas gracis a los dos,, anda barbaro con el

ormatDateTime('dddd',MiFecha));


tengp eñ delphi 7 enterprise,,, pero no encuentro la unidad date unit...
donde deberia estar??'

gracias

<RAffa

marcoszorrilla 09-10-2004 13:23:35

Añade a mano la unidad como en el ejemplo, pulsa la tecla control y sin soltar botón izquierdo del ratón sobre ella y se abrirá dicha unidad pudiendo ver así las funciones que contiene.
Código Delphi [-]
   interface
   
   uses
     Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
     Dialogs, StdCtrls, DateUtils;

Un Saludo.


La franja horaria es GMT +2. Ahora son las 18:41:10.

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