08.03.2015, 19:23
|
|
Местный
|
|
Регистрация: 29.09.2010
Сообщения: 539
Версия Delphi: Delphi XE3
Репутация: 374
|
|
Цитата:
Сообщение от Bargest
Первое же, что бросилось в глаза:
Код:
DD := Copy(DateToStr(FileDate), 1, 2);
MM := Copy(DateToStr(FileDate), 4, 2);
YY := Copy(DateToStr(FileDate), 7, 4);
Зачем 3 раза вызывать DateToStr(FileDate)? Можно вызвать 1 раз и сохранить результат в переменную и не конвертировать double в дату лишних 2 раза.
А может лучше вообще попробовать FormatDateTime?
|
Код:
FileDate := IncDay(Date, -1);
FileName := SFTP_FILE_PREF + FormatDateTime('YYYYMMDD', FileDate) + SFTP_FILE_TYPE;
Можно ли использовать такие конструкции? Когда внутри формирующейся строки стоит функция. Или лучше сделать вот так:
Код:
FileDate := IncDay(Date, -1);
FileName := FormatDateTime('YYYYMMDD', FileDate);
FileName := SFTP_FILE_PREF + FileName + SFTP_FILE_TYPE;
|