Wobsah

# Dialogowy předźěłowak wutworić

Nimo připokazowanja makrow podawkam abo wutworjenja podawkowych posłuchakow, móžeće dialogowe posłuchaki wužiwać, kotrychž princip je, klučowe słowa abo metody UNO definować, kotrež so podawkam přirjaduja, kotrež so maja wobkedźbować. Podawkowy posłuchak je zamołwity za wuwjedźenje metodow z pomocu protokola vnd.sun.star.UNO:<method_name>. Na rozdźěl wot posłuchakow, kotrež dyrbja wšě podpěrane metody definować, samo hdyž so njewužiwaja, dialogowe posłuchaki jenož dwě metodźe hromadźe z wotpohladanymi wodźenskimi hokowymi skriptami trjebaja.

Lěpšiny tutoho přistupa su:

- Pakuje kod, kotryž wot podawka wodźene makra předźěłuje,

- dźěli podawki wot makrowych mjenow, štož wothladowanje abo aktualizacije wosnadnja, předewšěm, hdyž so makra abo module přesuwaja.

Tutón mechanizm so tu za rěči Basic a Python z pomocu importowanej kopiju dialoga Access2Base dlgTrace zwobraznjuje. Wobchadźenje z wuwzaćemi a lokalizacija so přehladnosće dla wuwostajetej.

## Dialogowe metody připokazać

Eksportujće dialog Access2Base dlgTrace a importujće jón do nałoženskeje biblioteki MyLib.

Wužiwajće we wobłuku kajkosćow wodźenskich elementow dialogoweho editora rajtark Podawki, zo byšće makrowe připokazanja z komponentowymi připokazanjemi wuměnił a zapodajće wotpohladane metodowe mjena:

- Nastajće metodowe mjeno komponenty dialogoweho tłóčatka Dump to file na _dump2File

- Na přeće móžeće metodowe mjena podawkowych komponentow stłóčeneje tasty txtTracelog a stłóčeneje tasty myški jako _openHelp definować

- Definujće na přeće tłóčatko W porjadku, kotrež metodoweho mjena fokusoweje podawkoweje komponenty jako onOkHasfocus dóstawa

Podawki, kotrymž akcije su připokazane, měli protokol vnd.sun.star.UNO: naspomnić.

## Předźěłowak wutworić

Metoda createDialogWithHandler słužby com.sun.star.awt.DialogProvider2 so wužiwa, zo by dialog a jeho předźěłowak postajiła. Předźěłowak je zamołwity za implementowanje tykački com.sun.star.awt.XDialogEventHandler.

Wšě metodowe mjena komponenty dyrbja so eksplicitnje deklarować, hdyž so dialogowy předźěłowak wužiwa.

### Z Python

W tutym přikładźe je dialog na ličaku.

          # -*- coding: utf-8 -*-
          from __future__ import unicode_literals

          import uno, unohelper
          from com.sun.star.awt import XDialogEventHandler

          _DLG_PROVIDER = "com.sun.star.awt.DialogProvider2"

          class Console(unohelper.Base, XDialogEventHandler):
              """ Access2Base Console Handler """
              ''' adaptowany wot « Créer un dialogue avec gestionnaire d'événements » wot JM Zambon
              https://wiki.openoffice.org/wiki/FR/Documentation/Python/Creating_Dialog_with_Handler '''
              def show(self):
                  dialog = self.getDialog("MyLib.dlgTrace", embedded=True)
                  dialog.Title = "Konsole"
                  dialog.execute()

              def callHandlerMethod(self, dialog, event, method):
                  if method == '_dump2File':
                      event.Source.setLabel("dump requested")
                      scr = getBasicScript(script="_DumpToFile", module="Trace",
                          library='Access2Base')
                      scr.invoke((event,), (), ())
                  elif method == '_openHelp':
                      _msgbox('Not yet implemented')
                      dialog.endDialog(1)
                  else:
                      return False

              def getSupportedMethodNames(self):
                  return ('_dump2File', '_openHelp')

              def getDialog(self, libr_dlg: str, embedded=False):
                  """ Dialog wot jeho stejnišća wutworić """
                  smgr = XSCRIPTCONTEXT.getComponentContext().ServiceManager
                  if embedded:
                      model = XSCRIPTCONTEXT.getDocument()
                      dp = smgr.createInstanceWithArguments(_DLG_PROVIDER, (model,))
                      location = "?location=document"
                  else:
                      dp = smgr.createInstanceWithContext(_DLG_PROVIDER, ctx)
                      location = "?location=application"
                  dlg = dp.createDialogWithHandler("vnd.sun.star.script:"+libr_dlg+location, self)
                  return dlg

          # def getBasicScript()  # see note

          def _msgbox(prompt='', title=''):
              ''' Hrozny MsgBox '''
              import msgbox
              mb = msgbox.MsgBox(uno.getComponentContext())
              mb.addButton('Howdy')
              mb.show(prompt,0,title)

          def ConsoleHandler():
              Console().show()

          g_exportedScripts = (ConsoleHandler,)

