Περιεχόμενα

# SFDialogs. Υπηρεσία Διάλογος

Η υπηρεσία Dialog συμβάλλει στη διαχείριση των διαλόγων που δημιουργούνται με το Επεξεργαστής διαλόγου της Basic, ή των διαλόγων που δημιουργούνται άμεσα . Κάθε παρουσία της τρέχουσας κλάσης αντιπροσωπεύει ένα ενιαίο πλαίσιο διαλόγου που εμφανίζεται στον χρήστη.

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

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

Στη μη αναγκαστική κατάσταση, το πλαίσιο διαλόγου "επιπλέει" στην επιφάνεια εργασίας του χρήστη και η εκτέλεση της διαδικασίας μακροεντολής συνεχίζεται κανονικά. Ένα μη αναγκαστικό παράθυρο διαλόγου κλείνει όταν τερματίζεται με τη μέθοδο Terminate(), ή όταν τελειώσει η συνεδρία του LibreOffice. Το πλήκτρο κλεισίματος παραθύρου είναι ανενεργό σε μη αναγκαστικούς διαλόγους.

Ένα πλαίσιο διαλόγου εξαφανίζεται από τη μνήμη μετά τον ρητό τερματισμό του.

Η υπηρεσία SFDialogs.Dialog σχετίζεται στενά με την υπηρεσία SFDialogs.DialogControl.

## Κλήση και χρήση της υπηρεσίας

Πριν τη χρήση της υπηρεσίας Dialog, πρέπει να φορτωθεί ή να εισαχθεί η βιβλιοθήκη ScriptForge:

• Οι μακροεντολές Basic απαιτούν τη φόρτωση της βιβλιοθήκης ScriptForge χρησιμοποιώντας την ακόλουθη πρόταση:
GlobalScope.BasicLibraries.loadLibrary("ScriptForge")
• Τα σενάρια Python απαιτούν εισαγωγή από την ενότητα scriptforge:
από το scriptforge import CreateScriptService

Η υπηρεσία Dialog καλείται μέσω της μεθόδου CreateScriptService. Απαιτεί τρία συμπληρωματικά ορίσματα θέσης για τον καθορισμό του πλαισίου διαλόγου για ενεργοποίηση:

Container (περιέκτης): "GlobalScope" για προεγκατεστημένες βιβλιοθήκες ή όνομα παραθύρου όπως ορίζεται από την υπηρεσία ScriptForge.UI. Η προεπιλεγμένη τιμή κενής συμβολοσειράς "" αντιπροσωπεύει το τρέχον έγγραφο.

Library (Βιβλιοθήκη): Το όνομα με διάκριση πεζών-κεφαλαίων μιας βιβλιοθήκης που περιέχεται στον περιέκτη. Η προεπιλεγμένη τιμή είναι "Standard" (Τυπική).

DialogName (Όνομα διαλόγου): Μια συμβολοσειρά με διάκριση πεζών-κεφαλαίων που προσδιορίζει το παράθυρο διαλόγου.

Τα παρακάτω παραδείγματα σε Basic και Python εμφανίζουν το παράθυρο διαλόγου dlgConsole που ανήκει στην κοινόχρηστη βιβλιοθήκη ScriptForge:

          Dim oDlg As Object, lButton As Long
          Dim Container As String, Library As String, DialogName As String
          Set oDlg = CreateScriptService("SFDialogs.Dialog", "GlobalScope", "ScriptForge", "dlgConsole")
          '... η αρχικοποίηση των στοιχείων ελέγχου πηγαίνει εδώ...
          lButton = oDlg.Execute()
          'Προεπιλεγμένη κατάσταση = Modal (Αναγκαστική)
          If lButton = oDlg.OKBUTTON Then
          '... Στοιχεία ελέγχου διεργασίας και κάντε ό,τι χρειάζεται εδώ
          End If
          oDlg.Terminate()

Ή χρησιμοποιώντας Python:

        dlg = CreateScriptService('SFDialogs.Dialog', 'GlobalScope', 'ScriptForge', 'dlgConsole')
        # ... η αρχικοποίηση των στοιχείων ελέγχου πηγαίνει εδώ...
        rc = dlg.Execute()
        # Η προεπιλεγμένη κατάσταση είναι Modal (αναγκαστική)
        if rc == dlg.OKBUTTON:
            # ... Επεξεργαστείτε τα στοιχεία ελέγχου και κάντε ό,τι χρειάζεται εδώ
        dlg.Terminate()

Χρησιμοποιήστε τη συμβολοσειρά "GlobalScope" ως το όρισμα container όταν το παράθυρο διαλόγου αποθηκεύεται είτε στο Οι μακροεντολές και οι διάλογοι μου είτε στο Μακροεντολές και διάλογοι εφαρμογών.

Η υπηρεσία διαλόγου προσφέρει μεθόδους που δημιουργούν νέα στοιχεία ελέγχου δυναμικά σε έναν υπάρχοντα διάλογο προκαθορισμένο με το Επεξεργαστής διαλόγου. Ένα παράθυρο διαλόγου προετοιμάζεται με στοιχεία ελέγχου στον Επεξεργαστή διαλόγου και νέα στοιχεία ελέγχου μπορούν να προστεθούν κατά την εκτέλεση πριν ή μετά την πρόταση διαλόγου Execute().

Η υπηρεσία Dialog μπορεί επίσης να κληθεί - μέσω της μεθόδου CreateScriptService - κατά την άμεση δημιουργία διαλόγων. Απαιτεί δύο συμπληρωματικά ορίσματα θέσης μετά το όνομα της ad-hoc υπηρεσίας "NewDialog":

DialogName: Μια συμβολοσειρά με διάκριση πεζών-κεφαλαίων που προσδιορίζει το παράθυρο διαλόγου.

Place: Η θέση του παραθύρου του διαλόγου είναι είτε :

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- αντικείμενο a com.sun.star.awt.Rectangle [X, Y, Width, Height]

Όλα τα στοιχεία εκφράζονται σε Μονάδες AppFont units.

        Sub newDialog()
            Dim oDlg As Object
           oDlg = CreateScriptService("NewDialog", "myDialog1", Array(100,200, 40, 110))
           ' ...
        End Sub

Ή χρησιμοποιώντας Python:

        def newDialog():
           dlg = CreateScriptService('NewDialog', 'myDialog1', (100,200, 40, 110))
           # ... Επεξεργαστείτε τα στοιχεία ελέγχου και κάντε ό,τι χρειάζεται

