| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Заполнение html-форм через TWebBrowser?

DocSS ©   (2003-06-19 19:15:00) 

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

---

Тих   (2003-06-20 21:01:00) [1]

или NULL

---

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

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

---

Vlad Oshin   (2003-06-20 11:46:00) [3]

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;

---

Наверх