Kaž wočakowane, falowaca metoda onOkHasFocus wuwzaće wumjetuje.

Čitajće stronu wuwołanja Python na LibreOfficeDev Basic za getBasicScript rutinowe wopisanje a za podrobnosće wo rěče přesahowacym skriptowym wuwjedźenju.

### Z LibreOfficeDev Basic

W tutym přikładźe je dialog w dokumenće zasadźeny a móže tež na ličaku być.

          ' <MyLib>.<Handler> module

          Public Sub Console_Show()
              Dim dp as Object ' com.sun.star.awt.DialogProvider2
              Dim dialog As Object ' com.sun.star.awt.XDialog, com.sun.star.awt.XDialogEventHandler
              Dim eventHandler As Object ' com.sun.star.awt.XDialogEventHandler
              dp = CreateUnoService("com.sun.star.awt.DialogProvider2")
              dp.Initialize(Array(ThisComponent)) ' jeli dialog je w dokumenće zasadźeny
              eventHandler = CreateUnoListener("Console_", "com.sun.star.awt.XDialogEventHandler")
              dialog = dp.createDialogWithHandler("vnd.sun.star.script:MyLib.dlgTrace?location=document", eventHandler)
              dialog.Title = "Konsole"
              dialog.execute()
          End Sub ' <Handler>.Console_Show()

          Private Function Console_callHandlerMethod(dialog as Object, _
                  event As com.sun.star.document.DocumentEvent, _
                  method As String) As Boolean
              ''' Intercept dialog events using .UNO protocol '''
              Console_callHandlerMethod = True
              Select Case method
                  Case "_dump2File"
                      event.Source.setLabel("dump requested")
                      With GlobalScope.BasicLibraries
                          If Not .IsLibraryLoaded("Access2Base") Then .LoadLibrary("Access2Base")
                      End With
                      Access2Base.Trace._DumpToFile
                  Case "_openHelp"
                      MsgBox "Not yet implemented",0 , "Howdy"
                      'dialog.endDialog(1) při přez kompjuter podpěranym dialogu
                  Case Else : Console_callHandlerMethod = False
              End Select
          End Function ' <Handler>.Console_callHandlerMethod

          Private Function Console_getSupportedMethodNames()
              Console_getSupportedMethodNames = Array("_dump2File", "_openHelp")
          End Function ' <Handler>.Console _getSupportedMethodNames

          ' adaptowany wot « Créer un dialogue avec gestionnaire d'événements » wot JM Zambon
          ' https://wiki.openoffice.org/wiki/FR/Documentation/Python/Creating_Dialog_with_Handler

Kaž wočakowane, falowaca metoda onOkHasFocus wuwzaće wumjetuje.

Podobne temy

Makra Basic z Python wuwołać

Dialog z Basic wočinić

Funkcija CreateUnoListener

Podawkowe posłuchaki wutworić

Dialog z Python wočinić

Dokumentowe podawki dohladować

programowanske přikłady Python

LibreOfficeDev Pomoc wo skriptach Python

Prošu podpěrajće nas!