Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
Prog2010
0 / 0 / 0
Регистрация: 10.11.2013
Сообщений: 1
1

Delphi + chromium + yandex maps

13.11.2013, 18:16. Просмотров 2157. Ответов 1
Метки нет (Все метки)

Здравствуйте, уважаемые форумчане, помогите решить задачу.

Использую в программе компонент TChromium для работы с Yandex maps.

Для вывода маркера использую:

Delphi
1
 ChromBrowser.Browser.MainFrame.ExecuteJavaScript('PutMarker('+IDveh+','+FloatToStr(gpsLatitude)+','+ FloatToStr(gpsLongitude)+','+Name+')','',0);
Вопрос как получить Name при клике по маркеру?

Функция обработки клика в скрипте есть, но как получить значение переменной из Javascript с
компонентом TChromium.

Нашел реализацию на WebBrowser:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
procedure TForm1.Button1Click(Sender: TObject);
Var
  Var1 : integer;
begin
  WebBrowser.Navigate(Edit1.Text);
  while WebBrowser.ReadyState <> READYSTATE_COMPLETE do Application.ProcessMessages;
  try
    Var1 := OleVariant((WebBrowser.Document as IHtmlDocument2).parentWindow).Var1;
    Memo1.Lines.Add(IntToStr(Var1));
    Memo1.Lines.Add(OleVariant((WebBrowser.Document as IHtmlDocument2).parentWindow).ArrVar);
  except
    on e: exception do Memo1.Lines.Add('Error: ' + E.Message);
  end;
end;
Как это реализовать с TChromium не могу сообразить.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.11.2013, 18:16
Ответы с готовыми решениями:

Chromium? запуск, Delphi 7
Поставил Chromium (успешно), на вкладке chromium появляется два компонента. Кидаю на форму, таки не...

Chromium Embedded Delphi XE 2
Ставлю код на кнопку: if pos(Edit1.Text,Chromium1.Browser.MainFrame.Source) &lt;&gt; 0 then...

Chromium на delphi 2010
Здравствуйте, уважаемые форумчане. Сделал свой Браузер на движке Chromium( ну как сделал, с...

В Delphi Chromium заполнение полей
Здравствуйте. Какой скрипт нужно использовать что б заполнить это поле : &lt;textarea...

Установка Chromium на Delphi 2010
Как установить на Delphi 2010. На Делфи 7 поставил без проблем. А Делфи2010 открывает файл и не...

1
casio23
0 / 0 / 0
Регистрация: 11.01.2014
Сообщений: 11
12.01.2014, 14:47 2
поделитесь рабочим компонентом, установка проходит нормально но после компиляции приложения выскакивает ошибка
http://www.cyberforum.ru/attachments/352839d1389442005
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.01.2014, 14:47

Delphi xe2 Chromium установка
Как установить этот компонент? В настройках указываю в library и browsering path пути к packages и...

Chromium Embedded Delphi XE 2 Proxy
Как прикрутить прокси к Chromium Embedded ? Хотелось бы прикрутить их, не трогая при этом...

Delphi Chromium проверка элемента
Задачка не совсем стандартная. Необходимо написать функцию, которая возвращает true, если value...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru