Вниз
Скачать: CL | DM;

Архивация БД   Найти похожие ветки 

← →
Igor_ ©   (2002-02-28 10:03) [0]

Хочу выполнить архивацию файла БД внешним архиватором
Отключаюсь от базы
DM.Database1.Close;
Архивирую её
s:="Base.gdb";
StrPcopy(qd_rar,"d:\Data\");
StrPcopy(pd_rar," a d:\arh\"+"base.rar "+s);
ShellExecute(0, nil, "c:\program files\winrar\rar.exe", pd_rar,qd_rar, SW_SHOW);

Но дело в том, что архивация идет отдельным потоком, и когда я
пытаюсь открыть базу "после архивации"

while not DM.Database1.Connected do
begin
try
DM.Database1.Open;
except
end;

-она судя по всему еще не началась т.к. архив не создаётся.
А если проходишь все в пошаговом режиме, то архив успевает создаться. Подскажите как поступить.


← →
EAlexander ©   (2002-02-28 10:05) [1]

Дождаться когда winrar отработает


← →
Igor_ ©   (2002-02-28 10:17) [2]

А как дождаться, как я узнаю, что он начал работать


← →
sniknik ©   (2002-02-28 10:34) [3]

Вставь архиватор в программу и не мучайся. http://www.ziptv.com/ - компонент поддерживающий все современные архиваторы.



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

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



Память: 0.45 MB
Время: 0.009 c
3-90793
Alex_R
2002-03-01 18:02
2002.03.28
Как определить, что использовать ExecSQL или Open


1-90895
Света
2002-03-18 10:06
2002.03.28
Выход из цикла


1-90904
Sound
2002-03-18 13:06
2002.03.28
Срочно нужна помощь!!! Как встроить в Delphi приложение компилятор Pascal?


1-90967
SB
2002-03-15 02:19
2002.03.28
Размер MDI формы


3-90724
Igor_
2002-02-28 10:03
2002.03.28
Архивация БД




   Наверх