[delphi] prelevare dati da sito web

[Tony91]

Vorrei sapere come prelevare e visualizare dati da un sito web ad esempio quello dei risulati del lotto e farlo visualizzare nella mia applicazione come faccio?

[nicholas77]

Ci sono due modi,secondo me:

1)
Potresti andare sul sito lottomaticaitalia.it poi vai su archivio storico e da li scaricarti il file delle estrazioni; che e' un file .txt e poi caricarlo su un memo per poi trasferirlo dove vuoi.


2)
Dovresti utilizzare l'ogetto TBrowser,inserire l'indirizzo, poi caricare in un memo la pagina in html attraverso un'istruzione che al momento non ricordo.

[Tony91]

sono interessato al secondo metodo

[cyberlaundry]

Verifica che il sito permetta l'estrazione dei dati (cosa che dubito - ad esempio paginegialle lo proibisce esplicitamente).
Preso atto che stai agendo in piena legalità, puoi usare questa routine per salvare su un file il contenuto HTML di una pagina:

uses
  ShDocVw, ActiveX;

procedure WB_SaveAs_HTML(WB:TWebBrowser; const FileName : string);
var
  PersistStream: IPersistStreamInit;
  Stream: IStream;
  FileStream: TFileStream;
begin
  if not Assigned(WB.Document) then
  begin
    ShowMessage('Nessuna pagina caricata!');
    Exit;
  end;

  PersistStream := WB.Document as IPersistStreamInit;
  FileStream := TFileStream.Create(FileName, fmCreate);
  try
    Stream := TStreamAdapter.Create(FileStream, soReference)
              as IStream;
    if Failed(PersistStream.Save(Stream, True)) then
      ShowMessage('Impossibile scaricare i risultati html!');
  finally
    FileStream.Free;
  end;
end;

[Tony91]

grazie appena posso provo.

[Tony91]

con quella soluzione posso far apparire anche solo una parte di quello che voglio in un memo??

[cyberlaundry]

Certamente, basta conoscere l'html