Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #12  
Antiguo 23-08-2013
nefore nefore is offline
Miembro
NULL
 
Registrado: jun 2013
Posts: 25
Poder: 0
nefore Va por buen camino
Cita:
Empezado por ecfisa Ver Mensaje
Hola nefore.

Código Delphi [-]
...
uses DateUtils;

function DayName(aDate: TDate): string;
begin
  case GetUserDefaultLangID and $03FF of
    LANG_SPANISH: Result := LongDayNames[DayOfTheWeek(aDate)+1];
    LANG_ENGLISH: Result := LongDayNames[DayOfTheWeek(aDate)];
    //...
  end;
end;

// Ejemplo de uso:
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(DayName(StrToDate('22/08/2013')));
end;

Saludos.

Edito: Para la próxima, recuerda que debes crear un nuevo hilo para una nueva pregunta.
Ah muchas gracias! y disculpa nuevamente, me parece que no estoy con los pies sobre la tierra
Responder Con Cita
 



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
Demasiado tiempo para generar un informe. Miguel45 Impresión 5 16-04-2009 20:26:47
Controlar el tiempo de ejecucion cyber_zero Varios 1 22-09-2008 01:01:05
Controlar el tiempo actual Alexis7788 Varios 3 28-09-2006 20:14:21
No imprimir informe vicvil Impresión 1 30-07-2005 01:02:18
Problema al abrir informe desde formulario en acces novaten Tablas planas 3 15-04-2005 23:11:02


La franja horaria es GMT +2. Ahora son las 13:47:33.


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