Panel Browser ActiveX リファレンス
Panel Browser ActiveXには以下のインターフェースが用意されています。
|
ActiveXイベント
|
|
|
PanelEvent
|
Panel BrowserからVBなどの外部アプリケーションに通知するためのイベントです。Panel BrowserのルートのFirePanelEventメソッドをスクリプト中から呼び出すと、VB側でこのイベントが発生します。
|
|
|
|
OpenFileメソッド
Panel Browserのクライアント設定ファイル（xmlファイル）をオープンします。
構文
OpenFile(
FileName
)
パラメータ
戻り値
|
|
型：
|
ブール
|
|
FALSE - 失敗。TRUE - 成功。
|
 例
VBのプログラム中からxmlファイルをオープンするためには以下のようにします。一度xmlファイルを読み込んだ後に、異なるxmlファイルを開くこともできます。
|
VB.NET
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
AxFAPanelBrowser1.OpenFile("C:¥work¥sample01.xml")
End Sub
|
|
|
オープンするxmlファイルの指定は相対パスでも指定可能です。
例）
OpenFile("..\sample01.xml")
|
|
|
CallPanelMethodメソッド
Panel Browser内に定義されているユーザ定義関数を呼び出します。パラメータは必要な数（最大10個まで）だけ指定できます。
構文
CallPanelMethod(
Name,
[, p1] [, p2] [, p3] [, p4] [, p5] [, p6] [, p7] [, p8] [, p9] [, p10]
)
パラメータ
p1 ～ p10
|
|
型：
|
文字
|
|
ユーザ定義関数のパラメータ1 ～ 10
|
戻り値
|
|
型：
|
ユーザ定義関数の戻り値型
|
|
ユーザ定義関数の戻り値
|
例
CallPanelMethodを利用して、Panel Browser内のグローバル変数にアクセスしてみます。
|
Panel Browser
//Browser 側//////////////////////////////////////////
//ルートオブジェクトに下記の関数を定義する
var a, b;
function SetVariable(name, value)
{
switch(name)
{
case "a":
a = value;
break;
case "b":
b = value;
break;
}
}
function GetVariable(name)
{
switch(name)
{
case "a":
return a;
case "b":
return b;
}
}
VB.NET
'値の設定
FAPanelBrowser1.CallPanelMethod "::SetVariable", "a", Text1.Text
'値の取得
Text2.Text = FAPanelBrowser1.CallPanelMethod("::GetVariable", "a")
|
|
|
オープンするxmlファイルの指定は相対パスでも指定可能です。
例）
OpenFile("..\sample01.xml")
|
|
|
PanelEvent イベント
Panel BrowserからVBなどの外部アプリケーションに通知するためのイベントです。Panel BrowserのルートのFirePanelEventメソッドをスクリプト中から呼び出すと、このPanelEventイベントが発生します。
構文
XXX_PanelEvent(
ByVal sender As System.Object,
ByVal e As [ライブラリ名称].[イベントハンドラ名称]
)
※「xxx」は、ActiveXコントロールのオブジェクト名
パラメータ
例
Panel Browser内のボタンが押された時に、ボタンが押されたことをVBにPanelEventイベントとして通知します。そのイベントのパラメータとして、押されたボタンコントロール自身のテキスト文字列をVBに渡します。
VB側ではPanelEventを検知し、パラメータで受け取った文字列をエディットコントロールに表示します。
|
Panel Browser
event OnMouseUp(button)
{
::FirePanelEvent(this.Text, 0, 0);
}
VB.NET
Private Sub AxFAPanelBrowser1_PanelEvent(ByVal sender As System.Object,_
ByVal e As AxFAPANELBROWSERACTIVEXLib6._DFAPanelBrowserEvents_PanelEventEvent) _
Handles AxFAPanelBrowser1.PanelEvent
PanelEventText.Text = e.eventName
End Sub
|
|
|
PanelEventイベント内からのCallPanelMethodの呼び出しには対応しておりません。呼び出した場合、アプリケーションエラーが発生します。
|
|