Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.03.2015, 22:09   #1
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию Программно выполнить js в webbrowser

На страничке имеется js скрипт:

Код:
	function modalShow(x,y,z){
		if(!x){ x= '000000'};
		if(!y){ y= 'img/loading.gif'};
		if(!z){ z= '0.8'} else { z= z / 100 };
		$('body').after('<style id="loockstyle">'
			+'div#looker {'
			+'background: #'+x+';'
			+'width: 100%;'+'height: 100%;'
			+'position: fixed;'+'z-index: 9998;'
			+'top:0;'+'left:0;'+'opacity:0; }'
			+'img#loadico{'
			+'position: absolute;'
			+'top:50%;'+'left:50%;'
			+'z-index: 9999;'
			+'}'
		+'</style>')
		$('body').after('<div id="looker"><img id="loadico" src="'+y+'"></div>')
		$('img#loadico').css( 'margin-left','-'+( ( $('img#loadico').width() ) * 0.5 )+'px').css('margin-top','-'+( ( $('img#loadico').height() ) * 0.5 )+'px');
		$('div#looker').animate({opacity: z}, 1200 );}
Как по нажатию Button вызвать его:
Код:
modalShow('FFF','img/loading_1.gif','90')
nibufep вне форума Ответить с цитированием
Старый 07.03.2015, 22:33   #2
Dmitry33RU
Пользователь
 
Регистрация: 09.10.2014
Сообщений: 62
По умолчанию

этот код не будет работать в webbrowsere
Dmitry33RU вне форума Ответить с цитированием
Старый 08.03.2015, 09:55   #3
nibufep
Форумчанин
 
Регистрация: 02.08.2014
Сообщений: 476
По умолчанию

а как этот код можно адаптировать под IE 7?
nibufep вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как программно нажать на Ajax ссылку через WebBrowser? Macwin C# (си шарп) 6 14.08.2012 11:29
Выполнить программно клик js в delphi vk-i Работа с сетью в Delphi 1 29.07.2012 19:57
OpenDialog.execut как выполнить программно mutb Мультимедиа в Delphi 6 18.06.2012 02:09
Программно выбрать пункт в Combobox и выполнить... Dux Компоненты Delphi 2 03.09.2011 21:32
Выполнить скрипт на странице в WebBrowser rangel Работа с сетью в Delphi 2 09.03.2010 14:39