Site icon Embarcadero RAD Studio, Delphi, & C++Builder Blogs

Использование JavaScript на примере Google maps в Delphi XE6

the future of starts demands massive productivity

Author: Nikolay M4446

Одно из небольших нововведений в XE6 для компонента TWebBrowser, это появление метода EvaluateJavaScript, позволяющего выполнить JavaScript на загруженной странице и добавить интерактивности нашим приложениям.

На сайте developers.google.com приведено множество примеров встраивания карт на страничку. Мне приглянулся пример прокладывания маршрута из пункта А в пункт Б. Ну а в качестве примера выполнения JavaScript, я определю две кнопки для прокладывания предопределённых путей Из пункта chicago в пункт winona и из пункта st louis в пункт gallup.

Создаём новый мобильный проект, на форму кидаем TWebBrowser, TPanel и два TButton на TPanel.

Для удобства, я создам так же ещё один юнит uJavaScripts.pas для кода страницы и самих скриптов. Самое муторное — скопипастить код из примера и оформить его как константу. У меня получилось это сделать примерно так:

[crayon-674051b6a49b5224537368/]

Код целиком взят из примера с сайта Google.
Осталось загрузить его в браузер. Для этого в событии FormCreate загрузим его

[crayon-674051b6a49bd207318201/]

Уже можно запустить и посмотреть. На iPhone5 всё выглядит так:

Добавим две константы:

[crayon-674051b6a49bf585685777/]

И добавим обработчики для кнопок:

[crayon-674051b6a49c0621676122/]

Всё. Как результат: мы можем либо выбрать произвольный маршрут на странице, либо, используя JavaScript выбрать предопределённый заранее.

Ну и пример, как выглядит наше приложение на iPhone и Kindle Fire HD

Exit mobile version