[rgstuamigo]

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);//<--- Lo muestro
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);//<--- Lo muestro
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...