Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.014 c
3-11052
ACR
2002-10-15 02:00
2002.11.04
ACCESS


14-11461
Феликс
2002-09-25 21:39
2002.11.04
Предлагаю поделиться информацие о хорошей литературе


3-11109
Sirus
2002-10-16 10:13
2002.11.04
Почему IBase не делает того что нужно???


4-11541
Vit@l
2002-09-20 22:07
2002.11.04
Изменение цвета бордюра у TMemo


6-11360
Yuri Btr
2002-08-30 12:51
2002.11.04
Проблема с NMFTP




   Наверх