[Base][Macro] Accesso ad un formulario

[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   Espandi visualeStringi visuale

  oDoc = thisComponent
oDrawpage = oDoc.drawpage
oForm = oDrawpage.forms.getByName("MainForm")

  
  oppure, senza passi intermedi:
  

  Codice: Seleziona tutto   Espandi visualeStringi visuale

  oForm=thisComponent.drawpage.forms.getByName("MainForm")

  
  
• Metodo getByIndex
  Per accedere al formulario principale con il metodo getByIndex:
  

  Codice: Seleziona tutto   Espandi visualeStringi visuale

  oDoc = thisComponent
oDrawpage = oDoc.drawpage
oForm = oDrawpage.forms.getByIndex(0)

  
  oppure, senza passi intermedi:
  

  Codice: Seleziona tutto   Espandi visualeStringi visuale

  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   Espandi visualeStringi visuale

  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   Espandi visualeStringi visuale

  Sub MacroEsempio(oEvent As Object)
   oField = oEvent.Source.Model
   oForm = oField.Parent
   ...
End Sub