Yo creo que el problema es de tratamiento de eventos.
La llamada a Show antes del formulario de ingreso me parece que es el
problema.

Lo que yo utilizo para ingresar a la aplicación es más o menos esto.

Private Sub AVFShell_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

Dim oLogin As AVFenix.AVFLogin
Dim bSalir As Boolean = False

Do
oLogin = New AVFenix.AVFLogin
oLogin.ShowDialog()
If oLogin.DialogResult = Windows.Forms.DialogResult.OK Then
' Usuario OK.
Exit Do
Else
bSalir = True
Exit Do
End If
Loop

If bSalir Then
Me.__Exit()
Else

Dim o As xpo.Auditoria
o = New xpo.Auditoria(Me.Usuario, "000 Ingreso")
o.Save()

Me.Size = New System.Drawing.Size(800, 600)
Me.CenterToScreen()

End If

End Sub

Public Sub __Exit()
Me.Close()
End Sub


Con esto, en mi caso la shell no se muestra hasta que no ingresa un usuario
correcto.

Otra cosa que se me ocurre es si no intentaste con una llamada a
Application.DoEvents() luego del Show() del formulario principal.


Claudio Torrillo
www.xcsa.com.ar


________________________________________
De: tonet@... [mailto:tonet@...] En nombre de
Gustavo Vigo
Enviado el: domingo, 27 de abril de 2008 1:01
Para: tonet@...
Asunto: RE: [tonet] DXPERIENCE 8.1.2

Module
Navegacion
Sub Ir_UsuarioAcceso(ByVal ownerForm As Form)
Dim frm As New frmUsuario_Acceso
frm.ShowDialog(ownerForm)
End Sub
.....
End Module
 
esta rutina Lanza una ventana de acceso al usuario con formulario
objPrincipal de fondo y opacidad menor a 100.
 
Si los codigos de acceso de usuario son correctos, se accede al programa,
tomando el formulario principal opacidad 100 y desapareciendo el formulario
de acceso al usuario.. 
 
Puse en el Load la Opacidad y sigue saliendo el mismo efecto (pantalla negra
en el area del formulario ObjPrinciapl)

Claudio Torrillo <clipsupp@...> escribió:

>> Navegacion.Ir_UsuarioAcceso(objPrincipal)

Que se supone hace esto?

Por otro lado, las modificaciones de opacidad no probastes ponerlas en el
LOAD del formulario?
El Show() no deberías utilizarlo si luego usas Run()

Claudio Torrillo
PD: Si Navegación .... es lo que imagino, estás errando en la secuencia.

________________________________________
De: tonet@... [mailto:tonet@...] En nombre de
Gustavo Vigo
Enviado el: lunes, 21 de abril de 2008 21:03
Para: tonet@...
Asunto: RE: [tonet] DXPERIENCE 8.1.2

Ok, Claudio,
El caso es el siguiente:
Cuando se ejecura lo siguiente,
*/
Sub
Main()
Connections.cnxMySQL_Connect()
objPrincipal =
New frmPrincipal
objPrincipal.Opacity = 0.9
objPrincipal.Show()
Navegacion.Ir_UsuarioAcceso(objPrincipal)
Application.Run(objPrincipal)
End Sub
*/
antes de aparecer el formulario objPrincipal se pone primero de color negro,
para luego aparecer el formulario objPrincipal. Esto es cuando en las
propiedades  del formulario que contiene el RibbonControl se coloca 
WindowState = normal.
 
Lo anterior cambia cuando se colaca el WindowState = maximized.
 
Ademas, cuando se inicia en maximized, la pantalla en su totailidad, se pone
en blanco y luego aparece el formulario objPrincipal.
 
Asi mismo no puedo colocar una imagen en el area de pantalla que no esta
ocupado por el RibbonControl.
 
Esero sea mas o menos entendible, lo edxplicado.
 
GVigo 
 
 

Claudio Torrillo <clipsupp@...> escribió:
Gustavo,

Algo he visto. Si puedo ayudarte.

Claudio Torrillo
www.xcsa.com.ar

________________________________________
De: tonet@... [mailto:tonet@...] En nombre de
Gustavo Vigo
Enviado el: sábado, 19 de abril de 2008 10:01
Para: tonet@...
Asunto: [tonet] DXPERIENCE 8.1.2

Tengo algunas consultas sobre la utilizacion del RibonControl que viene en
el paquete DXPerience 8.1.2  de DevExpress.
 
Si alguien utiliza estos controles por fevaor dejar un mensaje...
 
Utilizo VBasic Net
VStudio 2.005
GVigo

________________________________________

Enviado desde Correo Yahoo!
La bandeja de entrada más inteligente.

________________________________________

Enviado desde Correo Yahoo!
La bandeja de entrada más inteligente.



________________________________________

Enviado desde Correo Yahoo!
La bandeja de entrada más inteligente.