下边几行命令是什么意思?请大虾看一下. ( 积分: 10 )

Application.ProcessMessages;
Dispatch := ElementCollection.item(vk, 0);
If SUCCEEDED(Dispatch.QueryInterface(IHTMLInputElement, HTMLInputElement)) Then
If (UpperCase(HTMLInputElement.Type_) = 'IMAGE') And (Pos(bmp, LowerCase(HTMLInputElement.src)) > 0) Then
HTMLInputElement.form.submit;

Application.ProcessMessages; // 处理消息，让系统有点反应
Dispatch := ElementCollection.item(vk, 0); //取得全部部件的集合
If SUCCEEDED(Dispatch.QueryInterface(IHTMLInputElement, HTMLInputElement)) Then // 如果支持这个接口，成功取得一个部件
If (UpperCase(HTMLInputElement.Type_) = 'IMAGE') And (Pos(bmp, LowerCase(HTMLInputElement.src)) > 0) Then // 如果这个部件是图像， 并且名字包含bmp 变量中的内容
HTMLInputElement.form.submit; // 对这个部件发提交动作

接受答案了.