Όλες οι ιδιότητες και οι μέθοδοι που ισχύουν σε προκαθορισμένους διαλόγους είναι διαθέσιμες για τέτοιους νέους διαλόγους. Συγκεκριμένα, η σειρά μεθόδων CreateXXX() για την προσθήκη νέων στοιχείων ελέγχου διαλόγου.

## Ανάκτηση της παρουσίας διαλόγου που ενεργοποίησε ένα συμβάν διαλόγου

Μια παρουσία της υπηρεσίας Dialog μπορεί να ανακτηθεί μέσω της υπηρεσίας SFDialogs.DialogEvent, με την προϋπόθεση ότι ο διάλογος ξεκίνησε με την υπηρεσία Dialog. Στο παρακάτω παράδειγμα, το oDlg περιέχει την παρουσία Dialog που ενεργοποίησε το συμβάν διαλόγου.

        Sub aDialogEventHander(ByRef poEvent As Object)
            Dim oDlg As Object
            Set oDlg = CreateScriptService("SFDialogs.DialogEvent", poEvent)
            ' ...
        End Sub

Ή χρησιμοποιώντας Python:

        def control_event_handler(event: uno):
            dlg = CreateScriptService("SFDialogs.DialogEvent", event)
            # ...

Λάβετε υπόψη ότι στα προηγούμενα παραδείγματα, το πρόθεμα "SFDialogs." μπορεί να παραλειφθεί όταν κριθεί κατάλληλο.

### Χειρισμός εξαιρέσεων σε χειριστές συμβάντων

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

        Sub OnMouseButtonPressed(ByRef oEvent As Object)
        On Local Error GoTo Catch
            Dim oDialog As Object
            oDialog = CreateScriptService("DialogEvent", oEvent)
            ' Επεξεργασία του συμβάντος
            Exit Sub
        Catch:
            MsgBox SF_Exception.Description
            SF_Exception.Clear
        End Sub

Καλέστε το SF_Exception.Clear, εάν δεν θέλετε να διαδοθεί το σφάλμα μετά το τέλος της εκτέλεσης του διαλόγου.

Στην Python χρησιμοποιήστε εγγενή μπλοκ try/except για χειρισμό εξαιρέσεων όπως φαίνεται παρακάτω:

        def on_mouse_button_pressed(event=None):
            try:
                dlg = CreateScriptService("DialogEvent", event)
                # Επεξεργασία του συμβάντος
            except Exception as e:
                # Το αντικείμενο "bas" είναι μια παρουσία της υπηρεσίας Basic
                bas.MsgBox(str(e))

## Ιδιότητες

Όνομα | Μόνο για ανάγνωση | Τύπος | Περιγραφή
--- | --- | --- | ---
OKBUTTON | Ναι | Integer | Value (Τιμή) = 1. Πατήθηκε πλήκτρο OK (Εντάξει).
CANCELBUTTON | Ναι | Integer | Value (Τιμή) = 0. Πατήθηκε πλήκτρο Ακύρωσης.
Caption | Όχι | String | Καθορίστε τον τίτλο του διαλόγου.
Height | Όχι | Long | Καθορίστε το ύψος του πλαισίου διαλόγου.
Modal | Ναι | Boolean | Καθορίζει εάν το πλαίσιο διαλόγου εκτελείται αυτήν τη στιγμή σε λειτουργία modal (αναγκαστική).
Name | Ναι | String | Το όνομα του διαλόγου
Page | Όχι | Integer | Ένα παράθυρο διαλόγου μπορεί να έχει πολλές σελίδες που μπορεί να διασχίσει ο χρήστης βήμα προς βήμα. Η ιδιότητα Page (Σελίδα) του αντικειμένου διαλόγου ορίζει ποια σελίδα του διαλόγου είναι ενεργή.
Visible | Όχι | Boolean | Καθορίστε εάν το πλαίσιο διαλόγου είναι ορατό στην επιφάνεια εργασίας. Από προεπιλογή δεν είναι ορατό μέχρι να εκτελεστεί η μέθοδος Execute() και να είναι ορατή στη συνέχεια.
XDialogModel | Ναι | UNO object | Το αντικείμενο UNO που αντιπροσωπεύει το μοντέλο διαλόγου. Ανατρέξτε στο XControlModel και UnoControlDialogModel στην τεκμηρίωση της διασύνδεσης προγραμματισμού εφαρμογών (API) για λεπτομερείς πληροφορίες.
XDialogView | Ναι | UNO object | Το αντικείμενο UNO που αντιπροσωπεύει την προβολή διαλόγου. Ανατρέξτε στα XControl και UnoControlDialog στην τεκμηρίωση της διασύνδεσης προγραμματισμού εφαρμογών (API) για λεπτομερείς πληροφορίες.
Width | Όχι | Long | Καθορίστε το πλάτος του πλαισίου διαλόγου.

## Ιδιότητες συμβάντος

Οι ιδιότητες On… επιστρέφουν μια συμβολοσειρά URI με αναφορά στο σενάριο που ενεργοποιήθηκε από το συμβάν. Οι ιδιότητες On… μπορούν να οριστούν μέσω προγραμματισμού.
Διαβάστε τις προδιαγραφές του στο scripting frameworkURI.

Όνομα | Ανάγνωση/Εγγραφή | Περιγραφή IDE Basic
--- | --- | ---
OnFocusGained | Ναι | Κατά τη λήψη της εστίασης
OnFocusLost | Ναι | Κατά τη απώλεια της εστίασης
OnKeyPressed | Ναι | Με το πλήκτρο πατημένο
OnKeyReleased | Ναι | Με το πλήκτρο απελευθερωμένο
OnMouseDragged | Ναι | Το ποντίκι μετακινήθηκε κατά το πάτημα του πλήκτρου
OnMouseEntered | Ναι | Το ποντίκι εντός
OnMouseExited | Ναι | Το ποντίκι εκτός
OnMouseMoved | Ναι | Το ποντίκι μετακινήθηκε
OnMousePressed | Ναι | Με πατημένο το πλήκτρο του ποντικιού
OnMouseReleased | Ναι | Με απελευθερωμένο το πλήκτρο του ποντικιού

Η εκχώρηση συμβάντων μέσω του IDE της Basic και η εκχώρηση συμβάντων μέσω μακροεντολών είναι αμοιβαία αποκλειόμενες.

Κατάλογος μεθόδων στην υπηρεσία διαλόγου

