Дополнен 15 лет назад
Авто-нажатие кнопок на веб-форме
1. Получаем интерфейс IHTMLDocument2 из IWebBrowser::Document (пример doc:=WebBrowser1.Document as IHTMLDocument2)
2. Получаем коллекцию элементов IHTMLElementCollection = IHTMLDocument2::all (allEl:=doc.all)
3. Получаем коллекцию элементов формы allElForm:IHTMLElementCollection;
allElForms:=allEl.tags('form') as IHTMLElementCollection;
4. Перечисляем все элементы на имя тега Input:
For i:=0 to allElForms.length-1 do
begin
elItem:=allEl.item(i, i) as IHTMLElement;
If elItem.tagname = 'input' then
...
end;
5. Проверяем атрибут Type элемента Input, если он Submit или Button:
If string(elItem.getAttribute('type', 0)) = 'submit' then
6. Если все вышеуказанные условия выполняются, делаем клик: elItem.click
Установил Borland Delphi 6 разместил на форме компонент WebBrowser из закладки Internet а что дальше мне делать из имеющейся информации чуть выше, я незнаю..
П.с
помогите кто чем может.. (знаем чуть с++ но в делфи в первые) Delphi > Тема: Авто-нажатие кнопок на веб-форме (TEmbeddedWB)
Дополнен 15 лет назад
[ссылка появится после проверки модератором]