[Gareth]

Доброе время суток. На сайте есть возможность обмениваться лиными сообщениями... Там 3 поля, все их нужно программно заполнить текстом.


Это вроде делается как то типа так:

Код:

var
  input_text, textareas: OleVariant;

  input_text := sWebBrowser1.OleObject.document.all.tags('input');
  textareas := sWebBrowser1.OleObject.document.all.tags('text');
  input_text.item(1).value := 'qweqweqwe'; 

Но не знаю что конкретно мне нужно искать, какие таги?
input?
Пробовал по разному, результата нет. Меняя значение в input_text.item(1), удалось написать текст в поле поиска по сайту)) но это не то поле)

прилагаю кусок html, получил его путем пкм по поле ввода, "просмотреть код элемента"
поле Получатели

Код:

 <textarea class="primary full textbox popupctrl" id="pmrecips_ctrl" name="recipients" rows="2" cols="50" tabindex="1" autocomplete="off"></textarea> 

поле Заголовок

Код:

 <input type="text" class="primary full textbox" id="title" name="title" value="" maxlength="85" tabindex="1"> 

поле самого редактора текста

Код:

 <textarea dir="ltr" tabindex="-1" role="textbox" aria-label="Rich text editor, vB_Editor_001_editor, press ALT 0 for help." class="cke_source cke_enable_context_menu" 
style="width: 100%; 
height: 100%; min-width: 100%; max-width: 100%; resize: none; outline: none; text-align: left;"></textarea> 

Пожалуйста, помогите.

[lmikle]

ну ты же указал примеры текстовых полей. из можно фильтровать по атрибуту name или id. Это с простыми полями. А вот для TextArea я ничего такого не вижу, можно попробовать найти его по атрибуту class.

PS. Полученные тобой переменные являются списками контролов указанного типа (массивами), так что просто перебирай их все и проверяй значение соотв. атрибутов.