create a new page, using OOobbs/37 as a template.
Front page
Search
掲示板
Reload
Help
Browse Log
掲示板の使い方
OOo 掲示板３
OOo 掲示板２
OOo 掲示板
掲示板
雑談掲示板
New
List of pages
Recent changes
Backup
簡単ヘルプ
整形ルール
Start:
** [[OOobbs/37]] [#t8743d58]
-''サマリ'': EventListenerの使い方
-''環境'': Calc
-''状態'': 解決
-''投稿者'': [[suou]]
-''投稿日'': 2004-11-01 (月) 06:42:07
*** 質問 [#n5b5682e]
次のような一連のプログラムによって、ファイルを閉じるとき...
Global oListener as object
Sub RegisterListener()
oListener = CreateUnoListener("DL_", "com.sun.star.docum...
ThisComponent.addEventListener(oListener)
End Sub
Sub UnRegisterListener()
ThisComponent.removeEventListener(oListener)
End Sub
Sub DL_notifyEvent(oEvent)
Select Case oEvent.EventName
Case "OnUnLoad"
msgbox "OnUnLoad"
Case "OnPrint"
msgbox "OnPrint"
Case "OnSaveDone"
msgbox "OnSaveDone"
End Select
End Sub
Sub DL_disposing(oEvent)
'Do Nothing
End Sub
*** 回答 [#le9e902d]
-やっと分かりました。
うまくいったコードを示します。問題点は addEventListener ...
Global oListener as object
Sub RegisterListener()
oListener = CreateUnoListener("DL_", "com.sun.star.docu...
ThisComponent.com_sun_star_document_XEventBroadcaster_a...
End Sub
Sub UnRegisterListener()
ThisComponent.com_sun_star_document_XEventBroadcaster_r...
End Sub
Sub Dl_notifyEvent(oEvent)'oListen As Object)
Select Case oEvent.EventName
Case "OnUnLoad"
msgbox "OnUnLoad"
Case "OnPrint"
msgbox "OnPrint"
Case "OnSaveDone"
msgbox "OnSaveDone"
End Select
End Sub
Sub Dl_disposing(oEvent)
'Do Nothing
End Sub
Developer's Guide の 6.2.6 Document Events の部分をみると...
addEventListener と removeEventListener メソッドは他にも...
あとで別ページを作成しようと思います。
-- [[はにゃ?]] &new{2004-11-01 (月) 18:51:05};
-addEventListenerを厳密に指定しないとだめなのですね。これ...
しかし、OnUnloadはうまくいっていないようです。Case文にo...
-75% 解決といわずに，"OnUnLoad" を "OnUnload" にしてみて...
-OOoBasicは大文字小文字を区別しないと思っていたのですが、...
-OOoBasic の If や Case 文などは別です。また，API のメソ...
-OOoBasicはとても懐が深いと思うのですが、それはOOoBasicが...
#comment
End:
** [[OOobbs/37]] [#t8743d58]
-''サマリ'': EventListenerの使い方
-''環境'': Calc
-''状態'': 解決
-''投稿者'': [[suou]]
-''投稿日'': 2004-11-01 (月) 06:42:07
*** 質問 [#n5b5682e]
次のような一連のプログラムによって、ファイルを閉じるとき...
Global oListener as object
Sub RegisterListener()
oListener = CreateUnoListener("DL_", "com.sun.star.docum...
ThisComponent.addEventListener(oListener)
End Sub
Sub UnRegisterListener()
ThisComponent.removeEventListener(oListener)
End Sub
Sub DL_notifyEvent(oEvent)
Select Case oEvent.EventName
Case "OnUnLoad"
msgbox "OnUnLoad"
Case "OnPrint"
msgbox "OnPrint"
Case "OnSaveDone"
msgbox "OnSaveDone"
End Select
End Sub
Sub DL_disposing(oEvent)
'Do Nothing
End Sub
*** 回答 [#le9e902d]
-やっと分かりました。
うまくいったコードを示します。問題点は addEventListener ...
Global oListener as object
Sub RegisterListener()
oListener = CreateUnoListener("DL_", "com.sun.star.docu...
ThisComponent.com_sun_star_document_XEventBroadcaster_a...
End Sub
Sub UnRegisterListener()
ThisComponent.com_sun_star_document_XEventBroadcaster_r...
End Sub
Sub Dl_notifyEvent(oEvent)'oListen As Object)
Select Case oEvent.EventName
Case "OnUnLoad"
msgbox "OnUnLoad"
Case "OnPrint"
msgbox "OnPrint"
Case "OnSaveDone"
msgbox "OnSaveDone"
End Select
End Sub
Sub Dl_disposing(oEvent)
'Do Nothing
End Sub
Developer's Guide の 6.2.6 Document Events の部分をみると...
addEventListener と removeEventListener メソッドは他にも...
あとで別ページを作成しようと思います。
-- [[はにゃ?]] &new{2004-11-01 (月) 18:51:05};
-addEventListenerを厳密に指定しないとだめなのですね。これ...
しかし、OnUnloadはうまくいっていないようです。Case文にo...
-75% 解決といわずに，"OnUnLoad" を "OnUnload" にしてみて...
-OOoBasicは大文字小文字を区別しないと思っていたのですが、...
-OOoBasic の If や Case 文などは別です。また，API のメソ...
-OOoBasicはとても懐が深いと思うのですが、それはOOoBasicが...
#comment
Page:
