Date et heure...;Résolu

Question

Bonjour,

  Je dois sauvegarder des fichiers, en pr&#233;cisant dans leur nom la date et l'heure de cr&#233;ation, le pb c'est que lorsque je fais datetostr et timetostr il y a des s&#233;parateurs : et \ qui ne snot pas valable dans le nom d'un fichier, il y a t'il un moyen de r&#233;cup&#233;rer la date et l'heure sous la forme date :01012005 et heure: 120012 ou ben si quelqu'un a une solution plus jolie qu'il me le dise, car dans ce cas les nom sont pas tr&#232;s lisibles genre fichier : 01012005_120012.txt pas clair....

Don0Choa · Accepted Answer

Tout simplement :

FormatDateTime('dd-mm-yyyy',Now) 





++

divadav · Answer

Mouais... Tu peux faire un truc du style :

procedure TForm1.FormCreate(Sender: TObject);
var
  oFormat: TFormatSettings;
begin
  GetLocaleFormatSettings(1036, oFormat);
  oFormat.DateSeparator := '-';
  ShowMessage(DateToStr(Date, oFormat));
end;

Avec &#231;a, tu as une date du style 26-07-2005, qui passe tr&#232;s bien pour les noms de fichier...

Dans la fonction GetLocaleFormatSettings(1036, oFormat), le nombre 1036 correspond &#224; la r&#233;gion "France".

Keep Cool & Be Wild
Divad

N'OUBLIEZ PAS DE VALIDER LORSQU'UNE REPONSE VOUS CONVIENT !

Date et heure...;

2 réponses

Votre réponse

Discussions similaires