文字列変換するには？

ポッツィー 2005-10-18 19:53:46 No: 18150

ＴＮＭＨＴＰを使って、Ｂｏｄｙに入っているテキストコードを
解析しようとしたのですが、
使用されている文字列が、シフトＪＩＳではないようです。
この文字をシフトＪＩＳ（Ｓｔｒｉｎｇ）にして
変換したいのですがどうすればよいのでしょうか

コード次第 2005-10-18 20:07:37 No: 18151

「シフトＪＩＳではないようです」とだけ書かれても... 。←(コマル)
何のコードかによって変換に必要なユニット、関数も変わるということ。

ポッツィー 2005-10-18 22:34:30 No: 18152

すみません。
何のコードかはわかりませんが、
「C#のイベント」と表示されているらしき部分が
たぶん、「>、ウ、ホ・レ」となってます。

ポッツィー 2005-10-18 22:42:21 No: 18153

すみません。
他にも方法があるかもしれませんので、
目的をはっきりさせておきます。

NMHTTPを使ってHTMLソースを取得します。
取得したソース（NMTHHP.Body）で画面に表示されている
テキスト文字だけを取得しようとしています。

サイトでURLごと http://〜/p01, ・・・・ http://〜/p99
とあった場合に p01からp99まで99回ループをまわして
表示されている文章だけを取って、文章のみファイルに出力したい
というのが目的です。

また、Dlephi6,Delphi7を使用できる環境にあります。
現在はNMHTTPがDelphi7にないので、Delphi6で作成しています。

WebBrowser も確認したのですが、
表示されている文章を取得する方法がわかりませんでした。

ぶらうざにおまかせ 2005-10-19 17:57:54 No: 18154

ブラウザの文字コード判別もあてにならない場合があるけど、
Memo1.Text := OleVariant(WebBrowser1.Document).Body.CreateTextRange.Text;