RAR Component

← →
maxefficiently (2011-02-25 07:59) [0]

Есть 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;

← →
KilkennyCat © (2011-02-25 08:19) [1]

> Как реализовать?

использовать rar.dll напрямую.

← →
maxefficiently (2011-02-25 19:39) [2]

KilkennyCat, у Вас такой умный, полным, чёткий полезный совет, что аж прям не знаю... А я не зна, что напрямую можно... да чего-то не использую.

← →
KilkennyCat © (2011-02-25 20:29) [3]

Взаимно, maxefficiently. Вы сумели воспользоваться сторонним компонентом, у которого есть сайт, справка, открытый исходный код. Удачный выбор. Полная информационная доступность. Я даже осмелюсь предположить, что Вы удосужились посмотреть исходник этого компонента, как например, я. Но если Вам показалось, что Вы проглядели что-то, а кто-то заметит Вами прогляденное, то напрасно переживаете - показалось.
Теперь Вы зна, и можете чего-то использовать.
Что же касается полных ответов, то код мне лень писать, особенно велосипедный, делаю я это только когда совсем скучно. Кроме того, краткость - сестра таланта.

← →
maxefficiently (2011-02-26 07:25) [4]

RAR Component Найти похожие ветки