Activate
Center
Controls
CloneControl
CreateButton
CreateCheckBox
CreateComboBox
CreateCurrencyField
CreateDateField
CreateFileControl
CreateFixedLine

CreateFixedText
CreateFormattedField
CreateGroupBox
CreateHyperlink
CreateImageControl
CreateListBox
CreateNumericField
CreatePatternField
CreateProgressBar
CreateRadioButton
CreateScrollBar

CreateTableControl
CreateTextField
CreateTimeField
CreateTreeControl
EndExecute
Execute
GetTextsFromL10N
Resize
OrderTabs
SetPageManager
Terminate

Η διαστασιολόγηση ενός διαλόγου γίνεται χρησιμοποιώντας Μονάδες Map AppFont. Ένα πρότυπο διαλόγου ή στοιχείου ελέγχου χρησιμοποιεί επίσης μονάδες AppFont. Ενώ οι προβολές τους χρησιμοποιούν pixel.

## Activate

Ρυθμίστε την εστίαση στην τρέχουσα παρουσία του Dialog (Διάλογος). Επιστροφή True εάν η εστίαση ήταν επιτυχής.

Αυτή η μέθοδος καλείται από ένα συμβάν διαλόγου ή ελέγχου, ή όταν εμφανίζεται ένα παράθυρο διαλόγου σε μη αναγκαστική λειτουργία.

### Σύνταξη:

svc.Activate(): bool

### Παράδειγμα:

          Dim oDlg As Object
          Set oDlg = CreateScriptService(,, "myDialog")
          oDlg.Execute()
          ' ...
          oDlg.Activate()

Τα παραδείγματα Python και LibreOffice Basic υποθέτουν και τα δύο ότι το παράθυρο διαλόγου είναι αποθηκευμένο στη βιβλιοθήκη Standard (Τυπική)του τρέχοντος εγγράφου.

         dlg = CreateScriptService(,,'myDialog')
         dlg.Execute()
         # ...
         dlg.Activate()

## Center

Κεντράρει την τρέχουσα παρουσία διαλόγου στη μέση ενός γονικού παραθύρου. Χωρίς ορίσματα, η μέθοδος κεντράρει το παράθυρο διαλόγου στη μέση του τρέχοντος παραθύρου.

Επιστρέφει True όταν είναι επιτυχές.

### Σύνταξη:

svc.Center(opt Parent: obj): bool

### Παράμετροι:

Parent (Γονικό): Ένα προαιρετικό αντικείμενο που μπορεί να είναι είτε…

- ένα αντικείμενο διαλόγου ScriptForge

- ένα αντικείμενο εγγράφου ScriptForge (Calc, Βάση, ...)

### Παράδειγμα:

##### Σε Basic

         Sub TriggerEvent(oEvent As Object)
             Dim oDialog1 As Object, oDialog2 As Object, lExec As Long
             Set oDialog1 = CreateScriptService("DialogEvent", oEvent) ' Το παράθυρο διαλόγου που προκάλεσε το συμβάν
             Set oDialog2 = CreateScriptService("Dialog", ...) ' Άνοιγμα δεύτερου διαλόγου
             oDialog2.Center(oDialog1)
             lExec = oDialog2.Execute()
             Select Case lExec
                 ...
         End Sub

##### Σε Python

         def triggerEvent(event: uno):
           dlg1 = CreateScriptService('DialogEvent.Dialog', συμβάν) # Το παράθυρο διαλόγου που προκάλεσε το συμβάν
           dlg2 = CreateScriptService('Dialog', ...) # Άνοιγμα δεύτερου διαλόγου
           dlg2.Center(dlg1)
           rc = dlg2.Execute()
           if rc is False:
             # ...

## CloneControl

Αντιγράψτε ένα υπάρχον στοιχείο ελέγχου οποιουδήποτε τύπου στο πραγματικό παράθυρο διαλόγου. Το διπλότυπο στοιχείο ελέγχου παραμένει αμετάβλητο και μπορεί να μεταφερθεί.

### Σύνταξη:

svc.CloneControl(SourceName: str, ControlName: str, Left: num, Top: num): svc

### Παράμετροι:

SourceName: Το όνομα του στοιχείου ελέγχου που πρόκειται να αντιγραφεί.

ControlName: Ένα έγκυρο όνομα στοιχείου ελέγχου ως συμβολοσειρά με διάκριση πεζών-κεφαλαίων. Δεν πρέπει να υπάρχει ακόμα.

Left, Top: Οι συντεταγμένες του νέου στοιχείου ελέγχου εκφράζονται σε Μονάδες Map AppFont.

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

          Set myButton2 = oDlg.CloneControl("Button1", "Button2", 30, 30)

##### Σε Python

         dlg = dlg.CloneControl('Button1', 'Button2', 30, 30)

## Controls

Επιστροφή είτε:

- του καταλόγου με τα στοιχεία ελέγχου που περιέχονται στο παράθυρο διαλόγου

- μια παρουσίας κλάσης DialogControl με βάση το όνομά της

### Σύνταξη:

svc.Controls(): str[0..*]

svc.Controls(controlname: str): svc

### Παράμετροι:

ControlName (Όνομα ελέγχου): Ένα έγκυρο όνομα ελέγχου ως συμβολοσειρά με διάκριση πεζών-κεφαλαίων. Εάν δεν υπάρχει, ο κατάλογος ονομάτων ελέγχου επιστρέφεται ως πίνακας μηδενικής βάσης.

### Παράδειγμα:

          Dim myDialog As Object, myList As Variant, myControl As Object
          Set myDialog = CreateScriptService("SFDialogs.Dialog", , "Standard", "Dialog1")
          myList = myDialog.Controls()
          Set myControl = myDialog.Controls("myTextBox")

         dlg = CreateScriptService('SFDialogs.Dialog','', 'Standard', 'Dialog1')
         ctrls = dlg.Controls()
         ctrl = dlg.Controls('myTextBox')

## CreateButton

Create a new control of type Button in the current dialog.

### Σύνταξη:

svc.CreateButton(ControlName: str, Place: any, Toggle: bool = False, Push: str = ""): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Toggle: όταν True δημιουργείται ένα πλήκτρο εναλλαγής. Προεπιλογή = False

Push: "OK", "CANCEL" ή "" (προεπιλογή)

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myButton = oDlg.CreateButton("Button1", Array(20, 20, 60, 15))

##### Σε Python

         myButton = dlg.CreateButton('Button1', (20, 20, 60, 15))

## CreateCheckBox

Create a new control of type CheckBox in the current dialog.

### Σύνταξη:

