Question : (Des autres) extraire les données à partir de la table de HTML

Salut l'all

can quelqu'un me montrent que comment extraire l'information de la table (données) dans un TStringGrid directement à partir de l'endroit ci-dessous veuillez ? le besoin du
i seulement ce que nous voyons : rel= " nofollow " de " _blank " de target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=no&view=1&min_lat=10&min_long=-30&max_long=65 " de href= du
arthquake/index.php de http://www.emsc-csem.org/E ? le filter=no&view=1&min_lat=10&min_long=-30&max_long=65


i a également essayé d'extraire les données à partir de ce rel= " nofollow " de " _blank " de target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=yes&start_date=2010-07-01&end_date=2010-07-19&min_mag=1&min_intens=0&max_intens=8&export=csv " de href= de CSV
le arthquake/index.php de http://www.emsc-csem.org/E ? le filter=yes&start_date=2010-07-01&end_date=2010-07-19&min_mag=1&min_intens=0&max_intens=8&export=csv

the CSV est le résultat de cette page : rel= " nofollow " de " _blank " de target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=yes " de href= du
arthquake/index.php de http://www.emsc-csem.org/E ? le filter=yes

but le CSV lui-même est si malpropre, cela même qu'Excel ne pourrait pas le lire correctement… le

i a vu d'autres poteaux au sujet d'extraire des tables à partir des HTML à un programme de Delphes ici en EE, mais elles n'ont pas fonctionné pour moi, ou peut-être j'ai fait quelque chose… le

btw, je ne sais pas s'il signifie n'importe quoi, mais le TWebBrowser me coince quand j'ai essayé de charger ces pages dans lui… le besoin du

i juste quelque chose qui m'entrera les données de l'Internet dans le StringGrid avec une utilisation Delp du

i de clic (et aucune AGITATION ou .NET si possible svp) 6 oto-rhino s'il helps

MANY thanks class= de

Réponse : (Des autres) extraire les données à partir de la table de HTML

Le CSV est très bien, à moins qu'il virgule-ne soit pas séparé, il est point-virgule séparé.
Une fois que vous avez le dossier de CSV, vous pouvez peupler le TStringGrid comme suit.

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 : 19 : 20 : 21 : 22 : 23 : 24 : 25 : 26 : 27 : 28 : 29 : 30 : 31 : 32 : 33 : 34 : 35 :

variété SL : TStringList ; s : corde ; i : nombre entier ; iStart : nombre entier ; iEnd : nombre entier ; colonne : nombre entier ; commencer SL : = TStringList.Create ; essai sl.LoadFromFile (« C:\export _EMSC.csv ") ; StringGrid1.RowCount : = SL. Compte ; StringGrid1.FixedCols : = 0 ; StringGrid1.ColCount : = 9 ; pour I : = 0 à Pred (SL. Le compte) font commencer s : = SL [I] + « ;  » ; colonne : = 0 ; iStart : = 1 ; iEnd : = 1 ; tandis que (iEnd <>