Форум программистов CODEBY.NET Хостинг в Беларуси — Active Technologies

Разработка бизнес сайтов

Нужны клиенты? Тогда сюда быстрее...
X   Сообщение сайта
(Сообщение закроется через 2 секунды)

Здравствуйте, гость ( Вход | Регистрация )




> Twebbrowser + Textarea, Как впихнуть текст в TEXTAREA с сохранением разбивки по строчкам?
Арсений
Вставить ник
сообщение 14:06:2007, 07:22
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 5
Регистрация: 7:06:2007
Пользователь №: 11 267



Репутация: - 0 +


Помогите пожалуйста. Требуется заполнить поле 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 Западноевропейская, пробовал несколько вариантов но все без толку. Может будут идеи?..
Подняться вверх 
 
Сообщение #1
 
Новая тема 
Ответов (1 - 3)
Арсений
Вставить ник
сообщение 14:06:2007, 16:34
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 5
Регистрация: 7:06:2007
Пользователь №: 11 267



Репутация: - 0 +


Проблема в том, что TWebBrowser почему-то игнорирует перевод строки - даже если я в окне броузера нажму enter - ничего не произойдет; только на alt 13 он реагирует.
Подняться вверх 
 
Сообщение #2
etc
Вставить ник
сообщение 14:06:2007, 18:16
Цитата Ответить 


Новенький
*

Группа: Программист
Сообщений: 89
Регистрация: 5:06:2007
Пользователь №: 11 234



Репутация: - 1 +


Для: Арсений
а почему собственно p.innerHTML ?
по моему там что то типа p.value, да и новая строка там - \n
Подняться вверх 
 
Сообщение #3
Barmutik
Вставить ник
сообщение 15:06:2007, 05:33
Цитата Ответить 


Божественный
*****

Группа: Модеры
Сообщений: 2 450
Регистрация: 27:05:2004
Из: Минск
Пользователь №: 561
Специализация: Delphi, RDBMS, C#



Репутация: - 8 +


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

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


Ответить  Новая тема 

 

RSS Текстовая версия Сейчас: 16:05:2008 - 17:46
с нами можно связаться по:
телефону: +375-(29)-632-60-67
e-mail:info@codeby.net