07.04.2012, 13:22
|
|
Администратор
|
|
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,564
Версия Delphi: Delphi 7
Репутация: выкл
|
|
[ Статья ] - Просмотр DJVU файлов средствами Delphi
Автор: mahab-22
E-mail: mahab-22@mail.ru
Цитата:
На момент написания статьи, компонентов работы с файлами DJVU для Delphi мною найдено не было. Есть официальный ресурс владельца, который предлагает SDK с исходными кодами на языке СИ, но в этом случае необходимо было бы потратить уйму времени на трансляцию исходников на Паскаль, чтобы решить всего лишь одну маленькую задачку. Нет мы пойдем более простым путем.
На компьютере установлена windows seven максимальная. Используется IDE Delphi 7.
Версия плагина DJVU для браузера - Lizardtech 6.1 (Его можно взять по адресу http://djvu-info.ru/prog/DJVUCNTL_61_EN.EXE).
1) Устанавливаем плагин обычным способом, следуя инструкциям программы-установщика.
2) Запускаем Internet Explorer, через меню «файл» открываем любой DJVU файл и убеждаемся в том, что плагин работает.
3) Запускаем IDE, кладем на форму компоненты: Twebbrouser,2 компонета Tbutton и TOpenDialog.
4) Переходим в инспектор объектов компонента TOpenDialog, и в поле «Filter» пишем: «Файлы DJVU|*.djvu».
5) Создаем обработчик события нажатия кнопки Button1 и пишем в нем:
If not OpenDialog1.Execute then exit;
WebBrowser1.Navigate(OpenDialog1.FileName);
6) В обработчике нажатия Button2 :
WebBrowser1.Navigate('about:blank');
Это очистит компонент TWebBrowser.
Удачи!
|
|