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 ça, tu as une date du style 26-07-2005, qui passe très bien pour les noms de fichier...
Dans la fonction GetLocaleFormatSettings(1036, oFormat), le nombre 1036 correspond à la région "France".
Keep Cool & Be Wild
Divad
N'OUBLIEZ PAS DE VALIDER LORSQU'UNE REPONSE VOUS CONVIENT !