Скачать: CL | DM;

Заполнение html-форм через TWebBrowser?   Найти похожие ветки 

← →
DocSS ©   (2003-06-19 19:15) [0]

Собственно тема, только хочу уточнить: именно заполнение, оправлять их не надо!

---

← →
Vlad Oshin ©   (2003-06-20 11:46) [1]

Coll:=IHTMLElementCollection(Doc.All.Tags("textarea"));
for i:=0 to Coll.length-1 do
if (HTMLInputElement(Coll.item(i,varEmpty)).name="SM")
then begin
HTMLInputElement(Coll.item(i,varEmpty)).Click;
( Coll.item(i,varEmpty) Coll:=IHTMLElementCollection(Doc.All.Tags("textarea"));
for i:=0 to Coll.length-1 do
if (HTMLInputElement(Coll.item(i,varEmpty)).name="SM")
then begin
HTMLInputElement(Coll.item(i,varEmpty)).Click;
HTMLInputElement(Coll.item(i,varEmpty)).Value:=WideString(memo1.Text);
end;

Coll : IHTMLElementCollection;
Doc: IHTMLDocument2;

---

← →
Тих   (2003-06-20 21:00) [2]

Почему varEmpty? В общем-то несмертельно, потому что varEmpty = $0 (это константа), но для "пустых" параметров используют специальную переменную EmptyParam.

---

← →
Тих   (2003-06-20 21:01) [3]

или NULL

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c