![]() |
Extraktion von REGEX von WebPage mit TEdgeBrowser bzw. WebView
Hallo Freunde, ich habe das hier
![]() ![]() ![]()
Delphi-Quellcode:
Es schaut so aus, dass meine Zielwebsite wie dieses hier procedure TFormMain.Button1Click(Sender: TObject); begin browsermain.formmain.webview.ExecuteScript('document.documentElement.outerHTML', procedure (const JsonResult: string) var Json: TJson; begin with TJsonParser.Create do try Json := ParseUtf8(JsonResult); try htmlmemo.Text:=(Json as TJsonString).Value; htmlmemo.Lines.SaveToFile(System.IOUtils.TPath.GetTempPath+'PubChem_html.txt'); //ShowMessage((Json as TJsonString).Value); finally Json.Free; end; finally Free; end; end); end; ![]() ![]() Meine Frage wäre , wie kann ich diesen regulären Ausdruck [0-9]+\-[0-9][0-9]\-[0-9] für die `CAS-REGISTRY-Number` vom `COMPOUND BEST MATCH` Titel Zeile ( in Blau hier ) mit meiner Anfrage ( Hier zB. MES als `query-compound-name` ) ? Das Ergebnis hier in diesem Beispiel sollte sein: 4432-31-9 Ich glaube es sollte die WebPage zuerst mit dem JS ausgeführt werden und dann weiter untersucht werden. Weiß wer hier einen Rat? Ich bin dankbar für jeden brauchbaren Vorschlag, Idee und Lösung. Danke W |
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:03 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz