Hola a todos...
Supongo que te refieres a saber en que control esta el "foco", correcto?
Si tu declaras un procedimiento como:
Sub Control_Recibe_Foco(Event As Object)
'Event.Source
End Sub
y lo asignas a un control en su evento Al activar area, el parametro Event y
la propiedad Source te diran que objeto es el que recibe el foco, ten
cuidado con este evento pues facilmente puedes caer en un blucle infinito,
como por ejemplo si haces uso de una MsgBox dentro de este evento y en
general con cualquier linea que saque el foco fuera del control que lo este
llamando...
Trabajar con el foco de los controles no es tan complicado, pero hay que
entender como lo maneja OOo Basic, si quieres enviar el foco a un control
debes de acceder a su vista(View), lo cual cambia un poco si lo haces desde
un dialogo o desde un formulario...
Para ilustrar lo anterior te prepare un ejemplo que contiene lo siguiente...
Un archivo de Calc, con una sola hoja, un formulario llamado frmDatos con:
Tres cuadros de textos llamados txtNombre, txtTel y txtDir
Un boton de comando llamado cmdGuardarDatos
En el ejemplo te muestro como:
Acceder a un formulario por su nombre, recuerda que puedes tener mas de uno
por hoja
Acceder a los controles de este formulario
A validar el contenido de los cuadros de texto, que no este vacio, que sean
numeros, que no sean fechas
A enviar el foco al cuadro de texto que queramos
Al recibir el foco, los cuadros de texto cambian el color de fondo y fuente
Al perder el foco vuelven a cambiarse los colores de fondo y fuente
Al estar correctos los datos, vaciar los cuadros de texto
Espero te sirva...
Saludos a todos...
On 4/6/06, [EMAIL PROTECTED] <[EMAIL PROTECTED]>
wrote:
>
> ¡Buenas noches!
>
> ¿Un código para detectar formulario y el objeto que seleccionemos y/o
> adquieren el foco?
>
> Gracias.
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
--
_______________________________
TODO LO QUE NO ES DADO ES PERDIDO
