掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Webページから文字列を切り出すには？ (ID:28399)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ダウンロードデータ(つまりHTMLファイル) を、一度、ファイルに書き出すから時間がかかるのではないでしょうか。 …回線速度によるような気もしますが… WinInetを使って、 ダウンロードしてメモリ上で文字列を取得するには http://delfusa.main.jp/delfusafloor/opensource/delfusalibrary/20070828160200/WinInetUnit/WinInetUnit.pas.txt このページの一番下を参考にしてください。 また、Indyを使う場合は下記方法で出来たと思います。 //Indyを使う方法 //IndyのVersionは9.0.14 procedure TForm1.Button4Click(Sender: TObject); var SaveFileName, SaveURL: String; fs: TFileStream; begin SaveURL := Edit1.Text; SaveFileName := StringReplace(SaveURL, 'http://', ExtractFilePath(Application.ExeName), [rfIgnorecase]); SaveFileName := StringReplace(SaveFileName, '/', '\', [rfReplaceAll]); ForceDirectories( ExtractFileDir( SaveFileName )); ForceDirectories( ExtractFileDir( SaveFileName )); fs := TFileStream.Create(SaveFileName, fmCreate); try IdHTTP1.Get(SaveURL, fs); finally fs.Free; end; //別の取得方法として //IdHTTP1.Get(SaveURL)とすると //指定URLの内容が文字列で取得できる end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.