Cuestión : (Otros) extraer los datos de la tabla del HTML

¿Hola el all

can alguien me demuestra que cómo extraer el Info de la tabla (datos) en un TStringGrid directo de la localización abajo satisfacer? necesidad del
i solamente qué vemos: ¿rel= " nofollow " del " _blank " del target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=no&view=1&min_lat=10&min_long=-30&max_long=65 " del href= del
arthquake/index.php de http://www.emsc-csem.org/E? ¿el filter=no&view=1&min_lat=10&min_long=-30&max_long=65


i también intentó extraer los datos de este rel= " nofollow " del " _blank " del target= del " 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 " del href= de CSV
el arthquake/index.php de http://www.emsc-csem.org/E? el 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 es el resultado de esta página: ¿rel= " nofollow " del " _blank " del target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=yes " del href= del
arthquake/index.php de http://www.emsc-csem.org/E? el filter=yes

but el CSV sí mismo es tan sucio, ése incluso que Excel no podría leerlo… el

i vio correctamente otros postes sobre la extracción de las tablas de los HTML a un programa de delphi aquí en EE, pero no trabajaron para mí, o hice quizá algo… el

btw, no sé si significa cualquier cosa, solamente el TWebBrowser conseguí pegado cuando intenté cargar estas páginas en él… necesidad del

i apenas algo que me conseguirá los datos del Internet en el StringGrid con un uso Delp del

i del tecleo (y ninguna DIFICULTAD o .NET si es posible por favor) 6 Ent si él helps

MANY thanks class= del

Respuesta : (Otros) extraer los datos de la tabla del HTML

El CSV está muy bien, a menos que coma-no se separe, él es punto y coma separado.
Una vez que usted tiene el archivo de CSV, usted puede poblar el TStringGrid como sigue.
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:

var
  sl: TStringList;
  s: secuencia;
  i: número entero;
  iStart: número entero;
  iEnd: número entero;
  columna: número entero;
comenzar
  sl: = TStringList.Create;
  intento
    sl.LoadFromFile (“C:\export _EMSC.csv ");
    StringGrid1.RowCount: = sl. Cuenta;
    StringGrid1.FixedCols: = 0;
    StringGrid1.ColCount: = 9;
    para i: = 0 a Pred (sl. La cuenta) hace
    comenzar
      s: = sl [i] + “; ”;
      columna: = 0;
      iStart: = 1;
      iEnd: = 1;
      mientras que (iEnd  <>
Otras soluciones  
 
programming4us programming4us