svc.CreateCheckBox(ControlName: str, Place: any, Multiline: bool = False): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

MultiLine: Όταν είναι True (προεπιλογή = False), η λεζάντα μπορεί να εμφανίζεται σε περισσότερες από μία γραμμές.

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myCheckBox = oDlg.CreateCheckBox("CheckBox1", Array(20, 20, 60, 15), MultiLine := True)

##### Σε Python

         myCheckBox = dlg.CreateCheckBox('CheckBox1', (20, 20, 60, 15), MultiLine = True)

## CreateComboBox

Create a new control of type ComboBox in the current dialog.

### Σύνταξη:

svc.CreateComboBox(ControlName: str, Place: any, Border: str = "3D", DropDown: bool = True, LineCount: num = 5): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

DropDown: Όταν είναι True (προεπιλογή), εμφανίζεται ένα αναπτυσσόμενο πλήκτρο

LineCount: Καθορίζει τον μέγιστο αριθμό γραμμών που εμφανίζεται στο αναπτυσσόμενο μενού (προεπιλογή = 5)

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myComboBox = oDlg.CreateComboBox("ComboBox1", Array(20, 20, 60, 15), Dropdown := True)

##### Σε Python

         myComboBox = dlg.CreateComboBox('ComboBox1', (20, 20, 60, 15), Dropdown = True)

## CreateCurrencyField

Create a new control of type CurrencyField in the current dialog.

### Σύνταξη:

svc.CreateCurrencyField(ControlName: str, Place: any, Border ="3D", SpinButton: bool = False, MinValue: num = -1000000, MaxValue: num = +1000000, Increment: num = 1, Accuracy: num = 2): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

SpinButton: όταν είναι True (προεπιλογή = False), υπάρχει ένα πλήκτρο περιστροφής

MinValue: η μικρότερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = -1000000

MaxValue: η μεγαλύτερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = +1000000

Increment: το βήμα όταν πατιέται το πλήκτρο περιστροφής. Προεπιλογή = 1

Accuracy: καθορίζει τη δεκαδική ακρίβεια. Προεπιλογή = 2 δεκαδικά ψηφία

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myCurrencyField = oDlg.CreateCurrencyField("CurrencyField1", Array(20, 20, 60, 15), SpinButton := True)

##### Σε Python

         myCurrencyField = dlg.CreateCurrencyField('CurrencyField1', (20, 20, 60, 15), SpinButton = True)

## CreateDateField

Create a new control of type DateField in the current dialog.

### Σύνταξη:

svc.CreateDateField(ControlName: str, Place: any, Border: str = "3D", DropDown: bool = False, opt MinDate: datetime, opt MaxDate: datetime): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

DropDown: όταν είναι True (προεπιλογή = False), εμφανίζεται ένα αναπτυσσόμενο πλήκτρο

MinDate: η μικρότερη ημερομηνία που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 1900-01-01

MaxDate: η μεγαλύτερη ημερομηνία που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 2200-12-31

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myDateField = oDlg.CreateDateField("DateField1", Array(20, 20, 60, 15), Dropdown := True)

##### Σε Python

         myDateField = dlg.CreateDateField('DateField1', (20, 20, 60, 15), Dropdown = True)

## CreateFileControl

Create a new control of type FileControl in the current dialog.

### Σύνταξη:

svc.CreateFileControl(ControlName: str, Place: any, Border: str = "3D"): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myFileControl = oDlg.CreateFileControl("FileControl1", Array(20, 20, 60, 15))

##### Σε Python

         myFileControl = dlg.CreateFileControl('FileControl1', (20, 20, 60, 15))

## CreateFixedLine

Create a new control of type FixedLine in the current dialog.

### Σύνταξη:

svc.CreateFixedLine(ControlName: str, Place: any, Orientation: str): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Orientation: "H[orizontal]" or "V[ertical]".

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myFixedLine = oDlg.CreateFixedLine("FixedLine1", Array(20, 20, 60, 15), Orientation := "vertical")

##### Σε Python

         myFixedLine = dlg.CreateFixedLine('FixedLine1', (20, 20, 60, 15), Orientation = 'vertical')

## CreateFixedText

Create a new control of type FixedText in the current dialog.

### Σύνταξη:

svc.CreateFixedText(ControlName: str, Place: any, Border: str = "3D", MultiLine: bool = False, Align: str = "LEFT", VerticalAlign: str = "TOP"): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "NONE" (default) or "FLAT" or "3D"

Multiline: Όταν είναι True (προεπιλογή = False), η λεζάντα μπορεί να εμφανίζεται σε περισσότερες από μία γραμμές

Align: horizontal alignment, "LEFT" (default) or "CENTER" or "RIGHT"

VerticalAlign: vertical alignment, "TOP" (default) or "MIDDLE" or "BOTTOM"

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myFixedText = oDlg.CreateFixedText("FixedText1", Array(20, 20, 60, 15), MultiLine := True)

##### Σε Python

         myFixedText = dlg.CreateFixedText('FixedText1', (20, 20, 60, 15), MultiLine = True)

## CreateFormattedField

Create a new control of type FormattedField in the current dialog.

### Σύνταξη:

svc.CreateFormattedField(ControlName: str, Place: any, Border: str = "3D", SpinButton: bool = False, MinValue: num = -1000000, MaxValue: num = +1000000): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

SpinButton: όταν True (προεπιλογή = False), υπάρχει ένα κουμπί περιστροφής

MinValue: η μικρότερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = -1000000

MaxValue: η μεγαλύτερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = +1000000

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myFormattedField = oDlg.CreateFormattedField("FormattedField1", Array(20, 20, 60, 15), SpinButton := True)

##### Σε Python

         myFormattedField = dlg.CreateFormattedField('FormattedField1', (20, 20, 60, 15), SpinButton = True)

## CreateGroupBox

Create a new control of type GroupBox in the current dialog.

### Σύνταξη:

svc.CreateGroupBox(ControlName: str, Place: any): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myGroupBox = oDlg.CreateGroupBox("GroupBox1", Array(20, 20, 60, 15))

##### Σε Python

         myGroupBox = dlg.CreateGroupBox('GroupBox1', (20, 20, 60, 15))

## CreateHyperlink

Create a new control of type Hyperlink in the current dialog.

### Σύνταξη:

svc.CreateHyperlink(ControlName: str, Place: any, Border: str = "NONE", MultiLine: bool = False, Align: str = "LEFT", VerticalAlign: str = "TOP"): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "NONE" (default) or "FLAT" or "3D"

