掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ＨＴＭＬヘルプを表示するには？ (ID:17664)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ここを参考に http://www.asahi-net.or.jp/~HA3T-NKMR/tips011.htm uses ShellAPI; procedure TForm1.Button1Click(Sender: TObject); var dlg: TForm; res: Word; HBtn: TButton; begin dlg := CreateMessageDialog('Test', mtInformation, [mbYes, mbNo, mbHelp]); HBtn := TButton(dlg.FindComponent('Help')); HBtn.OnClick := ShowHtmlHelp; res := dlg.ShowModal; dlg.Free; end; procedure TForm1.ShowHtmlHelp(Sender: TObject); begin ShellEXecute (Handle, nil, 'help.chm', nil, nil, SW_SHOW); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.