Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Extraer el nombre del mes de una fecha (https://www.clubdelphi.com/foros/showthread.php?t=21538)

JODELSA 19-05-2005 21:36:25

Extraer el nombre del mes de una fecha
 
Hola!

Cual es la funcion que me extrae el nombre del mes de una fecha, y en que unidad estas?.

gracias.

vtdeleon 19-05-2005 21:41:18

Saludos

Creo que usando la funcion FormatDateTime lo puedes hacer
Código Delphi [-]
 edit1.text:=FormatDateTime('MMMM',now);
Esta en la unidad SysUtils en Delphi 7

Nelson Polanco 19-05-2005 23:08:25

Saludos.

Para encontrar el nombre del mes puedes usar este codigo.

procedure TForm1.Button1Click(Sender: TObject);
var
Present: TDateTime;
Year, Month, Day, Hour, Min, Sec, MSec: Word;
dias,mes,ano : Integer;
begin
Present:= Now; //Es la fecha actual del sistema
DecodeDate(Present, Year, Month, Day); //Funcion para decodificar la fecha
dias:= Day; //Para asignar el numero del dia
mes := Month;
ano := Year;
ShowMessage('El mes actual es: ' + LongMonthNames[mes]); //Nomre Largo del mes
// ShowMessage(ShortMonthNames[mes]); //Corto
end;

La funcion LongMonthNames es la clave.

Suerte.

Ing. Nelson Polanco
Rep. Dom.

jachguate 19-05-2005 23:21:24

Solo aclarar que LongMonthNames no es una función, es una variable de tipo Array of string declarada en SysUtils.

hasta luego.

;)

Delfino 19-05-2005 23:29:41

Tambien la funcion MonthOf(datetime) en la unidad DateUtils..


La franja horaria es GMT +2. Ahora son las 02:53:04.

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