Question

Delphi中使用线程调用主窗体中Webbrowser的报错？？晕啊

procedure TForm1.Catch;
var
i, j: integer;
ovTable: OleVariant;
begin
ovTable := Form1.WebBrowser1.OleObject.Document.all.tags('TABLE').item(8);//8
for i := 0 to (ovTable.Rows.Length - 1) do //行
begin
for j := 0 to (ovTable.Rows.item(i).Cells.Length - 1) do //列
begin
Form1.memo1.lines.add(ovTable.Rows.Item(i).Cells.Item(j).innerText);//:=ovTable.Rows.Item(i).Cells.Item(j).innerText //原文是：Innerhtml，我需要判断表格中的链接
end;
end;
end;

Answer 1

你这个是线程嘛?
看着不像呀...