Сообщение редактировано 20:21 – 17/08/2012 пользователем AllGrey

Поскольку полагаю у каждого есть сохранённые треки (файлы *.sec) но для их просмотра нужно предварительно их разместить в профильную папку сохранений. К примеру, в моем случае это путь c:|Documents and Settings|Администратор|Мои документы|Praetorians|Savegame|AllGrey|
 А хранятся у меня эти файлы по пути d:|Games|SaveGames|Strategies|Praetorians|Sequence|Data_xx.xx.xxxx|
И чтоб скопировать эти файлы с папки где они хранятся, в папку откуда можно окрыть их игрой, придется хорошенько накликаться мышкой, а если это окажутся не те сохранения, то еще и по несколько раз.
 И это я всегда пользуюсь Total Commander'ом, а если кто пользуется Моим компьютером это ещё геморней.
Все это происходило как то само собой, пока Don не затронул этот вопрос.

Don, Вопрос: можно ли сделать, что бы Преторы запускались при щелчке на файле .sec (сохранке трека) сразу с открытием этого трека?

Поскольку такой вариант не возможен, но очень хочется, то я решил хоть как то автоматизировать этот процесс.
Самым простым решением этой проблемы это использовать для этого командные файлы (*.cmd), аналог Батникам.
Я создал 4 командных файла которыми можно автоматизировать процесс загрузки файлов *.sec.

Вариант 1:
Clear [.sec].cmd
 – Удаление всех файлов *.sec из папки "…|Мои документы|Praetorians|Savegame|AllGrey|"
Load [.sec].cmd
 – Копирование всех *.sec файлов из текущей папки в "…|Мои документы|Praetorians|Savegame|AllGrey|"
Start [P].cmd
 – Запуск Преторианцев. В моем случае путь к игре c:|Games|Praetorians|Praetorians.exe

Вариант 2:
Clear [.sec].cmd
 – Удаление всех файлов *.sec из папки "…|Мои документы|Praetorians|Savegame|AllGrey|"
Load [.sec] + Start [P].cmd
 – Копирование всех *.sec файлов из текущей папки в "…|Мои документы|Praetorians|Savegame|AllGrey|"
 и Запуск Преторианцев. В моем случае путь к игре c:|Games|Praetorians|Praetorians.exe

Что для этого нужно сделать;
Файл "Clear [.sec].cmd" размещаем к примеру на рабочем столе (он может находится где угодно).
Файлы "Load [.sec] + Start [P].cmd" размещаем в тех папках где хранятся *.sec файлы
и создаём ярлыки на рабочий стол для каждого из них. Дальше думаю все понятно и объяснять не надо.

Но предварительно нужно подкорректировать под себя, путь размещения игры и свой профиль 
(заменить AllGrey на свой профиль). Все это можно проделать с помощью Виндусовского Блокнота (NotePad),
но если ваш профиль или путь к игре содержит буквы кириллицы, тогда для правки файлов *.cmd 
 нужно использовать блокнот DOSPad. Если что могу помочь, обращайтесь.

ВНИМАНИЕ!!! Проверять работоспособность *.cmd файлов после правки (особенно файл Clear [.sec].cmd)
нужно с какой не буть экспериментальной папки. Неправильная правка файла "Clear [.sec].cmd" может привести к тому что он также может удаль все файлы которые будут находится рядом с ним в одной папке.

Выставляю несколько наборов под разные оси.

DOSPad v1.17.00.zip – блокнот для правки *.cmd файлов.

Sequence_WinXP_Ru.zip – набор файлов для Русской Windows XP.
Sequence_WinXP_En.zip – набор файлов для Английской Windows XP.
Sequence_Win7.zip – набор файлов для Windows 7. (любой язык).

Это конечно не программы, на что указывает тема, но может быть в будущем…..
Кстати, здесь кто то знает Delphi? Мне нужна небольшая помощь в нем и это касается Преторианцев.

Сообщение редактировано 20:52 – 17/08/2012 пользователем AllGrey

В личке не получилось почему то, вот сдесь выкладываю Project_Rename.ext.zip

читай задача.тхт, подробности чуть позже, буду очень благодарен.

Для Vista вариант лучше подойдет Sequence_Win7.zip

Сообщение редактировано 14:25 – 18/08/2012 пользователем Don

Вот код:

procedure TForm1.Button1Click(Sender: TObject);
var Path:string;
SR:TSearchRec;

procedure MyRename(NewExt:string);
var NewName:string;
begin
  NewName:=Path+''+CHangeFileExt(SR.Name,NewExt);
  RenameFile(Path+''+SR.Name,NewName);
  FindClose(SR);
end;

begin
   Path:=ExtractFilePath(Application.ExeName)+'DATA';
   if RadioButton1.Checked then
     begin
       if FindFirst(Path+'FileName1.*',faAnyFile ,SR)=0 then MyRename('.000');
       if FindFirst(Path+'FileName2.*',faAnyFile ,SR)=0 then MyRename('.~00');
     end
   else begin
      if FindFirst(Path+'FileName1.*',faAnyFile ,SR)=0 then MyRename('.~00');
      if FindFirst(Path+'FileName2.*',faAnyFile ,SR)=0 then MyRename('.000');
   end;
  Close;
end;

Сообщение редактировано 18:56 – 22/08/2012 пользователем AllGrey

Чтоб командный файл отправлял в папку темп только тот файл который к нему обратится а остальные не трогал, сложновато сделать, я даже не знаю возможно ли это вообще (мои знания в области командных файлов ограничены простыми командами). Файл Load [.sec] + Start [P].cmd написан таким образом что он будет копировать в папку темп все рядом стоящие *.sec файлы и запускать игру, а выбирать нужный трек нужно уже в самой игре. Если все *.sec файлы которые нужно просматривать, находятся исключительно в одной папке, тогда можно сделать чтоб файл Load [.sec] + Start [P].cmd активировался при клике по любому *.sec файлу. Достаточно разместить файл Load [.sec] + Start [P].cmd в папку с необходимыми *.sec файлами, потом правой кнопкой кликнуть по любому *.sec файлу, выбрать "Открыть", поставить галочку на "Использовать ее для всех типов файлов такого типа", нажать Обзор и выбрать файл Load [.sec] + Start [P].cmd который размещен возле необходимых *.sec файлов. В таком случае при клике мышкой по любому из *.sec файлов все файлы из этой папки будут скопированы в папку темп ("Мои документы|Praetorians|Savegame|AllGrey|) и если там уже будут такие файлы с аналогичными именами то они перезапишутся.