Показать сообщение отдельно
  #3  
Старый 28.11.2015, 03:06
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Код:
...
s:= 'file_%data%_or_%time%.tmp';
s:= StringReplace(s, '%data%', FormatDateTime('ee-mm-dd',  Now),[rfReplaceAll]);
s:= StringReplace(s, '%time%', FormatDateTime('hh-nn-ss-z',Now),[rfReplaceAll]);
...
Ответить с цитированием