[Base][Macro] Accesso ad un formulario

Regole del forum
Non inserire domande qui, utilizzare le altre sezioni con un link all'argomento di interesse
Bloccato
Avatar utente
charlie
Site Admin
Site Admin
Messaggi: 8957
Iscritto il: mercoledì 19 dicembre 2012, 10:50
Contatta:

[Base][Macro] Accesso ad un formulario

Messaggio da charlie »

Un formulario si trova nel documento attivo thisComponent, contenuto nell'area drawpage, a sua volta interna al contenitore forms.
  • Metodo getByName
    Per accedere al formulario MainForm con il metodo getByName:

    Codice: Seleziona tutto

    oDoc = thisComponent
    oDrawpage = oDoc.drawpage
    oForm = oDrawpage.forms.getByName("MainForm")
    oppure, senza passi intermedi:

    Codice: Seleziona tutto

    oForm=thisComponent.drawpage.forms.getByName("MainForm")
  • Metodo getByIndex
    Per accedere al formulario principale con il metodo getByIndex:

    Codice: Seleziona tutto

    oDoc = thisComponent
    oDrawpage = oDoc.drawpage
    oForm = oDrawpage.forms.getByIndex(0)
    oppure, senza passi intermedi:

    Codice: Seleziona tutto

    oForm=thisComponent.drawpage.forms.getByIndex(0)
Accesso tramite un evento
Ha il vantaggio di non dover conoscere il nome del formulario o sapere se è un MainForm o un SubForm.
  • Evento del Formulario
    Per accedere al formulario tramite un evento dello stesso (es. Prima della modifica dei record di dati):

    Codice: Seleziona tutto

    Sub MacroEsempio(oEvent As Object)
    	oForm = oEvent.Source
    	...
    End Sub
  • Evento di un Controllo del Formulario
    Per accedere al formulario tramite un evento di un controllo dello stesso (es. Perdita del punto focale):

    Codice: Seleziona tutto

    Sub MacroEsempio(oEvent As Object)
    	oField = oEvent.Source.Model
    	oForm = oField.Parent
    	...
    End Sub
charlie
macOS 14.6.1 Sonoma: Open Office 4.1.15 - LibreOffice 7.5.7.2
http://www.charlieopenoffice.altervista.org