get number of rows and cols of a Table

[mr_fahrrad]

Hi Again!

How I do that? if possible, in a selected table... I get the outerHtml and count the number of occourences of 'td' and 'tr', but is not a good method because merge cells..

I need a reference for commands of webbrowser (mshtml - ole), where I get it?

[marabu]

Hi,

you should find everything you look for and more on this site: WebBrowser Control

Delphi-Quellcode:

function RowCount(doc: IHTMLDocument2; table: Variant): Integer;
var
  e2: IHTMLElement2;
  ec: IHTMLElementCollection;
  tbl: IHTMLTable;
begin
  e2 := doc.body as IHTMLElement2;
  ec := e2.getElementsByTagName('table');
  tbl := ec.item(table, null) as IHTMLTable;
  if Assigned(tbl)
    then Result := tbl.rows.length
    else Result := 0;
end;

Regards