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