スクリプトを実行するコマンドを作成します。注: Command オブジェクトを XSIApplication.CreateCommand とともに使用すると、カスタム コマンドを使用するためのさらに強力な API を使用できます。
oString = CreateScriptCommand( CommandName, ScriptName, FileName, [ProcName], [Description] ); |
コマンドのユニークな String 識別子を戻します。
パラメータ | タイプ | 説明 |
---|---|---|
CommandName | 文字列 | ユーザ インターフェイス([Customize]メニューのツールバー ボタン)に表示される名前 |
ScriptName | 文字列 | スクリプトでコマンドの実行に使用される名前 |
FileName | 文字列 | スクリプト ファイルのパスおよび名前 |
ProcName | 文字列 |
スクリプト関数またはサブルーチンの名前 デフォルト値:スクリプトはファイルの始めから実行します。 |
Description | 文字列 | コマンドの記述 |
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 |