喫茶XRAY [Mr.XRAY掲示板]

[11035] Re5:HTTPSサイトからのダウンロード

返信　削除

2017/4/5 (水) 18:04:02 taka

▼ Mr.XRAYさん
> >[TIdHTTPの使用]
> >http://www.freeml.com/delphi-users/4649/latest
>
> DEKO さんが， Internet Archive からダウンロードのことをレスしています．
> [772] の記事に追加するかどうかは考え中です．
> 私も Internet Archive をみたのですが，Tiburon の文字が入っていたので...
> 個人的には Delphi 6 とかの方には諦めて頂くのいいのかな，と (^^;

772_Indy_HTTPGet

Indy 10.6.2 + Delphi6 personalで
少し変更すると 772_Indy_HTTPGet\04_HTTPGetFileもコンパイル通りましたよ。
https://indy.fulgan.com/indy10.changelog.txt
もhttps取得できました。

{$ifdef VER140}
{$else}
uses HTTPApp;
{$endif}

{$ifdef VER140}
function UnixPathToDosPath(const Path: string): string;
begin
Result := StringReplace(Path, '/', '\', [rfReplaceAll]);
end;
{$endif}

[11037] Re6:HTTPSサイトからのダウンロード

返信　削除

2017/4/5 (水) 18:27:33 Mr.XRAY

▼ takaさ～ん，なんと言うことを (笑)

> Indy 10.6.2 + Delphi6 personalで
> 少し変更すると 772_Indy_HTTPGet\04_HTTPGetFileもコンパイル通りましたよ。
> https://indy.fulgan.com/indy10.changelog.txt
> もhttps取得できました。

そういうことだったんですか !!
参った !!
しかし，まあ，なんという．
どうしようかな ? 記事に追加しよかな ?
結局，このサイトの記事って，皆さんのおかげて生きているのね．
ウッゥッゥッ．

これ，あれなんですよね．Ansi と Unicode ではコードポイント(文字コード)
が違うんですよね．それをね．なるほどね．

[11039] Re7:HTTPSサイトからのダウンロード

返信　削除

2017/4/5 (水) 19:41:18 Mr.XRAY

▼ takaさん

あれですね．私も古い Delphi では諦めて頂くという先入観がありましたね．
最新の Indy のインストールに関しても．
svn を見たら Delphi 4 からあります．
以下にも説明があります．

http://www.indyproject.org/Sockets/Docs/Indy10Installation.en.aspx

記事についてはこれから考えます．

[11040] Re7:HTTPSサイトからのダウンロード

返信　削除

2017/4/5 (水) 23:03:55 taka

▼ Mr.XRAYさん
> ▼ takaさ～ん，なんと言うことを (笑)
>
> > Indy 10.6.2 + Delphi6 personalで
> > 少し変更すると 772_Indy_HTTPGet\04_HTTPGetFileもコンパイル通りましたよ。
> > https://indy.fulgan.com/indy10.changelog.txt
> > もhttps取得できました。
>
> そういうことだったんですか !!
> 参った !!
> しかし，まあ，なんという．
> どうしようかな ?  記事に追加しよかな ?
> 結局，このサイトの記事って，皆さんのおかげて生きているのね．
> ウッゥッゥッ．
>
> これ，あれなんですよね．Ansi と Unicode ではコードポイント(文字コード)
> が違うんですよね．それをね．なるほどね．

Ａｎｓｉ版で

自動変換を利用する場合は、
IdGlobal.GIdDefaultTextEncoding := encOSDefault; // 範囲外の文字は破壊される
IdGlobal.GIdDefaultTextEncoding := encASCII;     // 範囲外の文字は破壊される
IdGlobal.GIdDefaultTextEncoding := encUTF8;
のどれかを1回どこかで代入する (デフォルトは、encASCII)
または
IdHTTP1.Getの第二引数で文字コードを指定する

自動変換させたくない場合は、(画像などのバイナリ、未整形で取得したい場合)
IdHTTP1.Getの第二引数でstreamを渡す
これをさらに文字列に入れたい場合は、setlengthで調整した後にStream.Readで読み込む

Indyころころ仕様を変更しますね。困ったもんだ。

変更点
10.6.2                 , 10.5.8
IdTextEncodingType     , IdAnsiEncodingType
GIdDefaultTextEncoding , GIdDefaultAnsiEncoding

[11041] Re7:HTTPSサイトからのダウンロード

返信　削除

2017/4/6 (木) 12:14:49 taka

Indyで円滑にアクセスするためには、
最低限として User-Agent を変更する必要があります。

● User-Agent
普及型のブラウザじゃないやつは、人間じゃねーということで一部のサイトではじかれます。
// ユーザーエージェント文字列の変更
// https://msdn.microsoft.com/library/hh869301(v=vs.85).aspx
// Indyのデフォルト: Mozilla/3.0 (compatible; Indy Library)

const UserAgent_IE11 = 'Mozilla/5.0 (Windows NT 10.0; WOW64; Trident/7.0; rv:11.0) like Gecko'; // IE11
一括で設定したい場合
  グローバル変数
  // IdHTTPHeaderInfo.pas: IdHTTPHeaderInfo.GIdDefaultUserAgent
  GIdDefaultUserAgent := UserAgent_IE11; // IE11

個別に代入したい場合
  IdHTTP1.Request.UserAgent := UserAgent_IE11; // IE11

Indyではじかれるサイト: github

[11043] Re8:HTTPSサイトからのダウンロード

返信　削除

2017/4/6 (木) 14:05:52 Mr.XRAY

▼ takaさん

> Indyではじかれるサイト: github

あらまっ !
よし !! 記事書くぞ ! 気合いだ !
taka さん，申し訳ないのですが，この一連の内容も利用させて頂きます．
少し前もいろいろ頂きましたが (^^;

[11044] Re9:HTTPSサイトからのダウンロード

返信　削除

2017/4/6 (木) 18:14:05 taka

▼ Mr.XRAYさん
> ▼ takaさん
>
> > Indyではじかれるサイト: github
>
> あらまっ !
> よし !! 記事書くぞ ! 気合いだ !
> taka さん，申し訳ないのですが，この一連の内容も利用させて頂きます．
どうぞどうぞ

Indyのsvnに Delphi Tokyo がないので
バージョンを確認すると
C:\Program Files\Embarcadero\Studio\19.0\source\Indy10\System\IdVers.inc
Indy 10.6.2.5366 とあるので
svn: trunk rev 5366 が使われているということかな？

Delphi6でインストールできたIndyのリビジョン
  svn revision 5358 : "tags/Indy 10.6.2 - Berlin RTM"
  svn revision 5366 : trunk : たぶん Delphi Tokyo ?
  svn revision 5412 : trunk : 本日 2017/04/06の最新(不安定)版

※ trunk は、不安定版なのでコンパイルできないことがあります

コンパイル Fulld6.bat or Fulld_6.bat
〇 tags/Indy 10.5.5 - RS2010 RTM
× tags/Indy 10.5.7 - XE RTM
〇 tags/Indy 10.5.8 - XE2 RTM
× tags/Indy 10.6.0 - XE4 RTM
〇 tags/Indy 10.6.0 - XE5 RTM
〇 tags/Indy 10.6.0 - XE6 RTM
× tags/Indy 10.6.0 - XE7 RTM
〇 tags/Indy 10.6.2 - XE8 RTM
〇 tags/Indy 10.6.2 - Seattle RTM
〇 tags/Indy 10.6.2 - Seattle Upd1
〇 tags/Indy 10.6.2 - Berlin RTM

これにて、Delphi6のIndyインストール確認を終了します。

[11045] Re10:HTTPSサイトからのダウンロード

返信　削除

2017/4/6 (木) 19:15:33 Mr.XRAY

▼ takaさん．どうもです．

> これにて、Delphi6のIndyインストール確認を終了します。

お疲れ様でした．そしてありがとうございました．
当方は，記事の構成をほぼ，頭の中で確定しました．
これから，実際に Delphi 6 にインストールしてスナップショットを作る予定です．

記事内に，本スレッドへのリンクを貼って，参考にして頂く形式にしようと
思っています．

[11049] Re10:HTTPSサイトからのダウンロード

返信　削除

2017/4/7 (金) 18:45:43 taka

svnから入手したIndyのバージョン番号を
10.6.2.0ではなく
10.6.2.リビジョン番号にしたい場合は、

svnでチェックアウトしたフォルダで
StoreRevNum.batを呼び出すと書き換わるようです。
★呼ぶ前に、バグがあるので StoreRevNum.batを開いてSET IndyLib=のパスを書き換えてください。
★tortoisesvnのコマンドSubWCRevが呼ばれるのでtortoisesvnにパスが通っている必要があります

汎用版
SET IndyLib="C:\Development\Projects\Indy\Indy 10\Source\Lib"
↓
SET IndyLib=%~dp0
SET IndyLib="%IndyLib:~0,-1%"

[▼次のスレッド]

INCM/CMT
Cyclamen v3.82