WebBrowser Как нажать кнопку если используется JavaScript?

[M-UNIT]

<div class="bb_new" onmouseout="showEl(this,{type:'del_it',act:'hide'});" onmouseover="showEl(this,{type:'del_it',act:'show'});">
<a class="bb_new_tl bb_new_sp"></a><a class="bb_new_tr bb_new_sp"></a>
	<form onSubmit="return false;" id="micropost_form" name="microPost" action="#" method="POST">
	<input type="hidden" id="mna" name="mna" value="370214">
	<input type="hidden" id="mnb" name="mnb" value="-320020074">
	<div><input name="container" type="hidden" value="history_container" />
	<input name="postsContainer" type="hidden" value="my_microposts_container" />
	<input name="scroll" type="hidden" value="400" />
	<input name="defaultName" type="hidden" value="Мой Мир" />
	<input name="defaultEmail" type="hidden" value="mailrucorp@mail.ru" />
	<input name="is_status" type="hidden" value="1" /></div>
	
	
<div id="my_history_container">
	<div class="mr15">
	
		
	
	
</div>

	
	</div>
	
	<textarea onfocus="return clickBubble(event,this);" onblur="setTimeout(clickBubble.bind(this, event, this), 200);return false;" onchange="return checkBubbleLength(event, this, 0);" onkeyup="return checkBubbleLength(event, this, 0);" name="bubble_text" class="inpArea mf_ovAuto mt5 mf_grey pt3" style="height: 19px;" maxlength="500" counter="micropostCharCounter">Расскажи друзьям, что ты сейчас делаешь</textarea>

	
	<div class="mf_ohd mt5 mf_grey mf_t11">
	
		<div class="mf_flr mt4 pb3"><span class="pr10">Добавить:</span><a class="mf_spIco mf_iFoto mr10" href="http://foto.mail.ru/cgi-bin/photo/addphoto" name="cln6293">Фото</a><a class="mf_spIco mf_iVideo mr10" href="http://video.mail.ru/cgi-bin/photo/addvideo?mode=2" name="cln6294">Видео</a><a class="mf_iMusic mf_spIco mr5" href="http://my.mail.ru/mail/mailrucorp/audio-upload " name="cln6296">Музыку</a></div>
		<input id="micropost_submit" type="submit" name="add_bubble" value="Сказать" onClick="return saveMicropost(this.form, 0);" disabled="disabled" title="Ctrl + Enter" />
		<span class="pl10 mf_vti mt4 mf_dIB"><span id="micropostCharCounter">0</span> из <span>500</span></span>
	
	</div>
	
</form>

	
	
<a class="bb_new_bl bb_new_sp"></a><a class="bb_new_br bb_new_sp"></a>
</div>

вот код микроблога мой мир

а вот на дельфи пишу прогу что бы прогрммно менять текст микроблога то есть добавить текст.

var
 r, i:integer;
h:variant;
begin
for r := 0 to 11 do
begin
h:=WebBrowser1.OleObject.Document.forms.item(r).elements;
for i:=0 to (h.length-1)do
begin
memo1.Lines.Add(h.item(i).name);
if (h.item(i).name='bubble_text') then
begin
h.item(i).value:='xxx'; //после того когда меняли текст в TEXTAREA то нужно типа CHANGE что бы кнопка ADD_BUBBLE был доступен для нажатия.
end;
if (h.item(i).name='add_bubble') then
begin           
h.item(i).click;
end;
end;
end;
end;

Помогите пожалуйста, надеюсь вы поняли. :cool:
очень нужно.