Подскажите как сделать синхронизациию 2х папок

[LordTor]

Подскажите как сделать синхронизациию 2х папок
СИНХРОНИЗАЦИЯ ОДНОСТОРОННЯЯ 1-->2 ЗАМЕНЯЮТСЯ ТОЛЬКО ТЕ ФАЙЛЫ КОТОРЫЕ УСТАРЕЛИ ПОДАТИ(ПРИМЕР 1.ТХТ 22.02.05 НА 1.ТХТ 06.11.09)
В ПАПКАХ ЕСТЬ ПОДПАПКИ

[Stilet]

А стандартная синхронизация Windows средствами не устраивает?
Или RAID массив себе надыбать?

[quit]

LordTor, хорош темы тут плодить
http://programmersforum.ru/showthread.php?t=69172

[LordTor]

Сообщение от Stilet

А стандартная синхронизация Windows средствами не устраивает?
Или RAID массив себе надыбать?

У вы но не катит

[raxp]

LordTor, а что не получается?

[LordTor]

банално не понимаю как это сделать

[raxp]

любую задачу всегда можно разбить на шаги:
1) формируем список файлов на удаленной машине и локально Lime разродился для вас кодом
2) сортировка обоих списков по дате-времени, для этого используйте функу - GetFileDate (примеры есть на форуме)
3) проверяем наличие подпапок на 2- машине, нету, создаем
4) проверяйте есть-ли на второй машине файлы из 1-й, если нет копируйте того чего нет

// WinAPI-
function wcf(Source,Target: string): boolean;
var F: TShFileOpStruct;
begin
 mig:= true;
 //LOG-
 //dm._log(Source,Target,'winapi',true);
 tin:=''; tpd:= 0;
 tss:= ' ' + Source; //что копируем...
 //
 F.Wnd:= 0; F.wFunc:= FO_COPY;
 Source:= Source+#0; F.pFrom:=pchar(Source);
 Target:= Target+#0; F.pTo:= pchar(Target);
 F.fFlags:= FOF_ALLOWUNDO or FOF_NOCONFIRMATION;
 application.ProcessMessages;
 result  := ShFileOperation(F) = 0;
 //
 //dm._log('','','успешно',false);
 mig:= false
end;

5) параллельно проверяйте по дате-времени каждый файл из первого и второго списка, если дата-время первого более новая, копируйте его, если нет переходим к сравнению следующих
...
не пытайтесь охватить сразу все, делайте пошагово, отладили, переходим к следующему шагу