![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
RAR Component
maxefficiently © (2011-02-25 07:59:00)Есть RAR Component 2.0
Нужно, чтобы, если пароль введён неправильно, то InputQuery выскакивала до тех пор пока он будет правильным или отмена нажата. Как реализовать?
Спасибо большущее тому, кто подскажет!
Обработка запроса пароля, взято из демо:
procedure TMainForm.RARArchivePasswordRequire d(Sender: TObject;
const HeaderPassword: Boolean; const FileName: WideString;
out NewPassword: AnsiString; out Cancel: Boolean);
begin
Cancel := not InputQuery('Password required for '+extractFileName(FileName),extract FileName(FileName),NewPassword);
end;
maxefficiently (2011-02-26 07:25:00) [1]:)
KilkennyCat (2011-02-25 20:29:00) [2]Взаимно, maxefficiently. Вы сумели воспользоваться сторонним компонентом, у которого есть сайт, справка, открытый исходный код. Удачный выбор. Полная информационная доступность. Я даже осмелюсь предположить, что Вы удосужились посмотреть исходник этого компонента, как например, я. Но если Вам показалось, что Вы проглядели что-то, а кто-то заметит Вами прогляденное, то напрасно переживаете - показалось.
Теперь Вы зна, и можете чего-то использовать.
Что же касается полных ответов, то код мне лень писать, особенно велосипедный, делаю я это только когда совсем скучно. Кроме того, краткость - сестра таланта.
maxefficiently (2011-02-25 19:39:00) [3]KilkennyCat, у Вас такой умный, полным, чёткий полезный совет, что аж прям не знаю... А я не зна, что напрямую можно... да чего-то не использую.
KilkennyCat (2011-02-25 08:19:00) [4]
> Как реализовать?
использовать rar.dll напрямую.