Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как из Делфи запустить архивирование файлов (напр с:\*.doc) с ..


Гость22 ©   (2005-08-19 10:23:00) 

..помощью WinRAR?


Гость22   (2005-08-19 15:32:00) [1]


> ssk ©   (19.08.05 13:57) [11]
> может это поможет

то, что надо!


ssk   (2005-08-19 13:57:00) [2]

может это поможет

http://ucad.pisem.net/delphi_lib/rar/librar.htm


alex_***   (2005-08-19 13:43:00) [3]

не смешно. Грустно, к сожалению
http://skvozilka.com.ru/delphi/doc/com/WaitForSingleObj.htm


Гость22   (2005-08-19 13:10:00) [4]

Плохиш ©   (19.08.05 12:59) [8]

Смешно... А все-таки


Плохиш   (2005-08-19 12:59:00) [5]

www.yandex.ru


Гость22   (2005-08-19 12:51:00) [6]


> Как это пользовать куча статей в инете.

Например...


alex_***   (2005-08-19 12:26:00) [7]

запускать winrar с помощью CreateProcess, потом ждать (WaitForSingleObject). Как это пользовать куча статей в инете.


syte_ser78   (2005-08-19 11:06:00) [8]

Глупый -
после выполнения винэкзека запускаеш таймер.
В обработчике таймера

try
 assign(f,'имя_файла');
 reset(f);
 close(f);
 ...пишем в лог
 ...закрываем таймер
except
 ...файл еще не создан.
end;

Насчет умного - жди ответа мастеров.


Гость22   (2005-08-19 10:50:00) [9]

а можна поподробней про умный вариант
а еще подробней про глупый - тоже ведь вариант


syte_ser78   (2005-08-19 10:43:00) [10]

Гость22   (19.08.05 10:41) [2]
Можно сделать умно, а можно глупо(но просто).
Умно - использывать библиотеку архиватора
Глупо - ... написал да стер, заплюют :)


Гость22   (2005-08-19 10:41:00) [11]

мне надо после архивации проверить наличие архива (т.е., сформировался или нет - для записи в лог). Так вот, если архивация будет продолжаться долго, смогу ли я командой fileexists('archive,rar')проверить его наличие?
Просто получается, что Делфи запустив процес WinRAR, продолжает выполнять свои команды (следующая будет if fileexists('archive,rar') then...) и на момент проверки архива еще не будет, т.к. архивация еще продолжается. Что делать в этом случае?


syte_ser78   (2005-08-19 10:27:00) [12]

Как и любой другой екзешник

komanda:='winrar a ' + то_что паковать;
winexec(Pchar(komanda), SW_SHOW);

Почитай хелп по ключам рара.


Наверх

Титульная страница Поиск, карта сайта Написать письмо