RAR Component - Общие вопросы Delphi

maxefficiently · 25.02.2011, 07:54

Есть RAR Component 2.0

Нужно, чтобы, если пароль введён неправильно, то InputQuery выскакивала до тех пор пока он будет правильным или отмена нажата. Как реализовать?

Спасибо большущее тому, кто подскажет!

Обработка запроса пароля, взято из демо:

Код:

procedure TMainForm.RARArchivePasswordRequired(Sender: TObject;
  const HeaderPassword: Boolean; const FileName: WideString;
  out NewPassword: AnsiString; out Cancel: Boolean);
begin
  Cancel := not InputQuery('Password required for '+extractFileName(FileName),extractFileName(FileName),NewPassword);
end;

MotoArhangel · 25.02.2011, 11:12

А через условие сделать?
Если не правильно введен пароль, то вывести окно заново иначе делаем что нужно.
Или наоборот, если пароль введен правильно то делаем что нужно, иначе выводим окно.

Stilet · 25.02.2011, 11:55

Примерно так:

Код:

NewPassword:='';
while InputQuery('Password required for '+extractFileName(FileName),extractFileName(FileName),NewPassword)
and (NewPassword<>'Тру пароль')
do
ShowMessage('Чезана...');

$T@LKER · 25.02.2011, 13:48

А эти компонентом можно организовать распаковку на машине где неустановлен сам винрар?

Serge_Bliznykov · 25.02.2011, 19:45

Цитата:

А эти компонентом можно организовать распаковку на машине где неустановлен сам винрар?

Думаю, что ДА.

unrar.dll - над которым "навёртываются" различные компоненты - абсолютно официально бесплатен. Взять можно прямо с оф.сайта.

$T@LKER · 25.02.2011, 19:59

А как насчет мануала какгото или примера использование??

А так же вопрос относительно скорости работы! Тоесть какчая из интернета фалй екселя обьемом в скажм 1 мегабайт этой займет одно времья. Но если запоковать предварительно в архив и потом помимо скачивания заархивированого, + еще после его розархивировать - это будет дольше или нет??

Человек_Борща · 25.02.2011, 20:40

Всё мануалы да мануалы, а самому разобраться? не?

Конечно дольше, все зависит впервую очередь от интернета. Время скачивания(Зависит от скорости интернета) + время на распаковку(Зависит от размера запак. данных).

$T@LKER · 25.02.2011, 20:47

НУ если дольше тогда смыслу нету)))!...хотя...если нужно скинуть кучу файло то лучше все таки наверное запаковать!...незнаю..

Ghost of Night · 25.02.2011, 20:54

Цитата:

Взять можно прямо с оф.сайта.

насколько я помню, эта библа в комплекте с ОСью идет.

Человек_Борща · 25.02.2011, 21:54

$T@LKER, выход есть всегда.

От того, что файлы заархивированны, ничего неи изменитьсч. все просто. Один поток качает, и передаёт второму потку сигнал о том что такой-то файл скачан, второй поток в свою очередь выстраивает свой список файлов который постепеннь разорхивирует.
и того 1 качает, второй распаковывает.

p.s. давайте на этом остановимся и прекратим влезать в чужую тему.

25.02.2011, 07:54	#1
maxefficiently Пользователь Регистрация: 12.02.2011 Сообщений: 42	RAR Component Есть RAR Component 2.0 Нужно, чтобы, если пароль введён неправильно, то InputQuery выскакивала до тех пор пока он будет правильным или отмена нажата. Как реализовать? Спасибо большущее тому, кто подскажет! Обработка запроса пароля, взято из демо: Код: `procedure TMainForm.RARArchivePasswordRequired(Sender: TObject; const HeaderPassword: Boolean; const FileName: WideString; out NewPassword: AnsiString; out Cancel: Boolean); begin Cancel := not InputQuery('Password required for '+extractFileName(FileName),extractFileName(FileName),NewPassword); end;` Последний раз редактировалось Stilet; 25.02.2011 в 11:39.

25.02.2011, 13:48	#4
$T@LKER Форумчанин Регистрация: 28.03.2009 Сообщений: 393	А эти компонентом можно организовать распаковку на машине где неустановлен сам винрар? ""Сериалы и компьютерные игры это словно вторая жизнь, которою ты проживаешь, во главе главного героя или персонажа, параллельно своей!""

25.02.2011, 19:59	#6
$T@LKER Форумчанин Регистрация: 28.03.2009 Сообщений: 393	А как насчет мануала какгото или примера использование?? А так же вопрос относительно скорости работы! Тоесть какчая из интернета фалй екселя обьемом в скажм 1 мегабайт этой займет одно времья. Но если запоковать предварительно в архив и потом помимо скачивания заархивированого, + еще после его розархивировать - это будет дольше или нет?? ""Сериалы и компьютерные игры это словно вторая жизнь, которою ты проживаешь, во главе главного героя или персонажа, параллельно своей!""

25.02.2011, 20:47	#8
$T@LKER Форумчанин Регистрация: 28.03.2009 Сообщений: 393	НУ если дольше тогда смыслу нету)))!...хотя...если нужно скинуть кучу файло то лучше все таки наверное запаковать!...незнаю.. ""Сериалы и компьютерные игры это словно вторая жизнь, которою ты проживаешь, во главе главного героя или персонажа, параллельно своей!""

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
RAR, ZIP	kokj007	Помощь студентам	4	03.02.2011 18:23
Проблема с RAR компонентом	mixer94	Компоненты Delphi	2	15.02.2010 10:27
Разблокировка RAR-архива...	Терминатор	Софт	3	14.04.2009 17:01
Zip or Rar (D7)	Simply-Art	Компоненты Delphi	3	01.06.2008 17:56

25.02.2011, 11:12	#2
MotoArhangel Пользователь Регистрация: 25.02.2011 Сообщений: 51	А через условие сделать? Если не правильно введен пароль, то вывести окно заново иначе делаем что нужно. Или наоборот, если пароль введен правильно то делаем что нужно, иначе выводим окно.

25.02.2011, 20:40	#7
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,426	Всё мануалы да мануалы, а самому разобраться? не? Конечно дольше, все зависит впервую очередь от интернета. Время скачивания(Зависит от скорости интернета) + время на распаковку(Зависит от размера запак. данных).

25.02.2011, 21:54	#10
Человек_Борща Старожил Регистрация: 30.12.2009 Сообщений: 11,426	$T@LKER, выход есть всегда. От того, что файлы заархивированны, ничего неи изменитьсч. все просто. Один поток качает, и передаёт второму потку сигнал о том что такой-то файл скачан, второй поток в свою очередь выстраивает свой список файлов который постепеннь разорхивирует. и того 1 качает, второй распаковывает. p.s. давайте на этом остановимся и прекратим влезать в чужую тему.