Este es un ejemplo que use en cierta ocacion para hacer backups de la base de datos de un sistema
Código Delphi
[-]
DateSeparator := '-';
ShortDateFormat := 'yyyy/mm/dd';
nombreGuardar:= DateTimeToStr(Date)+'.mdb';
nombreZipear:= DateTimeToStr(Date)+'.zip';
DateSeparator := '/';
ShortDateFormat := 'dd/mm/yyyy';
Aclaro que de esta manera es que esta config. en mi PC, deberian ver las sullas.