| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Архивация БД
Igor_ © (2002-02-28 10:03:00)Хочу выполнить архивацию файла БД внешним архиватором
Отключаюсь от базы
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;
-она судя по всему еще не началась т.к. архив не создаётся.
А если проходишь все в пошаговом режиме, то архив успевает создаться. Подскажите как поступить.
sniknik (2002-02-28 10:34:00) [1]Вставь архиватор в программу и не мучайся. http://www.ziptv.com/- компонент поддерживающий все современные архиваторы.
Igor_ (2002-02-28 10:17:00) [2]А как дождаться, как я узнаю, что он начал работать
EAlexander (2002-02-28 10:05:00) [3]Дождаться когда winrar отработает
| |
