Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.04;
Скачать: CL | DM;

Вниз

Использование текущей даты в имени файла   Найти похожие ветки 

 
Gaber ©   (2002-10-23 15:48) [0]

Хочу чтоб на диске создавался файл с именем=текущей дате:

n:=DateToStr(now)+".txt";
AssignFile(f,n);
Rewrite(f);
WriteLn(f,+DateTimeToStr(now));
CloseFile(f);

Работает, но если я хочу использовать не просто дату, но и время, меняю

n:=DateTimeToStr(now)+".txt";

На Rewrite программа вылетает?


 
Bis   (2002-10-23 15:52) [1]

попробуй не старыми функциями, а которые пришли с Виндой:
FileCreate и т.п.
Старые может быть не поддерживают не досовские имена
Попробуй сначала создать руками, например в том же FAR такое имя


 
Song ©   (2002-10-23 15:58) [2]

Может вылетает из-за того, что разделитель - точка? Тогда в таком случае надо использовать FormatDateTime()
А вообще как понять "вылетает". Просто молча или на чего ругается?


 
DieHard ©   (2002-10-23 16:04) [3]

скорее не точка, а двоеточие
надо переопределить TimeSeparator, а еще лучше заодно и DateSeparator, вдруг он слэш будет у кого-нить


 
Skier ©   (2002-10-23 16:09) [4]

>Gaber
Дату можно получить через GetSystemTime(...), а
разделитель задать самому...


 
Gaber ©   (2002-10-23 16:43) [5]

Интересно почему так работает:
n:=DateToStr(now)+".txt";
а так нет:
n:=DateTimeToStr(now)+".txt";


 
Anatoly Podgoretsky ©   (2002-10-23 16:52) [6]

Вылетает потому что используешь недопустимые симаолы в имени файла, аместо DateTimeToStr используй FormatDateTime


 
TTCustomDelphiMaster ©   (2002-10-23 16:55) [7]

Во первых ":" - не допустимый символ в имени файла
Во вторых при формировании имен используйте функцию FormatDateTime(), т.к. результат других функций зависит от настроек пользователя (год 2 или 4 символа, порядок день месяц год или год месяц день и т.д.).


 
Gaber ©   (2002-10-24 14:43) [8]

Подскажите , а как FormatDateTime(), привести к строковому типу.


 
Bis ©   (2002-10-24 14:46) [9]

а он у тебя и так в строковом виде получится )


 
Anatoly Podgoretsky ©   (2002-10-24 14:48) [10]

Зачем function FormatDateTime(): string;




Страницы: 1 вся ветка

Текущий архив: 2002.11.04;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.021 c
1-11240
Иван
2002-10-25 10:25
2002.11.04
Конвертирование в дробь


14-11422
TTCustomDelphiMaster
2002-10-14 22:53
2002.11.04
MyMail.com


1-11300
dens
2002-10-23 16:32
2002.11.04
проблема с TStrings


3-11110
Radiy
2002-10-13 19:39
2002.11.04
Автозагрузка программы с базой


14-11429
Жорик
2002-10-15 13:04
2002.11.04
ХР-шный интерфейс