2009/9/28 Mauricio Baeza <[email protected]>: > Hola a todos: > > Si tuviesen oportunidad, ¿podrían hacer la siguiente prueba? > > en un nuevo documento, agreguen un cuadro de diálogo y en este un cuadro > de texto, después, prueben el siguiente código > > Sub CuadroTexto() > Dim oDialogo As Object > Dim oControl As Object > > DialogLibraries.LoadLibrary( "Standard" ) > 'Reemplazar el nombre del dialogo > oDialogo = > CreateUnoDialog( DialogLibraries.Standard.getByName("Dialogo") ) > 'El cuadro de texto con el nombre que hayan usado > oControl = oDialogo.getControl("txtNombre") > 'Mostramos el cuadro de dialogo > oDialogo.execute() > 'Al cerrar mostramos el contenido del control > MsgBox oControl.Text > oDialogo.dispose() End Sub > > Primero escriban algo en el cuadro de texto, en la segunda prueba "no" > escriban nada, ¿que les devuelve en cada caso? > > Gracias por su tiempo. > > Saludos > > Mauricio > > > P.D. Comúnmente, me llega copia de mi mensaje enviado, pero tiene un par > de meses que esto no pasa, perdonen si duplico los mensajes. > > > _____________________________________________ > Todo lo que no es dado es perdido > > > --------------------------------------------------------------------- > To unsubscribe, e-mail: [email protected] > For additional commands, e-mail: [email protected] > >
Recibi el correo sin problemas. Reportare mas adelante. -- Alexandro Colorado OpenOffice.org Español IM: [email protected] --------------------------------------------------------------------- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
