カスタマイズ
スクリプトを実行するコマンドを作成します。 注: Command オブジェクトを XSIApplication.CreateCommand とともに使用すると、カスタム コマンドを使用するためのさらに強力な API を使用できます。
oString = CreateScriptCommand( CommandName, ScriptName, FileName, [ProcName], [Description] ); |
コマンドのユニークな文字列識別子を戻します。
| パラメータ | タイプ | 詳細 |
|---|---|---|
| CommandName | 文字列 | ユーザ インターフェイス([Customize]メニューのツールバー ボタン)に表示される名前 |
| ScriptName | 文字列 | スクリプトでコマンドの実行に使用される名前 |
| FileName | 文字列 | スクリプト ファイルのパスおよび名前 |
| ProcName | 文字列 | スクリプト関数またはサブルーチンの名前
デフォルト値：スクリプトはファイルの始めから実行します。 |
| 詳細 | 文字列 | コマンドの記述 |
sub Install()
dim file, toolbar, command, path
path = Application.InstallationPath( siUserPath )
file = path & "\Data\Scripts\myUtils.vbs"
'Create Toolbar
toolbar = CreateToolbar("Utilities")
'Create Commands
command = CreateScriptCommand( "Simplify It" ,_
"makeSimple" ,_
file ,_
"MakeSimple",_
"Makes life easier." )
'Add button to toolbar.
CreateToolbarButton toolbar, command
end sub
|