Multiline: Όταν είναι True (προεπιλογή = False), η λεζάντα μπορεί να εμφανίζεται σε περισσότερες από μία γραμμές

Align: horizontal alignment, "LEFT" (default) or "CENTER" or "RIGHT"

VerticalAlign: vertical alignment, "TOP" (default) or "MIDDLE" or "BOTTOM"

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myHyperlink = oDlg.CreateHyperlink("Hyperlink1", Array(20, 20, 60, 15), MultiLine := True)

##### Σε Python

         myHyperlink = dlg.CreateHyperlink('Hyperlink1', (20, 20, 60, 15), MultiLine = True)

## CreateImageControl

Create a new control of type ImageControl in the current dialog.

### Σύνταξη:

svc.CreateImageControl(ControlName: str, Place: any, Border: str = "3D", Scale: str = "FITTOSIZE"): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

Scale: Μία από τις επόμενες τιμές: "FITTOSIZE" (προεπιλογή), "KEEPRATIO" ή "NO"

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myImageControl = oDlg.CreateImageControl("ImageControl1", Array(20, 20, 60, 15))

##### Σε Python

           myImageControl = dlg.CreateImageControl('ImageControl1", (20, 20, 60, 15))

## CreateListBox

Create a new control of type ListBox in the current dialog.

### Σύνταξη:

svc.CreateListBox(ControlName: str, Place: any, Border: str = "3D", DropDown: bool = True, LineCount: num = 5, MultiSelect: bool = False): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

DropDown: Όταν είναι True (προεπιλογή), εμφανίζεται ένα αναπτυσσόμενο πλήκτρο

LineCount: Καθορίζει τον μέγιστο αριθμό γραμμών που εμφανίζεται στο αναπτυσσόμενο μενού (προεπιλογή = 5)

MultiSelect: Όταν είναι True, μπορεί να επιλεγούν περισσότερες από 1 καταχωρίσεις. Προεπιλογή = False

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myListBox = oDlg.CreateListBox("ListBox1", Array(20, 20, 60, 15), Dropdown := True, MultiSelect := True)

##### Σε Python

         myListBox = dlg.CreateListBox('ListBox1', (20, 20, 60, 15), Dropdown = True, MultiSelect = True)

## CreateNumericField

Create a new control of type NumericField in the current dialog.

### Σύνταξη:

svc.CreateNumericField(ControlName: str, Place: any, Border: str = "3D", SpinButton: bool = False, MinValue: num = -1000000, MaxValue: num = 1000000, Increment: num = 1, Accuracy: num = 2): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

SpinButton: όταν είναι True (προεπιλογή = False), υπάρχει ένα πλήκτρο περιστροφής

MinValue: η μικρότερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = -1000000

MaxValue: η μεγαλύτερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = +1000000

Increment: το βήμα όταν πατιέται το πλήκτρο περιστροφής. Προεπιλογή = 1

Accuracy: καθορίζει τη δεκαδική ακρίβεια. Προεπιλογή = 2 δεκαδικά ψηφία

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myNumericField = oDlg.CreateNumericField("NumericField1", Array(20, 20, 60, 15), SpinButton := True)

##### Σε Python

         myNumericField = dlg.CreateNumericField('NumericField1', (20, 20, 60, 15), SpinButton = True)

## CreatePatternField

Create a new control of type PatternField in the current dialog.

### Σύνταξη:

svc.CreatePatternField(ControlName: str, Place: any, Border: str = "3D", EditMask: str, opt LiteralMax: str): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

EditMask: ένας κωδικός χαρακτήρα που καθορίζει τι μπορεί να εισαγάγει ο χρήστης
Ανατρέξτε στο Pattern_Field στο wiki για περισσότερες πληροφορίες.

LiteralMask: περιέχει τις αρχικές τιμές που εμφανίζονται στο πεδίο μοτίβου

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myPatternField = oDlg.CreatePatternField("PatternField1", Array(20, 20, 60, 15), EditMask := "NNLNNLLLLL", LiteralMask := "__.__.2002")

##### Σε Python

         myPatternField = dlg.CreatePatternField('PatternField1', (20, 20, 60, 15), EditMask = 'NNLNNLLLLL', LiteralMask = '__.__.2002')

## CreateProgressBar

Create a new control of type ProgressBar in the current dialog.

### Σύνταξη:

svc.CreateProgressBar(ControlName: str, opt Place: any, Border: str = "3D", MinValue: num = 0, MaxValue: num = 100): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

MinValue: η μικρότερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 0

MaxValue: η μεγαλύτερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 100

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myProgressBar = oDlg.CreateProgressBar("ProgressBar1", Array(20, 20, 60, 15), MaxValue := 1000)

##### Σε Python

         myProgressBar = dlg.CreateProgressBar('ProgressBar1', (20, 20, 60, 15), MaxValue = 1000)

## CreateRadioButton

Create a new control of type RadioButton in the current dialog.

### Σύνταξη:

svc.CreateRadioButton(ControlName: str, Place: any, MultiLine: bool = False): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Multiline: Όταν είναι True (προεπιλογή = False), η λεζάντα μπορεί να εμφανίζεται σε περισσότερες από μία γραμμές

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myRadioButton = oDlg.CreateRadioButton("RadioButton1", Array(20, 20, 60, 15), MultiLine := True)

##### Σε Python

         myRadioButton = dlg.CreateRadioButton('RadioButton1', (20, 20, 60, 15), MultiLine = True)

## CreateScrollBar

Create a new control of type ScrollBar in the current dialog.

### Σύνταξη:

svc.CreateScrollBar(ControlName: str, Place, Orientation: str, Border: str = "3D", MinValue: num = 0, MaxValue: num = 100): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Orientation: H[orizontal] or V[ertical]

Border: "3D" (default) or "FLAT" or "NONE"

MinValue: η μικρότερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 0

MaxValue: η μεγαλύτερη τιμή που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 100

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myScrollBar = oDlg.CreateScrollBar("ScrollBar1", Array(20, 20, 60, 15), MaxValue := 1000)

##### Σε Python

         myScrollBar = dialog.CreateScrollBar('ScrollBar1', (20, 20, 60, 15), MaxValue = 1000)

## CreateTableControl

Create a new control of type TableControl in the current dialog.

### Σύνταξη:

svc.CreateTableControl(ControlName: str, Place: any, Border: str = "3D", RowHeaders: bool = True, ColumnHeaders: bool = True, ScrollBars: str = "N", GridLines: bool = False): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

RowHeaders: όταν είναι True (προεπιλογή), εμφανίζονται οι κεφαλίδες σειράς

ColumnHeaders: όταν είναι True (προεπιλογή), εμφανίζονται οι κεφαλίδες στηλών

ScrollBars: H[orizontal] or V[ertical] or B[oth] or N[one] (default). Scrollbars appear dynamically when they are needed.

GridLines: όταν είναι True (προεπιλογή = False) ζωγραφίζονται οριζόντιες και κάθετες γραμμές μεταξύ των κελιών του πλέγματος

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myTableControl = oDlg.CreateTableControl("TableControl1", Array(20, 20, 60, 15), ScrollBars := "B")

##### Σε Python

         myTableControl = dlg.CreateTableControl('TableControl1', (20, 20, 60, 15), ScrollBars = 'B')

## CreateTextField

Create a new control of type TextField in the current dialog.

### Σύνταξη:

svc.CreateTextField(ControlName: str, Place: any, Border: str = "3D", MultiLine: bool = False, MaximumLength: num = 0, PasswordCharacter: str = ""): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

Multiline: Όταν είναι True (προεπιλογή = False), η λεζάντα μπορεί να εμφανίζεται σε περισσότερες από μία γραμμές

MaximumLength: ο μέγιστος αριθμός χαρακτήρων (προεπιλογή = 0 που σημαίνει απεριόριστος)

PasswordCharacter: ένας μεμονωμένος χαρακτήρας που καθορίζει την ηχώ για ένα πεδίο κειμένου κωδικού πρόσβασης (προεπιλογή = "")

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

    Set myTextField = oDlg.CreateTextField("TextField1", Array(20, 20, 120, 50), MultiLine := True)

##### Σε Python

         myTextField = dlg.CreateTextField('TextField1', (20, 20, 120, 50), MultiLine = True)

## CreateTimeField

Create a new control of type TimeField in the current dialog.

### Σύνταξη:

svc.CreateTimeField(ControlName: str, Place: any, Border: str = "3D", MinTime: num = 0, MaxTime: num = 24): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

MinTime: ο μικρότερος χρόνος που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 0

MaxTime: ο μεγαλύτερος χρόνος που μπορεί να εισαχθεί στο στοιχείο ελέγχου. Προεπιλογή = 24 ώρες

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myTimeField = oDlg.CreateTimeField("TimeField1", Array(20, 20, 60, 15))

##### Σε Python

         myTimeField = dlog.CreateTimeField('TimeField1', (20, 20, 60, 15))

## CreateTreeControl

Create a new control of type TreeControl in the current dialog.

### Σύνταξη:

svc.CreateTreeControl(ControlName: str, Place: any, Border = "3D"): svc

### Παράμετροι:

ControlName: το όνομα του νέου στοιχείου ελέγχου. Δεν πρέπει να υπάρχει ακόμα.

Place: είτε…

- μια πλειάδα της Basic Πίνακας, ή της Python με 4 στοιχεία: (X, Y, πλάτος, ύψος)

- ένα αντικείμενο com.sun.star.awt.Rectangle [X, Y, Πλάτος, Ύψος]

Όλα τα στοιχεία εκφράζονται σε Μονάδες Map AppFont.

Border: "3D" (default) or "FLAT" or "NONE"

### Επιστρεφόμενη τιμή:

Μια παρουσία της υπηρεσίας SFDialogs.DialogControl, ή Nothing.

### Παράδειγμα:

##### Σε Basic

         Set myTreeControl = oDlg.CreateTreeControl("TreeControl1", Array(20, 20, 60, 15))

##### Σε Python

         myTreeControl = dlg.CreateTreeControl('TreeControl1', (20, 20, 60, 15))

## EndExecute

Τερματίζει την εμφάνιση ενός αναγκαστικού διαλόγου και επιστρέφει το όρισμα ως επιστρεφόμενη τιμή για την τρέχουσα εκτελούμενη ενέργεια Execute().

Το EndExecute() (Τέλος εκτέλεσης) περιέχεται συνήθως στην επεξεργασία μιας μακροεντολής που ενεργοποιείται από ένα συμβάν διαλόγου ή ελέγχου.

### Σύνταξη:

svc.EndExecute(returnvalue: int)

### Παράμετροι:

returnvalue (τιμή επιστροφής): Η τιμή μεταβιβάστηκε στην τρέχουσα μέθοδο Execute().

### Παράδειγμα:

##### Σε Basic

          Sub OnEvent(poEvent As com.sun.star.lang.EventObject)
              Dim oDlg As Object
              Set oDlg = CreateScriptService("SFDialogs.DialogEvent", poEvent)
              oDlg.EndExecute(ReturnValue := 25)
          End Sub

##### Σε Python

         from com.sun.star.lang import EventObject
         def on_event(event: EventObject):
             dlg = CreateScriptService("SFDialogs.DialogEvent", event)
             dlg.EndExecute(25)

Πάνω από το com.sun.star.lang.EventObject οι αναφορές είναι προαιρετικές. Τέτοιοι σχολιασμοί βοηθούν στον προσδιορισμό της διεπαφής προγραμματισμού εφαρμογών (API) του LibreOffice.

## Execute

Εμφάνιση του πλαισίου διαλόγου και, όταν είναι αναγκαστικό, περιμένετε τον τερματισμό του από τον χρήστη. Η επιστρεφόμενη τιμή είναι είτε:

- 0 : πατήθηκε το πλήκτρο Cancel (Ακύρωση)

- 1 : πατήθηκε το πλήκτρο OK

- Διαφορετικά, ο διάλογος σταμάτησε με μια δήλωση EndExecute() που εκδόθηκε από ένα συμβάν διαλόγου ή ελέγχου

Για παράθυρα διαλόγου που δεν είναι αναγκαστικά, η μέθοδος επιστρέφει πάντα 0 και η εκτέλεση της μακροεντολής συνεχίζεται.

### Σύνταξη:

svc.Execute(modal: bool = True): int

### Παράμετροι:

modal (αναγκαστικό): False όταν ο διάλογος δεν είναι αναγκαστικός. Προεπιλογή = True.

### Παράδειγμα:

Σε αυτό το παράδειγμα Basic, ο διάλογος myDialog αποθηκεύεται στη βιβλιοθήκη Standard (Τυπική) του τρέχοντος εγγράφου.

          Dim oDlg As Object, lReturn As Long
          Set oDlg = CreateScriptService("SFDialogs.Dialog", , , "myDialog")
          lReturn = oDlg.Execute(Modal := False)
          Select Case lReturn
              ' ...
          End Select

Αυτός ο κώδικας Python εμφανίζει τον αναγκαστικό διάλογο DlgConvert από την κοινόχρηστη βιβλιοθήκη Basic Euro.

         dlg = CreateScriptService("SFDialogs.Dialog", 'GlobalScope', 'Euro', "DlgConvert")
         rc = dlg.Execute()
         if rc == dlg.CANCELBUTTON:
             # ...

## GetTextsFromL10N

Αντικαθιστά όλες τις σταθερές συμβολοσειρές κειμένου σε ένα παράθυρο διαλόγου από τις μεταφρασμένες εκδόσεις τους που βασίζονται σε μια παρουσία υπηρεσίας L10N. Αυτή η μέθοδος μεταφράζει τις ακόλουθες συμβολοσειρές:

- Ο τίτλος του διαλόγου.

- Η λεζάντα των ακόλουθων τύπων ελέγχου: Button (πλήκτρο), CheckBox (πλαίσιο ελέγχου), FixedLine (σταθερή γραμμή), FixedText (σταθερό κείμενο), GroupBox (πλαίσιο ομάδας)και RadioButton (πλήκτρο επιλογής).

- Στατικές συμβολοσειρές σε πλαίσια καταλόγου και σύνθετα πλαίσια.

- Η συμβουλή οθόνης ή το κείμενο βοήθειας που εμφανίζεται όταν το ποντίκι τοποθετείται πάνω από το στοιχείο ελέγχου.

Η μέθοδος επιστρέφει True εάν είναι επιτυχής.

Για να δημιουργήσετε έναν κατάλογο με μεταφράσιμες συμβολοσειρές σε ένα παράθυρο διαλόγου, χρησιμοποιήστε τη μέθοδο AddTextsFromDialog από την υπηρεσία L10N.

### Σύνταξη:

svc.GetTextsFromL10N(l10n: svc): bool

### Παράμετροι:

l10n: Μια παρουσία υπηρεσίας L10N από την οποία θα ανακτηθούν μεταφρασμένες συμβολοσειρές.

### Παράδειγμα:

Το παρακάτω παράδειγμα φορτώνει μεταφρασμένες συμβολοσειρές και τις εφαρμόζει στο παράθυρο διαλόγου "MyDialog".

##### Σε Basic

         oDlg = CreateScriptService("Dialog", "GlobalScope", "Standard", "MyDialog")
         myPO = CreateScriptService("L10N", "/home/user/po_files/")
         oDlg.GetTextsFromL10N(myPO)
         oDlg.Execute()

##### Σε Python

         dlg = CreateScriptService("Dialog", "GlobalScope", "Standard", "MyDialog")
         myPO = CreateScriptService("L10N", "/home/user/po_files/")
         dlg.GetTextsFromL10N(myPO)
         dlg.Execute()

Ανατρέξτε στη σελίδα βοήθειας Υπηρεσία L10N για να μάθετε περισσότερα σχετικά με τον τρόπο χειρισμού των αρχείων PO και POT.

## OrderTabs

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

Τα στοιχεία ελέγχου με ευρετήριο >= 1 δεν είναι προσβάσιμα με το κλειδί TAB εάν:
- παραλείπονται από τον δεδομένο κατάλογο
- ο τύπος τους είναι FixedLine, GroupBox, ή ProgressBar
- είναι απενεργοποιημένα

### Σύνταξη:

svc.TabsList(TabsList: num, Start: num = 1, Increment: num = 1): bool

### Παράμετροι:

TabsList: ένας πίνακας έγκυρων ονομάτων στοιχείων ελέγχου με τη σειρά του πίνακα

Start: το ευρετήριο της καρτέλας που θα αντιστοιχιστεί στο 1ο στοιχείο ελέγχου στον κατάλογο. Προεπιλογή = 1

Increment: η διαφορά μεταξύ 2 διαδοχικών ευρετηρίων καρτελών. Προεπιλογή = 1

### Επιστρεφόμενη τιμή:

True when successful.

### Παράδειγμα:

##### Σε Basic

         oDlg.OrderTabs(Array("myListBox", "myTextField", "myNumericField"), Start := 10)

##### Σε Python

         dlg.OrderTabs(('myListBox', 'myTextField', 'myNumericField'), Start = 10)

## Resize

Μετακινεί την επάνω αριστερή γωνία ενός διαλόγου σε νέες συντεταγμένες ή/και τροποποιεί τις διαστάσεις του. Όλες οι αποστάσεις εκφράζονται σε μονάδες AppFont. Χωρίς ορίσματα, η μέθοδος επαναφέρει τις αρχικές διαστάσεις. Επιστρέψτε το True εάν η αλλαγή μεγέθους ήταν επιτυχής.

### Σύνταξη:

svc.Resize(opt Left: num, opt Top: num, opt Width: num, opt Height: num): bool

### Παράμετροι:

Left (Αριστερά): η οριζόντια απόσταση από την επάνω αριστερή γωνία

Top (Επάνω): η κατακόρυφη απόσταση από την επάνω αριστερή γωνία

Width (Πλάτος): το πλάτος του ορθογωνίου που περιέχει το παράθυρο διαλόγου

Height (Ύψος): το ύψος του ορθογωνίου που περιέχει το παράθυρο διαλόγου

Τα ορίσματα που λείπουν παραμένουν αμετάβλητα

### Παράδειγμα:

##### Σε Basic

         oDlg.Resize(1000, 2000, Height := 6000) ' Το πλάτος δεν έχει αλλάξει

##### Σε Python

         dlg.Resize(1000, 2000, Height = 6000) # Το πλάτος δεν έχει αλλάξει

## SetPageManager

Καθορίζει ποια στοιχεία ελέγχου σε ένα παράθυρο διαλόγου είναι υπεύθυνα για την εναλλαγή σελίδων, διευκολύνοντας τη διαχείριση της ιδιότητας Page ενός διαλόγου και των στοιχείων ελέγχου του.

Οι διάλογοι μπορεί να έχουν πολλές σελίδες και η τρέχουσα ορατή σελίδα ορίζεται από την ιδιότητα διαλόγου Page. Εάν η ιδιότητα Page παραμείνει αμετάβλητη, η προεπιλεγμένη ορατή σελίδα είναι ίση με 0 (μηδέν), που σημαίνει ότι δεν ορίζεται συγκεκριμένη σελίδα και εμφανίζονται όλα τα ορατά στοιχεία ελέγχου ανεξάρτητα από την τιμή που έχει οριστεί στη δική τους ιδιότητα Page.

Όταν η ιδιότητα Page ενός διαλόγου αλλάζει σε κάποια άλλη τιμή όπως 1, 2, 3 κ.λπ., τότε θα εμφανιστούν μόνο τα στοιχεία ελέγχου των οποίων η ιδιότητα Page αντιστοιχεί στην τρέχουσα σελίδα διαλόγου.

Χρησιμοποιώντας τη μέθοδο SetPageManager μπορείτε να ορίσετε τέσσερις τύπους διαχειριστών σελίδων:

- List box or combo box: σε αυτήν την περίπτωση, κάθε καταχώρηση στο πλαίσιο καταλόγου, ή στο σύνθετο πλαίσιο αντιστοιχεί σε μια σελίδα. Το πρώτο στοιχείο αναφέρεται στη σελίδα 1, το δεύτερο στοιχείο αναφέρεται στη σελίδα 2 και ούτω καθεξής.

- Group of radio buttons: ορίζει μια ομάδα πλήκτρων επιλογής που θα ελέγχουν ποια σελίδα είναι ορατή.

- Sequence of buttons: ορίζει ένα σύνολο πλήκτρων, καθένα από τα οποία αντιστοιχεί σε μια σελίδα διαλόγου. Αυτό μπορεί να χρησιμοποιηθεί για την προσομοίωση μιας διεπαφής με καρτέλες, τοποθετώντας τα πλήκτρα δίπλα-δίπλα στο παράθυρο διαλόγου.

- Previous/Next buttons: ορίζει ποια πλήκτρα στο παράθυρο διαλόγου θα χρησιμοποιηθούν για πλοήγηση στην Προηγούμενη/Επόμενη σελίδα στο παράθυρο διαλόγου.

Είναι δυνατή η ταυτόχρονη χρήση περισσότερων του ενός μηχανισμών διαχείρισης σελίδων.

Αυτή η μέθοδος υποτίθεται ότι καλείται μόνο μία φορά, πριν καλέσετε τη μέθοδο Execute. Οι επόμενες κλήσεις αγνοούνται.

Εάν είναι επιτυχής, αυτή η μέθοδος επιστρέφει True.

### Σύνταξη:

svc.SetPageManager(pilotcontrols: str = "", tabcontrols: str = "", wizardcontrols: str = "", opt lastpage: int): bool

### Παράμετροι:

pilotcontrols: ένας κατάλογος διαχωρισμένος με κόμματα ονομάτων στοιχείων ελέγχου ListBox, ComboBox, ή RadioButton που χρησιμοποιούνται ως διαχειριστές σελίδων. Για τα στοιχεία ελέγχου RadioButton, καθορίστε το όνομα του πρώτου στοιχείου ελέγχου στην ομάδα που θα χρησιμοποιηθεί.

tabcontrols: ένας κατάλογος ονομάτων πλήκτρων διαχωρισμένος με κόμματα που θα χρησιμοποιηθούν ως διαχειριστές σελίδων. Η σειρά με την οποία καθορίζονται σε αυτό το όρισμα αντιστοιχεί στον αριθμό σελίδας με τον οποίο συσχετίζονται.

wizardcontrols: ένας κατάλογος διαχωρισμένος με κόμματα με τα ονόματα των δύο πλήκτρων που θα χρησιμοποιηθούν ως πλήκτρα Προηγούμενο/Επόμενο.

lastpage: ο αριθμός της τελευταίας διαθέσιμης σελίδας. Συνιστάται να προσδιορίσετε αυτήν την τιμή όταν χρησιμοποιείτε τον διαχειριστή Προηγούμενη/Επόμενη σελίδα.

### Παράδειγμα:

Θεωρήστε έναν διάλογο με τρεις σελίδες. Το παράθυρο διαλόγου έχει ένα στοιχείο ελέγχου ListBox με το όνομα "aPageList" που θα χρησιμοποιηθεί για τον έλεγχο της ορατής σελίδας. Επιπλέον, υπάρχουν δύο πλήκτρα με το όνομα "btnPrevious" και "btnNext" που θα χρησιμοποιηθούν ως πλήκτρα Previous/Next στο παράθυρο διαλόγου.

##### Σε Basic

        oDlg.SetPageManager(PilotControls := "aPageList", _
                               WizardControls := "btnPrevious,btnNext", _
                               LastPage := 3)
        oDlg.Execute()

##### Σε Python

        dlg.SetPageManager(pilotcontrols="aPageList",
                           wizardcontrols="btnPrevious,btnNext",
                           lastpage=3)
        dlg.Execute()

## Terminate

Τερματίστε την υπηρεσία Dialog για την τρέχουσα παρουσία. Επιστρέφει True εάν ο τερματισμός ήταν επιτυχής.

### Σύνταξη:

svc.Terminate(): bool

### Παράδειγμα:

Στα παρακάτω παραδείγματα Basic και Python ανοίγουν οι μη αναγκαστικοί διάλογοι DlgConsole και dlgTrace. Αποθηκεύονται αντίστοιχα στις κοινόχρηστες βιβλιοθήκες ScriptForge και Access2Base. Τα πλήκτρα κλεισίματος διαλόγου είναι απενεργοποιημένα και ο ρητός τερματισμός εκτελείται στο τέλος μιας εκτελούμενης διαδικασίας.

Σε αυτό το παράδειγμα, ένα πλήκτρο στην DlgConsole αντικαθιστά το κλείσιμο παραθύρου με αναστολή:

##### Σε Basic

         oDlg = CreateScriptService("SFDialogs.Dialog","GlobalScope","ScriptForge","DlgConsole")
         oDlg.Execute(modal:=False)
         Wait 5000
         oDlg.Terminate()

##### Σε Python

         from time import sleep
         dlg = CreateScriptService('SFDialogs.Dialog',"GlobalScope",'Access2Base',"dlgTrace")
         dlg.Execute(modal=False)
         sleep 5
         dlg.Terminate()

Όλες οι ρουτίνες ή αναγνωριστικά του ScriptForge στη Basic που έχουν το πρόθεμα χαρακτήρα υπογράμμισης "_" δεσμεύονται για εσωτερική χρήση. Δεν προορίζονται να χρησιμοποιηθούν σε μακροεντολές Basic ή σενάρια Python.

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

Υπηρεσία SFDialogs.DialogControl

Υπηρεσία ScriptForge.UI