Como inicializar formulario Write en evento Al Cargar

[lujopamu]

Editado:

Hola:

A ver si me podeis orientar, ya que tengo un formulario en un documento Write y quisiera inicializar los campos a valores predeterminados al cargar el documento, pero no encuentro la manera de apuntar al formulario y asignar los valores a los controles de texto.

Código: Seleccionar todo

Sub AsignaDatosDefecto(Evento)
Dim oForm as Object
Dim oDocumento as Object

	oDocumento = ThisComponent.CurrentController.Frame
	oForm = ?¿
	oForm.getByName("edtPoblacionContrato").setString("Poblacion")
	oForm.getByName("edtDiaContrato").setInteger(Day(Date()))	
	  
End Sub

Gracias por vuestra ayuda.

Un Saludo.

[PepeOooSevilla]

Hola.
Por favor ...

• Si se adjunta un archivo con la consulta/incidencia/problema ..., aumenta y mucho, las posibilidades de conseguir una respuesta adecuada (sin datos personales, que este es un foro público). Los voluntarios del foro no siempre tenemos tiempo para, partiendo de cero, crear un archivo que, al final, no se corresponderá exactamente con el problema indicado.
  Si no sabes cómo subir un archivo, consulta Cómo adjuntar un archivo.

Saludos cordiales.

[RMG]

Hola

Algo así como esto te debería funcionar.

oForm = Evento.Source

Saludos