Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#8

Re: Quelltext von Seite mittels WebBrowser <ERROR>

  Alt 2. Feb 2010, 16:46
So sollte es eigentlich funktionieren:

Delphi-Quellcode:
implementation
uses idhttp;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  MyIdHTTP: TIdHTTP;
  HTMLCode: string;
begin
  MyIdHTTP := TIdHTTP.Create(form1);
try
  HTMLCode := MyIdHTTP.Get('http:................');
finally
  FreeAndNil(MyIdHTTP);
end;
  Memo1.Text:=HTMLCode;
end;
Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat