| [11564] Re2:488_ウェブブラウザを起動して終了を検出について | 返信 削除 |
| 2017/11/17 (金) 15:22:29 Mr.XRAY |
|
> これは文字通り引数の型が違いますね． > Shell32_TLB を Delphi 10.2 Tokyo で作成するとどうかなるかですが． > ちょっと時間をください． Delphi 10.2 Tokyo ではこの引数が var 渡しになっています． このような場合は以下のように変更して使用するしかありません． このようなことは Windows API 関係の関数類を使用する時にたまにあります． Shell32_TLB を Delphi 10.2 Tokyo で作成し直すと， もしかしたら修正が不要かも知れません． procedure TFileSearchBand.SetSearchParameters(var pbstrSearchID: WideString; bNavToResults: WordBool); var LEmpParam : OleVariant; begin // DefaultInterface.SetSearchParameters(pbstrSearchID, bNavToResults, EmptyParam, EmptyParam); DefaultInterface.SetSearchParameters(pbstrSearchID, bNavToResults, LEmpParam, LEmpParam); end;  |