質問

これはこの質問。コードからのインストール中にアクセスする必要があるマイインストールパッケージ(.chmヘルプファイル)に含めるファイルがあります。ユーザーのマシンにインストールする必要はありません。だから私は
- インストールパッケージにファイルを含めて、おそらく非圧縮(私は[Files] ... externalフラグでそれをすると思います)。
- 次のようなコード付きのインストール中にファイルを参照してください。

procedure HelpButtonOnClick (Sender: TObject) ;   
var
    ErrorCode : Integer ;

begin
ShellExecAsOriginalUser ('open', ExpandConstant ('{???}') +  '\MyHelp.chm', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end ;
.

では、インストールが開始される前にファイルを参照できます - すなわちファイルがユーザマシンにコピーされる前に?ファイルにPath ExpandConstant ('{???}')を指定する方法上記のハンドラを呼び出すウィザード形式のヘルプボタンがあります。

役に立ちましたか?

解決

これは簡単です。ただ

[Files]
Source: "MyHelp.chm"; Flags: dontcopy

[Code]

procedure HelpButtonOnClick(Sender: TObject);
var
  ErrorCode: integer;
begin
  ExtractTemporaryFile('MyHelp.chm');
  ShellExecAsOriginalUser('', ExpandConstant('{tmp}\MyHelp.chm'), '', '',
    SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;
.

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top