喫茶XRAY [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;