| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нажатие кнопки внутри TWEBbrowser [D6, Win2k]
Жорик © (2002-09-13 15:22:00)Уважаемые!!! Помогите с проблемой... как организовать нажание кнопки, которая находится на документе, который загружен в этом самом TWEBBrowser. Кнопка единственная на форме. Заранее спасибо..
Ш-К (2002-09-13 17:11:00) [1]
uses ..., MSHTML;
...
procedure TForm1.Button1Click(Sender: TObject);
var
Coll : IHTMLElementCollection;
Doc: IHTMLDocument2;
i: integer;
begin
Doc:= (WebBrowser1.Document as IHTMLDocument2);
Coll:= Doc.all.tags("INPUT") as IHTMLElementCollection;
for i:= 0 to Coll.length-1 do
if (Coll.item(i,varEmpty) as IHTMLElement).getAttribute("type",0)="submit" then
(Coll.item(i,varEmpty) as IHTMLElement).click;
end;
Нажмутся все кнопки.
Song (2002-09-13 15:37:00) [2]Поподробней надо программу писать, а в лом честно говоря. Введите название класса в яндекс, он Вам найдёт кучу примеров.
Жорик (2002-09-13 15:35:00) [3]а подробнее?
Song (2002-09-13 15:34:00) [4]IHtmlElement.Click
| |
