Сайт внутри EXE файла

🕛 05.09.2006, 12:36

Оригинал: http://www.diagnostic.ru/delphi/

В этой статье мы рассмотрим как хранить HTML страницы и входящие в него картинки в вашем проекте. В конечном итоге мы получим один исполнимый файл содержащий HTML страницу.
Шаг первый - создание HTML страницы.

Для начала мы создадим две простеньких HTML страницы. Для их создания вы можете воспользоваться вашим любимым HTML редактором. Создайте одну страницу с одним рисунком и ссылкой на другую страницу. Я назову свои delphiandprogramming.html и page2.html. Когда вы добавите картинку в страницу, то редактор напишет что-то вроде:
<img ... src="pics/delphiandprogramming.jpg">

Но нам нужно поменять в коде HTML значение параметра SRC так чтобы он был равен имени ресурса:
<img src="/JPEG/dpgjpeg" width="67" heught="61">

Вот код моей странички delphiandprogramming.html:
<HTML><HEAD><TITLE>Delhi And Programming Test Resources 3</HTML></HEAD></TITLE>
<a href="/HTML/page2">Look at second page</a><br>
Welcome to<a href="http:/delfaq.wallst.ru"> <img src="/JPEG/dogjpeg" width="67"
height="61">!</a>
</BODY></HTML>

И page2.html:
<HTML><HEAD><TITLE>Delhi And Programming Test Resources Page2</HTML></HEAD></TITLE>
AND HERE WE GOES THRU EXE!
</BODY></HTML>
Создание файла ресурсов

Напомню, что для создания файла скрипта вам необходимо:
Создать пустой текстовый файл в директории с проектом
Переименовать его в TestRes3.rc
Написать в нем следующий код:
dpg HTML "delphiandprogramming.html"
page2 HTML "page2.html"
dpgjpeg JPEG "delphiandprogramming.jpg"

Тип ресурса - RT_HTML определенный как ресурс под номером "23", это ресурсный тип по умолчанию для HTML страниц.

Итак, мы создали файл скрипта ресурсов, страницу и связанную с ней картинку. Следующий шаг - откомпилировать скрипт. Для его компиляции, как это было описано во второй части этой серии мы выполним в командной строке следующую команду:
BRCC32 TestRes3.RC

Теперь подключим полученный файл ресурсов в наш проект следующей строчкой:
{$R TestRes3.RES}
Показ страницы в браузере

Когда мы откомпилировали наше приложение, (я его назвал testres3.exe) мы можем просмотреть нашу страничку в браузере, для этого в адресной строке браузера наберите следующий адрес:
res://C:\Delphi5\Projects\TestRes3\testres3.exe/HTML/dpg

Конечно путь " C:\Delphi5\Projects\TestRes3\testres3.exe" у вас может отличаться.
Показ страницы в своем приложении

А теперь мы покажем страницу в самом приложении! Разместите на форме компонент TWebBrowser (находится в Delphi 5 на закладке "Internet"). И на создание формы напишите следующий код:
Self.WebBrowser1.Navigate('res://C:\Delphi5\Projects\TestRes3\testres3.exe/HTML/dpg');

И все! Теперь вы можете отправлять свой сайт не заботясь о том что пользователь не сможет набрать эту хитрую строчку: 'res://C:\Delphi5\Projects\TestRes3\testres3.exe/HTML/dpg'.