Вверх ↑
Этот топик читают: Гость
Ответов: 413
Рейтинг: 57
#1: 2010-03-08 11:05:06 ЛС | профиль | цитата
PCloneScan-программа предназначена для поиска одинаковых файлов (точных копий или одноименных), пустых папок, файлов нулевого размера и дальнейшего их удаления, переименовывания или перемещения. Обращаю внимание что одноименные не значит одинаковые и удалять их нужно с осторожностью.
На левом рисунке первая версия, не полная. (Удалять не стал, так как она маленькая и по ней проще понять как работает программа). На правом рисунке последняя версия.
старая версия:http://www.hiasm.com/forum_serv.php?q=56&id=1153

новая версия:http://www.hiasm.com/xf/attach/share/PCloneScan_V.rar

P.S. Хотелось бы ее дополнить и улучшить по вашим замечаниям и предложениям.



карма: 0

5
Голосовали:Genius, LainX, Ivann, MAV, Assasin
Ответов: 1397
Рейтинг: 50
#2: 2010-03-08 11:36:32 ЛС | профиль | цитата
Для начала можно исправить орфографические ошибки ;)
1. Однаименные - Одноименные
2. Карзину - Корзину
3. дирректорию - директорию
4. Осовбождено - Освобождено

карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 16884
Рейтинг: 1239
#3: 2010-03-08 12:32:49 ЛС | профиль | цитата
Освбождено - Освобождено
И иногда Переименовать тоже не вредно.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 413
Рейтинг: 57
#4: 2010-03-08 13:09:11 ЛС | профиль | цитата
Tad писал(а):
Переименовать тоже не вредно.
Добавить переименовывание при переносе в другую папку (Добавление к имени очередного файла последующего символа)? Или что-то иное имеется в виду?
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#5: 2010-03-08 13:33:20 ЛС | профиль | цитата
Просто добавить переименовывание - Добавление к имени файла 1,2,3,4 и т.д. или что-то подобное.
Зачем "при переносе в другую папку" - если переименовать, то можно и на месте.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 4698
Рейтинг: 426
#6: 2010-03-08 17:24:21 ЛС | профиль | цитата
Вот, молодец, Poputchik, позже будет очень полезная штука, главное до ума довести
карма: 10
0
Ответов: 215
Рейтинг: 45
#7: 2010-03-08 23:56:35 ЛС | профиль | цитата
Выбирите директорию для поиска - выберите
карма: 0

0
Ответов: 1304
Рейтинг: 405
#8: 2010-03-09 00:07:46 ЛС | профиль | цитата
Poputchik писал(а):
Обращаю внимание что одноименные не значит одинаковые и удалять их нужно с осторожностью

Разве "Hashsum" не гарантия?
карма: 3

0
Ответов: 3851
Рейтинг: 159
#9: 2010-03-09 00:48:59 ЛС | профиль | цитата

1. почитал варианты способов удаления и передумал запускать..

2. не найду тему - с кем-то уже обсуждал по ходу жизни своё творение. не уверен, что это оно, но можно покапаться - 175 версия имелась в виду - смотри прицеп..
карма: 0
начавший
0
файлы: 1clonehunting_12.rar [6.9KB] [152]
Разработчик
Ответов: 4698
Рейтинг: 426
#10: 2010-03-09 17:51:14 ЛС | профиль | цитата
[offtop]Со мной обсуждал, в теме Deleter, где то недавно там Poputchik отписывался, ты мне еще +3 поставил за то, что я баг в твоей проге нашел [/offtop]
карма: 10
0
Ответов: 413
Рейтинг: 57
#11: 2010-03-09 18:39:11 ЛС | профиль | цитата
Assasin писал(а):
главное до ума довести

Ты прав, это главное.
MAV писал(а):
Разве "Hashsum" не гарантия?
Если искать по имени ,а не по хэш сумме, то нет! (см. картинку)
Andrey писал(а):
почитал варианты способов удаления и передумал запускать..

Программа удаляет не сразу, а после поиска и нажатия кнопки удалить, и то если пункт с галочкой. Т.е. ничего опасного.
В твоей программе понравилась возможность добавления исключений. Подобное и я хотел реализовать - нужная вещь!
Poputchik писал(а):
Просто добавить переименовывание

Обязательно добавлю.
А по этому пункту кто нить может подсказать?
Poputchik писал(а):
Как отличить пустую папку от не пустой, может кто подскажет.

карма: 0

0
Ответов: 4641
Рейтинг: 334
#12: 2010-03-09 18:43:28 ЛС | профиль | цитата
Poputchik писал(а):
Как отличить пустую папку от не пустой, может кто подскажет.

По количеству файлов в папке или по ее размеру!
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 413
Рейтинг: 57
#13: 2010-03-09 18:46:38 ЛС | профиль | цитата
Ravilr писал(а):
по ее размеру!
Размер выдает ноль даже если она не пустая.
Ravilr писал(а):
По количеству файлов
По количеству файлов, значит нужно перебор того что внутри, а если папок много, то это долго. или я не прав?
карма: 0

0
Ответов: 4641
Рейтинг: 334
#14: 2010-03-09 21:12:39 ЛС | профиль | цитата
Poputchik писал(а):
Размер выдает ноль даже если она не пустая.

это как?
------------ Дoбавленo в 21.15:

Add(MainForm,2953706,21,105)
{
link(onCreate,4526766:doBrowse,[])
}
Add(Browse,4526766,91,119)
{
link(onBrowse,364021:doGetSize,[])
}
Add(DirTools,364021,154,98)
{
Point(doGetSize)
link(onOK,16318733:doMessage,[])
}
Add(Message,16318733,210,98)
{
}


карма: 1
Время верстки: %cr_time% Текущее время: %time%
1
Голосовали:Poputchik
Ответов: 413
Рейтинг: 57
#15: 2010-03-09 21:22:34 ЛС | профиль | цитата
Ravilr писал(а):
это как?
Вот так:
code_17248.txt

карма: 0

0
файлы: 1code_17248.txt [350B] [262]
Сообщение
...
Прикрепленные файлы
(файлы не залиты)