obtener automaticamente el AÑO EN DELPHI

[elmo333]

Hola a todos: Tengo una gran duda aver si alguien puede ayudarme

Estoy desarrollando una aplicacion en Delphi y tengo el siguiente problema, para un campo necesito obtener automaticamente el AÑO del sistema, solo eso el puro AÑO y en otra aplicacion necesito Obtener solamente el MES entonces aun no encuentro la forma de como hacerlo, ninguna de las 2 situaciones asi que les agradeceria mucho si me ayudaran

GRACIAS DE ANTEMANO

[vtdeleon]

Saludos

Sencillo, ahí tienes: CurrentYear y MonthOf();

Código Delphi [-]
  ShowMessage(FloatToStr(CurrentYear));
  ShowMessage(FloatToStr(MonthOf(now)));

[Jheysson13]

puedes tambien dividir la fecha actual en 3 valores. en delphi seria algo como esto:

Código Delphi [-]
var año,me,dia:word;
     presente:tdatetime;
begin
presente:=now;
DecodeDate(Presente,ano, mes, dia);

edit1.text:=inttostr(ano);   // para el año actual
edit2.text:=inttostr(mes);  // para el mes actual;

end;

no recuerdo si esta todo bien pero bueno revisa y pregunta cualquier duda