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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 03.05.2010, 13:49   #1
duhduhduh
Пользователь
 
Регистрация: 18.01.2010
Сообщений: 12
По умолчанию Как нажать кнопку в TWebBrowser

Всем привет!

В интернете нашёл код как нажать кнопку в TWebBrowser, когда в окне есть несколько кнопок:
Цитата:
procedure TForm1.Button1Click(Sender: TObject);
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.form s.item(0).elements;
for i := 0 to (ovElements.Length - 1) do
if (ovElements.item(i).tagName = 'INPUT') and
(ovElements.item(i).type = 'SUBMIT') and
(ovElements.item(i).Value = 'Recent Charges') then
ovElements.item(i).Click;
end;
Вроде всё просто, но немогу понять что писать вместо 'INPUT' 'SUBMIT' и 'Recent Charges'.

К примеру надо нажать в загрузившемся окне браузера WebBrowser1, кнопку "ОТПРАВИТЬ", вот код странице где эта кнопка, которую я посмотрел в HTML виде:
Цитата:
<tr class="tallRow">
<td class="label"></td>
<td>
<div style="height: 30px; margin: 0px 10px 0px 0px;">
<ul class="nNav" style="float: left;">
<li style="margin-left: 0px;">
<b class="nc"><b class="nc1"><b></b></b><b class="nc2"><b></b></b></b>
<span class="ncc"><a href="javascript:send_message()">От править</a></span>
<b class="nc"><b class="nc2"><b></b></b><b class="nc1"><b></b></b></b>

</li>
<li>
<b class="nc"><b class="nc1"><b></b></b><b class="nc2"><b></b></b></b>
<span class="ncc"><a href="javascript:history.go(-1)">Отмена</a></span>
<b class="nc"><b class="nc2"><b></b></b><b class="nc1"><b></b></b></b>
</li>
</ul>
<div style="margin: 5px 0px 0px 10px; vertical-align: 0px; float: left; display: none;" id="sending_progress"><img ilo-full-src="http://vkontakte.ru/images/upload.gif" src="images/upload.gif"></div>

</div>
</td>
</tr>
Но тут нет просто ТЕКСТ кнопки и её ссылка.. Может я что-то не догоняю =) Если не тяжело, подскажите плиз!!!

(так же интересует вопрос как найти в компоненте WebBrowser нужное окошко Edit и скопировать в него текст - если кто-то знает, подскажите пожалуйста, буду очень благодарен!)

Последний раз редактировалось duhduhduh; 03.05.2010 в 13:56.
duhduhduh вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как программно нажать кнопку на ASP.NET страницах? Blourid Работа с сетью в Delphi 0 14.03.2010 08:14
Как нажать на кнопку зная ее class? pain_kill Работа с сетью в Delphi 1 26.12.2009 17:51
Как нажать кнопку другого приложения? TwiX Общие вопросы Delphi 2 29.07.2009 19:08
Как нажать на кнопку в TWebBrowser да и вообще хоть на что-то.. postal2 Работа с сетью в Delphi 9 08.02.2009 22:45