Capturar fecha larga.

[Er0s]

Buenasss!!!

Necesito capturar fecha del sistema en formato largo (miercoles, 22 de septiembre del 2010) y almacenarlo en un DBedit.

He probado el TtimeDatePicker pero o no se usarlo o solo me captura la fecha y hora en el momento en que lo inserte en el Form.

Gracias

[bosster_018]

En este enlace se ha dado una respuesta que te puede servir...

cambiar formato de la fecha (http://www.clubdelphi.com/foros/showthread.php?t=68272)

Puedes revisarlo....

Resumiendo... La solución está en cambiar un poco el código:

procedure TForm1.Button1Click(Sender: TObject);
var
fecha: String;
begin
fecha:= FormatDateTime('dddddd', Now);
ShowMessage(fecha);
end;

Donde la explicación dice que:
dddddd = Fecha en formato extendido (miércoles, 20 de junio de 2007)

Suerte!

[Er0s]

ok esto rula.... Gracias

[Caral]

Hola
No se que es lo que quieres.
El codigo anterior esta interesante, pero tiene sus bemoles.
Esto define la fecha mas adecuadamente:

var
fecha: String;
begin
ShortDateFormat := 'dd" de "mmmm" de "yyyy';
fecha:= DateToStr(Now);
ShowMessage(fecha);
end;
Por otro lado:
No creo la necesidad de hacer el cambio de string a date si la fecha se genera de un dato optenido de la bd.
Saludos

[bosster_018]

Caral tiene razón, pues mejor sería que le des formato tú mismo como te dió el ejemplo el amigo Caral...
(Puedes revisar el link que te dí, ahí está la información más completa)

Con relación de convertir la fecha a string, era sólo como ejemplo para mostrarlo en un Showmessage... :D...

No sé porque, me gustan los Showmessage :p :o :rolleyes:

Suerte!