Pergunta : (Outros) extrair dados da tabela do HTML

Olá! o all

can alguém mostra-me que como extrair a informação da tabela (dados) em um TStringGrid diretamente da posição abaixo satisfazer? necessidade do
i somente o que nós vemos: rel= " nofollow " do " _blank " " do target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=no&view=1&min_lat=10&min_long=-30&max_long=65 do href= do
arthquake/index.php de http://www.emsc-csem.org/E? o filter=no&view=1&min_lat=10&min_long=-30&max_long=65


i igualmente tentou extrair os dados deste rel= " nofollow " do " _blank " " do target= do " 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 do href= de CSV
o arthquake/index.php de http://www.emsc-csem.org/E? o 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 é o resultado desta página: rel= " nofollow " do " _blank " " do target= de " http://www.emsc-csem.org/Earthquake/index.php?filter=yes do href= do
arthquake/index.php de http://www.emsc-csem.org/E? o filter=yes

but o CSV próprio é tão desarrumado, aquele mesmo que Excel não poderia o ler corretamente… o

i viu outros bornes sobre a extração de tabelas dos HTML a um programa de delphi aqui na EE, mas não trabalharam para mim, ou talvez eu fiz algo… o

btw, eu não sei se significa qualquer coisa, mas o TWebBrowser começ furado quando eu tentei carregar estas páginas nele… necessidade do

i apenas algo que me começ os dados do Internet no StringGrid com um uso Delp do

i do clique (e a nenhuma DEMORA ou .NET se possível por favor) 6 otorrinolaringológico se ele helps

MANY thanks
class= do

Resposta : (Outros) extrair dados da tabela do HTML

O CSV é muito bem, a não ser que vírgula-não seja separado, ele é semicolon separado.
Uma vez que você tem a lima de CSV, você pode povoar o TStringGrid como segue.
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: corda;
  i: inteiro;
  iStart: inteiro;
  iEnd: inteiro;
  coluna: inteiro;
começar
  sl: = TStringList.Create;
  tentativa
    sl.LoadFromFile (“C:\export _EMSC.csv ");
    StringGrid1.RowCount: = sl. Contagem;
    StringGrid1.FixedCols: = 0;
    StringGrid1.ColCount: = 9;
    para i: = 0 a Pred (sl. A contagem) faz
    começar
      s: = sl [i] + “; ”;
      coluna: = 0;
      iStart: = 1;
      iEnd: = 1;
      quando (iEnd  <>
           
Outras soluções  
 
programming4us programming4us