Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#2

Re: Tabelle mit TWebbrowser auslesen

  Alt 9. Mai 2009, 20:20
Hallo

Ansatz ohne Verwendung von TWebbrowser, mit IdHttp und Ermittlung von
IHTMLDocument2:

Delphi-Quellcode:
function GetDocument(const markup: WideString): IDispatch;
var
  doc: OleVariant;
begin
  Result := CoHtmlDocument.Create;
  doc := Result;
  doc.Open;
  doc.Write(markup);
  doc.Close;
end;

var
  docd: IDispatch;
  doc: IHTMLDOCUMENT2;
  url: String;
  itable: IHTMLTable;
begin
  url := 'http://www.DeineURL.xyz';
  doc := GetDocument(IdHttp1.Get(url)) as IHTMLDocument2;
  GetTable(Doc, 0, itable) // siehe Link unten
  etc..
end;

Die Tabelle kannst du dann wie hier gezeigt wird parsen.
Thomas
  Mit Zitat antworten Zitat