Delphi - Fechas

Hola a todos, tengo un problema, necesito substraer la fecha y la hora de la Pc y ponerla en una etiqueta, si alguien sabe le agradeceré mucho su respuesta, Ciao

Pon un timer y en el unico evento que tiene (On Timer):

procedure TFMenu.Timer1Timer(Sender: TObject);
begin
LabelHora.Caption := FormatDateTime('h:mm',Now);
LabelSemana.Caption := FormatDateTime('dddd',Now);
LabelFecha.Caption := FormatDateTime('d "de "mmmm "de "yyyy',Now);
end;

Esto va en tres etiquetas, si solo quieres una juntalo:
LabelHoraFecha.Caption := FormatDateTime('h:mm',Now)+' '+FormatDateTime('d "de "mmmm "de "yyyy',Now)