怎样在Webbrowse中取出当前网页中的一个Table的 某一个TD元素 的值(该TD元素已命名)(100分)

如题

都没人，我知道答案了，自己把文件定错了。自己关闭算了。

game over

procedure TForm1.Button1Click(Sender: TObject);
var
i, j: integer;
ovTable: OleVariant;
begin
ovTable := WebBrowser1.OleObject.Document.all.tags('TABLE').item(0);
for i := 0 to (ovTable.Rows.Length - 1) do
begin
for j := 0 to (ovTable.Rows.Item(i).Cells.Length - 1) do
begin
Memo1.Lines.Add(ovTable.Rows.Item(i).Cells.Item(j).InnerText;
//此处加判断,检查是否是已经找到的TD元素的名....
end;
end;
end;

多人接受答案了。