...den Quelltext einer HTML-Seite in einem Memo anzeigen?

Autor: Dev4u.ch
Homepage: http://www.dev4u.ch

Kategorie: Internet / LAN

// You need a TMemo, a TButton und a NMHTTP
// Man braucht ein TMemo, einen TButton und eine TNMHTTP

procedure TForm1.Button1Click(Sender: TObject);
begin
  
NMHTTP1.Get('www.swissdelphicenter.ch');
  memo1.Text := NMHTTP1.Body
end;

 

printed from
www.swissdelphicenter.ch
developers knowledge base