Скачать: CL | DM;

Архив.   Найти похожие ветки 

← →
Scavenger ©   (2006-03-24 10:15) [0]

Пожалуйста подскажите. Я копирую файлы с одного компа на другой это базы  данных, и они достаточно много весят. А можно при помощи Delphi архивировать эти базы и тем самым кидать на другой камп уже архив. Есть ли  такой компонент для архивирования, если есть подскажите плиз.

---

← →
Рамиль ©   (2006-03-24 10:24) [1]

самое простое
ShellExecute +
rar.exe /?

---

← →
Scavenger ©   (2006-03-24 16:21) [2]

Пробовал набирать тоже
ShellExecute +
rar.exe /?
но выдает ошибку, модуль Shellapi я подключил.

ShellExecute(HWND,"open","C:\Program Files\WinRAR\WinRAR.exe",NULL,"",SW_SHOWNORMAL);

Пишу в проге как показано выше, вот только не могу разобраться что это за параметр HWND. Подскажи пожалуйста , а лучше приведи пример если можеш.

---

← →
Рамиль ©   (2006-03-24 16:33) [3]

ShellExecute(Self.Handle, "open", программа, параметры, nil, SW_SHOWNORMAL);

---

← →
Scavenger ©   (2006-03-27 09:48) [4]

Спасибо получилось, а можно сразу сделать так чтоб после вызова программы WinRar программным способом запускать ее на выполнение.

---

← →
TUser ©   (2006-03-27 10:10) [5]

> Спасибо получилось, а можно сразу сделать так чтоб после
> вызова программы WinRar программным способом запускать ее
> на выполнение.

Тебе надо запускать к-л программу, для которой можно с помощью командной строки указать требуемое действие. Например, rar, gzip.

---

← →
TUser ©   (2006-03-27 10:11) [6]

Кстати, я не знаю, какие там в БДах форматы используют, но неужели там изначально уже нет архивирования? Если да, то все эти пляски с бубном бессмысленны - так же как нельзя существенно упаковать jpeg или mp3.

---

← →
Scavenger ©   (2006-03-27 10:51) [7]

В БД информация текстовая по этому сжимать будет хорошо. Я в функции уже указываю какую папку нужно архивировать. Остаетсся лишь запустить rar автоматом. Вот только как это сделать.

ShellExecute(Self.Handle, "open", "C:\Program Files\WinRAR\WinRAR.exe", "\\okt\e$\Архив_1С\27.03.2006",nil, SW_SHOWNORMAL);

Если это нельзя сделать, то может есть какой то другой способ?

---

← →
Sergey13 ©   (2006-03-27 10:59) [8]

В папке с WinRAR-ом есть и просто RAR.EXE - утилита командной строки.

---

← →
SpellCaster   (2006-03-27 13:44) [9]

Консольная версия чем плоха - вылезает окно консоли, сообщения об ошибках пишутся туда же, да и вообще не очень гуд. К тому же нужно сам рар везде таскать.
Гораздо проще заюзать компоненту kaZIP.
Кстати, если БД - Интербейс, то с помощью штатной утилы gbak можно ужать базу так, как не жмет самый крутой режим РАРа. А если потом еще и зазиповать, вообще сказка будет. У меня метровая база в таком архиве вместе с самой gbak (на всякий случай) занимала 20 кило.

---

← →
Scavenger ©   (2006-03-27 16:43) [10]

Спасибо большое все получилось.

ShellExecute(Self.Handle, "open", "C:\Program Files\WinRAR\RAR","a D:\P.A\sinx\ -agdd.mm.yyyy -m5 -sfx \\okt\e$\Архив_1С\27.03.2006",nil, SW_SHOWNORMAL);

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.025 c