delphi中，如何实现webbrowser的onmousedown。
最近做一个自动填表程序，遇到点问题。
网页文件源码如下：
<div class="photos"><textarea name="content" onmousedown="clearInitContent();this.style.color='#000000';" id="content" wrap="physical" class="write_text" style="color:#999;" ></textarea></div>
其中的onmousedown="clearInitContent();是清除文本框中的提示内容，我想模拟这个鼠标点击事件。请问用delphi怎么实现？
注：我程序中使用的是MSHTML单元。
[解决办法]
做这个工作当然是举一反三了，我那个是直接调函数。实现方法有3种以上。
