Περιεχόμενα

# Δημιουργία χειριστή διαλόγου

Πέρα από την εκχώρηση μακροεντολών σε συμβάντα ή την δημιουργία ακροατών συμβάντων, κάποιος μπορεί να χρησιμοποιήσει χειριστές διαλόγου, των οποίων η αρχή είναι ο καθορισμός λέξεων-κλειδιών UNO, ή μεθόδων, που απεικονίζονται σε συμβάντα προς παρακολούθηση. Ο χειριστής συμβάντων είναι υπεύθυνος για την εκτέλεση μεθόδων χρησιμοποιώντας το πρωτόκολλο vnd.sun.star.UNO:<method_name>. Αντίθετα προς τους ακροατές που απαιτούν τον καθορισμό όλων των υποστηριζόμενων μεθόδων, ακόμα και εάν δεν χρησιμοποιούνται, οι χειριστές διαλόγων απαιτούν μόνο δύο μεθόδους στην κορυφή των σκοπούμενων δεσμών ενεργειών αγκίστρου στοιχείου ελέγχου.

Τα πλεονεκτήματα αυτής της προσέγγισης είναι:

- Συσκευάζει τον κώδικα που χειρίζεται μακροεντολές βάσει συμβάντων,

- αποσυσχετίζει συμβάντα από ονόματα μακροεντολών που διευκολύνει τη διατήρηση ή τις ενημερώσεις, ειδικότερα κατά τη μετακίνηση μακροεντολών ή αρθρωμάτων.

Αυτός ο μηχανισμός απεικονίζεται εδώ με τις γλώσσες Basic και Pythonχρησιμοποιώντας εισαγόμενο αντίγραφο του διαλόγου Access2Base dlgTrace. Ο χειρισμός εξαιρέσεων και η τοπικοποίηση παραλείπονται για σαφήνεια.

## Εκχώρηση μεθόδων διαλόγου

Διάλογος εξαγωγή του Access2Base dlgTrace και εισαγωγής του στη βιβλιοθήκη εφαρμογής MyLib.

Στο παράθυρο ιδιότητες στοιχείων ελέγχου του Επεξεργαστή διαλόγου, χρησιμοποιήστε την καρτέλα συμβάντα για να αντικαταστήσετε τις αναθέσεις μακροεντολών από αναθέσεις συστατικών και πληκτρολογήστε τα ονόματα στις προοριζόμενες μεθόδους:

- Ορίστε το πλήκτρο διαλόγου Dump to file ονόματος μεθόδου συστατικού στο _dump2File

- Προαιρετικά ορίστε τα ονόματα μεθόδων συστατικών συμβάντων πατημένου πλήκτρου και πατημένου πλήκτρου ποντικιού txtTracelog ως _openHelp

- Προαιρετικά ορίστε το όνομα μεθόδου συστατικού συμβάντος που δέχεται την εστίαση του πλήκτρου Ok ως onOkHasfocus

Οι ενέργειες που ανατέθηκαν σε συμβάντα πρέπει να αναφέρονται στο πρωτόκολλο vnd.sun.star.UNO: .

## Δημιουργία του χειριστή

Η μέθοδος createDialogWithHandler της υπηρεσίας com.sun.star.awt.DialogProvider2 χρησιμοποιείται για να ορίσει τον διάλογο και τον χειριστή του. Ο χειριστής είναι υπεύθυνος για την υλοποίηση της διεπαφής com.sun.star.awt.XDialogEventHandler.

Όλα τα ονόματα μεθόδων συστατικών πρέπει να δηλώνονται ρητά κατά τη χρήση χειριστή διαλόγου.

### Με Python

Σε αυτό το παράδειγμα ο διάλογος βρίσκεται στον υπολογιστή.

          # -*- 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 """
              ''' προσαρμοσμένο από « Créer un dialogue avec gestionnaire d'événements » by 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):
                  """ Δημιουργία διαλόγου από τη θέση του """
                  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=''):
              ''' Άσχημο MsgBox '''
              import msgbox
              mb = msgbox.MsgBox(uno.getComponentContext())
              mb.addButton('Howdy')
              mb.show(prompt,0,title)

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

          g_exportedScripts = (ConsoleHandler,)

Όπως αναμενόταν, η μέθοδος που λείπει onOkHasFocus δημιουργεί εξαίρεση.

Δείτε τη σελίδα Κλήσεις Python σε Basic του LibreOffice για την περιγραφή ρουτίνας getBasicScript και για λεπτομέρειες για διαγλωσσική εκτέλεση δέσμης ενεργειών.

### Με Basic του LibreOffice

Σε αυτό το παράδειγμα ο διάλογος ενσωματώνεται σε έγγραφο και μπορεί επίσης να τοποθετηθεί στον υπολογιστή.

          ' <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)) ' εάν είναι ο διάλογος doc-embedded
              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) εάν είναι διάλογος με βάση τον υπολογιστή
                  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

          ' προσαρμοσμένο από « Créer un dialogue avec gestionnaire d'événements » του JM Zambon
          ' https://wiki.openoffice.org/wiki/FR/Documentation/Python/Creating_Dialog_with_Handler

Όπως αναμενόταν, η μέθοδος που λείπει onOkHasFocus δημιουργεί εξαίρεση.

Σχετικά θέματα

Κλήση μακροεντολών Basic από Python

Άνοιγμα διαλόγου με Basic

Συνάρτηση CreateUnoListener

Δημιουργία ακροατών συμβάντος

Άνοιγμα διαλόγου με Python

Ακρόαση συμβάντων εγγράφου

παραδείγματα προγραμματισμού Python

Βοήθεια δεσμών ενεργειών Python του LibreOffice