Twebbrowser + Textarea

[Guest]

Помогите пожалуйста. Требуется заполнить поле 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 Западноевропейская, пробовал несколько вариантов но все без толку. Может будут идеи?..

 

[Guest]

Проблема в том, что TWebBrowser почему-то игнорирует перевод строки - даже если я в окне броузера нажму enter - ничего не произойдет; только на alt 13 он реагирует.

 

[etc]

Для: Арсений
а почему собственно p.innerHTML ?
по моему там что то типа p.value, да и новая строка там - \n

 

[Barmutik]

Обрабтка некоторых спец клавиш в TWebBrowser глючит.. используйте более продвинутый компонент TEmbeddedWB...

Помнится сколько намучились когда ВебБроузер перехватывал горячие клавиши в проге...