[Gareth]

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


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

Код:

1 2 3 4 5 6

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, получил его путем пкм по поле ввода, "просмотреть код элемента"
поле Получатели

Код:

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

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

Код:

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

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

Код:

1 2 3

<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. Полученные тобой переменные являются списками контролов указанного типа (массивами), так что просто перебирай их все и проверяй значение соотв. атрибутов.