[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Модератор форума: Andrey_A, ХарВик, chip642  
Форум » • Total Commander • » Кнопки для Total Commander » ЗАКАЗ КНОПОК
ЗАКАЗ КНОПОК
ХарВикДата: Вторник, 17.04.2012, 21:49 | Сообщение № 1
Генералиссимус

На сайте с: 29.01.2012
Город: Черкассы
Сообщений: 1629
Награды: 18
Репутация: 18
ЗАКАЗ КНОПОК




В этой теме Вы можете высказывать идеи о каких-либо кнопках. Вы можете описать какую хотелось бы иметь кнопку и возможно найдутся те, кто подскажет как её сделать.
Большая просьба чётко описывать задачу, от этого будет зависеть качество её решений


Группа TCIMG в Telegram

.
 
chip642Дата: Среда, 30.10.2019, 23:47 | Сообщение № 1771
Генералиссимус

На сайте с: 24.04.2013
Город: Москва
Сообщений: 1495
Награды: 62
Репутация: 58
asmadeus

Никогда не работал с *.csv, но новые задачки меня манят. (ツ)

Код
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\TCIMG.exe
cmdbt=C:\Windows\System32\findstr.exe~~/V~~/G:D:\Compare\OldFile.csv~~D:\Compare\NewFile.csv~~>~~D:\Compare\Diffs.csv
WCMICONS.dll,1
Найти строки в файле NewFile.csv которых нет в файле OldFile.csv и записать найденные строки в Diffs.csv

-1


Ниже те же параметры + с последующим удалением OldFile.csv и переименованием NewFile.csv в OldFile.csv

Код
cmdbt=C:\Windows\System32\findstr.exe~~/V~~/G:D:\Compare\OldFile.csv~~D:\Compare\NewFile.csv~~>~~D:\Compare\Diffs.csv delsm=%P%N||1 pause=500 renmm=%T%M||[tc=AO]||upd<1>


Цитата asmadeus ()
может все - таки выложишь кнопки по библиотеке?


Помню, помню, сделаю.

Привычка дурная, вижу новую задачу и с головой... . Столько всего реализовано и всё пылится (
 
asmadeusДата: Четверг, 31.10.2019, 18:23 | Сообщение № 1772
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
chip642, попробую и отпишусь. Правда, и недостатки такого метода видны сразу - нельзя выделить файлы и провести операции с ними, выходит, что пути, что имена - прописаны жестко. Можно в принципе вставить диалоги открытия файлов... А так - я вообще не знал о существовании в винде такой фичи
 
chip642Дата: Четверг, 31.10.2019, 18:38 | Сообщение № 1773
Генералиссимус

На сайте с: 24.04.2013
Город: Москва
Сообщений: 1495
Награды: 62
Репутация: 58
Цитата asmadeus ()
Правда, и недостатки такого метода видны сразу - нельзя выделить файлы и провести операции с ними


Почему нельзя, можно конечно. Просто в задаче фигурировали имена файлов, а не выделенные файлы, вот я такой вариант и опубликовал. С выделенными не знаю, я тестировал на сравнении файлов, которые расположены в разных панелях ( %P%N %T%M). Опиши точно задачу покумекаем. Честно говоря я глубоко не вникал, но думаю трудностей возникнуть не должно.
 
asmadeusДата: Четверг, 31.10.2019, 19:41 | Сообщение № 1774
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
chip642, точно звучит так:
имена файлов - реальные, ( у меня сейчас лежат такие -
Код
f:\asmadeus (Коллекция), 30.10.2019 - uCoin.net.csv
f:\Import.csv

пути - могут быть любые,
предпочтения - сравнивать два выделенных в панели файла
Файлов всегда будет два. На выходе - нужен txt, все равно его потом еще править надо, о чем в принципе другая задача.

Итак - с двух выделенных в панели тотала файлов csv (сайт экспортирует только в этот формат) получить txt файл с уникальными строками
 
chip642Дата: Пятница, 01.11.2019, 02:14 | Сообщение № 1775
Генералиссимус

На сайте с: 24.04.2013
Город: Москва
Сообщений: 1495
Награды: 62
Репутация: 58
Цитата asmadeus ()
Итак - с двух выделенных в панели тотала файлов csv (сайт экспортирует только в этот формат) получить txt файл с уникальными строками


Если рассматривать выделение двух файлов в одной панели, то появляется вопрос сортировки, какой файл будет первым в списке.

На выбор два варианта, в первом - после выделения курсор устанавливаем на старый файл, во-втором варианте курсор устанавливаем на новый файл - из которого будут извлекаться уникальные строки. Уникальные строки сохранятся в "Diffs_[date].txt" ( или пропишите своё имя Name.txt)

1. Курсор на старом файле после выделения.

Код
xlist=@%P%N slist=%UL||<dellist=$GLOBALXLIST|2> cmdbt=C:\Windows\System32\findstr.exe~~/V~~/G:''%P%N''~~''GLOBALSLIST<1>''~~>~~''Diffs_<info=s30>.txt''


1. Курсор на новом файле после выделения.

Код
xlist=@%P%N slist=%UL||<dellist=$GLOBALXLIST|2> cmdbt=C:\Windows\System32\findstr.exe~~/V~~/G:''GLOBALSLIST<1>''~~''%P%N''~~>~~''Diffs_<info=s30>.txt''
 
asmadeusДата: Пятница, 01.11.2019, 08:51 | Сообщение № 1776
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
chip642, оба варианта - на выходе пустые файлы в соседней панели
Цитата chip642 ()
TOTALCMD#BAR#DATA
%COMMANDER_PATH%\TCIMG.exe
cmdbt=C:\Windows\System32\findstr.exe~~/V~~/G:D:\Compare\OldFile.csv~~D:\Compare\NewFile.csv~~>~~D:\Compare\Diffs.csv
WCMICONS.dll,1
Найти строки в файле NewFile.csv которых нет в файле OldFile.csv и записать найденные строки в Diffs.csv

-1


И от этого тоже, результат - нулевой файл. Может, сами файлы кинуть для теста?
 
chip642Дата: Пятница, 01.11.2019, 09:03 | Сообщение № 1777
Генералиссимус

На сайте с: 24.04.2013
Город: Москва
Сообщений: 1495
Награды: 62
Репутация: 58
asmadeus

Да, с файлами было бы лучше, жду.
 
asmadeusДата: Пятница, 01.11.2019, 10:26 | Сообщение № 1778
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
chip642, проанализировав файлы внимательнее, прихожу к выводу, что это нереально - кроме добавления строк, в новых файлах может меняться порядок старых строк, и даже меняться старые данные (что сводит на "нет" все усилия по поиску изменений, так как тогда по сути изменения - это весь файл)

Направление мысли я уловил, попробую вечером рассмотреть задачу
 
alexostrovДата: Суббота, 02.11.2019, 18:48 | Сообщение № 1779
Полковник

На сайте с: 22.11.2017
Сообщений: 179
Награды: 0
Репутация: 0
chip642

Цитата
asmadeus:
может все - таки выложишь кнопки по библиотеке?


Цитата
chip642
Помню, помню, сделаю.

Привычка дурная, вижу новую задачу и с головой... . Столько всего реализовано и всё пылится (


Я уже и ждать перестал. Может уже пора сдуть пыль.
Жаль потраченного Вами времени. Взяли хороший старт и на пол пути остановились.
 
asmadeusДата: Вторник, 05.11.2019, 08:32 | Сообщение № 1780
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
Цитата alexostrov ()
Жаль потраченного Вами времени. Взяли хороший старт и на пол пути остановились

Поддерживаю!
chip642, выкладывай, а мы потестируем-разберем-скажем, как работает
 
JKTДата: Воскресенье, 10.11.2019, 00:07 | Сообщение № 1781
Генерал-майор

На сайте с: 01.02.2012
Город: Харьков
Сообщений: 371
Награды: 7
Репутация: 7
chip642
Добрый вечер.
Извините, не было возможности к компу подойти за эти дни и поблагодарить. Вот только потестил в разных ситуациях.
Большое спасибо за кнопки. Все работает так, как хотел.
Удачи Вам!
 
asmadeusДата: Воскресенье, 10.11.2019, 20:39 | Сообщение № 1782
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
Привет. Есть такая секция в файле tcg:
Код
[am_Air_Explorer]
exect=$var_s=IniRead(EnvGet('COMMANDER_PATH')&'\Ini\TCUE.ini','Paths','Air~~Explorer','#')
exect=$var_path=##<info=f14$var_s//>
exect=$var_del=IniRead(EnvGet('COMMANDER_PATH')&'\Ini\TCUE.ini','TCUE','DeleteSourge','#')
start="%COMMANDER_PATH%\Programs\Archive\Universal Extractor\UniExtract.exe"||$var_s||$var_path||&&wait
exect=$var_exst=FileExists($var_path"\Распаковка portable.cmd")
<IF> $var_exst=0 <THEN> start=$var_path"\_Unpack Portable.cmd"||workdir<$var_path>||&&wait <ELSE> start=$var_path"\Распаковка portable.cmd"||workdir<$var_path>||&&wait <ENDIF>
exect=$var_ppr=StringRegExpReplace('$var_s','(.*)\_([\d\.]+)\.(.*)','\2')
delss=PS<"%COMMANDER_PATH%\Utilities\Files\Air Explorer"//-1//0//Data\\|Readme.txt|WhatIsIt.txt//1>||1
moves=PS<$var_path"\AirExplorer"//-1//0>||"%COMMANDER_PATH%\Utilities\Files\Air Explorer//1"
delsm="%COMMANDER_PATH%\Utilities\Files\Air Explorer\App\DefaultData"||1
delsm=$var_path||1
textx=PS<"%COMMANDER_PATH%\Utilities\Files\Air Explorer"//1//0//Readme.txt|WhatIsIt.txt>||&&(\#)|((\d+(\.|\,\s)\d+(?:(\.|\,\s)\d+)?(?:\sRev|\sBuild|\sBeta|\sFinal|(\.|\,\s)\d+)?(?:(\.|\,\s)\d+|\s\d+)?))!!$var_ppr||backup<0>
<IF> $var_del=1 <THEN> delsm=$var_s||1 <ENDIF>

Отрабатывает все, кроме условия:
Код
exect=$var_exst=FileExists($var_path"\Распаковка portable.cmd")
<IF> $var_exst=0 <THEN> start=$var_path"\_Unpack Portable.cmd"||workdir<$var_path>||&&wait <ELSE> start=$var_path"\Распаковка portable.cmd"||workdir<$var_path>||&&wait <ENDIF>

Суть - проверять, если есть "Распаковка portable.cmd" - то запускать его.
Если нет - запускать "_Unpack Portable.cmd"
Из этих файлов какой то всегда есть, и точно не оба сразу.
 
chip642Дата: Воскресенье, 10.11.2019, 21:17 | Сообщение № 1783
Генералиссимус

На сайте с: 24.04.2013
Город: Москва
Сообщений: 1495
Награды: 62
Репутация: 58
asmadeus

Пробелы разве не надо заменять на двойные тильды? "Распаковка~~portable.cmd"

----------------------------------------

Цитата alexostrov ()
Я уже и ждать перестал. Может уже пора сдуть пыль.
Жаль потраченного Вами времени. Взяли хороший старт и на пол пути остановились.

Цитата asmadeus ()
Поддерживаю!
chip642, выкладывай, а мы потестируем-разберем-скажем, как работает


Третий день занимаюсь, тестирую, исправляю, проверяю, оформляю. В течении завтрашнего дня выложу.
 
asmadeusДата: Понедельник, 11.11.2019, 07:28 | Сообщение № 1784
Генералиссимус

На сайте с: 14.12.2012
Город: Кривой Рог
Сообщений: 1375
Награды: 29
Репутация: 32
Цитата chip642 ()
Пробелы разве не надо заменять на двойные тильды?

Оно работает без них. Это же команда tcimg=$amam, с секцией с файла.
Не отрабатывает именно условие
 
MrakobesДата: Вторник, 12.11.2019, 01:14 | Сообщение № 1785
Полковник

На сайте с: 08.08.2014
Город: Москва
Сообщений: 175
Награды: 2
Репутация: 2
вопрос по преобразованию тэгов в мр3 файлах, конкретно по команде mp3ws - к сожалению не работает в аудиофалах FLAC, это стандарт лосслесс формата, множество потрековых релизов, в общем продаются даже на всяких deezer'ах, хотелось бы чтобы эти команды были применимы к ним, тэги абсолютно такие же
 
Форум » • Total Commander • » Кнопки для Total Commander » ЗАКАЗ КНОПОК
Поиск:

Интеллектуальные права и отказ от ответственности