掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
webページをStringListに読み込むには？ (ID：26849)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
StringListというか、Stringに取り込む方法です。 IndyのIdHTTPで簡単に出来たような気がするのですが どうもProxyの関係なのかうまく動かなかったので WinInetを使ってみました。 一度メモリストリームに取り込んでから 文字列として取得しています。 D2007、WinXPで動作確認しました。 function GetStringFromStream(Stream: TStream): String; begin SetLength(Result, Stream.Size); Stream.Position := 0; Stream.ReadBuffer(Result[1], Stream.Size); end; procedure TForm1.Button5Click(Sender: TObject); var SaveFileName, SaveURL: String; ms: TMemoryStream; begin SaveURL := Edit1.Text; ms := TMemoryStream.Create; WinInet_URLDownloadToStream1(SaveURL, ms); ShowMessage(GetStringFromStream(ms)); ms.Free; end; WinInet_URLDownloadToStream1はこちらに乗せておきます。 http://delfusa.main.jp/delfusalibrary/20060527212010/WinInetUnit/WinInetUnit.pas WinInet_URLDownloadToStream2関数でも同様に動作するでしょう。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.