Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
Re: Quelltext von Seite mittels WebBrowser <ERROR>
2. Feb 2010, 17: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
|