| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Заполнить TEXTAREA используя TWebBrowser [D7, WinXP]
Арсений © (2007-06-14 11:24:00)Помогите пожалуйста. Требуется заполнить поле TEXTAREA, используя TBrowser.
Так загружается страница:
_URL := ' http://tigrblast.tigr.org/euk-blast/index.cgi?project=tae1';
Flags := 0; TargetFrameName := 0; Postdata := 0;
Headers:='Content-Type: application/x-www-form-urlencoded'#10#13;
WebBrowser1.Navigate2(_URL, Flags, TargetFrameName, PostData, Headers);
Потом вот так (в цикле по всем элементам, textarea там одна)
iDisp.QueryInterface(IHTMLElement, iElement);
if iElement.Get_tagName='TEXTAREA' then p:=ielement;
отлично находится элемент, но возникает проблема с записью В НЕСКОЛЬКО СТРОЧЕК. То есть когда дело доходит до
p.innerHTML:='asd'+#13#10+'zxc';
то на форму попадает текст, но без переносов, в одну строчку. Кодировка страницы ISO Западноевропейская, пробовал несколько вариантов но все без толку. Может будут идеи?..
Арсений (2007-06-14 20:34:00) [1]Ничего здесь не лишнее, и поскольку TEXTAREA имеет закрывающий тег, value и set_value у нее нет; надо использовать innerHTML вместо них. А проблема в том, что TWebBrowser почему-то игнорирует перевод строки - даже если я в окне броузера нажму enter - ничего не произойдет; только на alt 13 он реагирует.
Плохиш (2007-06-14 11:55:00) [2]
> +#13#10
Здесь #13 лишняя...
Плохиш (2007-06-14 11:47:00) [3]
p.value:='asd'+#13#10+'zxc';?
| |
