小工具整理

文件重命名神器renamer-7.5/Scripts/Date and Time.pas

@@ -0,0 +1,9 @@
+var
+  DateTime: TDateTime;
+
+begin
+  DateTime := FileTimeModified(FilePath);
+  FileName := WideExtractBaseName(FileName) +
+    FormatDateTime(' (dd-mmm-yyyy)', DateTime) +
+    WideExtractFileExt(FileName);
+end.