Puedes usar la Funcion
FormatDateTime para darle el formato adecuado y como quieras
Por ejemplo:
Para la
primera forma que quieres :
Código Delphi
[-]var
mydatetime :TDateTime;
s:String;
begin
mydatetime := now;
s:=FormatDateTime('dddd, d ''de'' mmmm ''de'' yyyy - hh:nn:ss am/pm', mydatetime);
ShowMessage(s);end;
Y para hacerlo de la segunda forma como lo quieres:
Código Delphi
[-]var
mydatetime :TDateTime;
s:String;
begin
mydatetime := now;
s:=FormatDateTime('mmmm d ''de'' yyyy - hh:nn:ss am/pm',mydatetime);
ShowMessage(s);end;
Si quieres mas informacion hacerca de los diferentes formatos de
fecha/hora, pues revisa la ayuda de Delphi o bien en
ésta página podras verlo y con ejemplo
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7