Visual Basic - Formulario emergente (PopUp) tipo cuadro de diálog

Life is soft - evento anual de software empresarial
 
Vista:

Formulario emergente (PopUp) tipo cuadro de diálog

Publicado por Koki (29 intervenciones) el 24/01/2003 12:06:35
Hola,

No veo la manera de crear un formulario emergente (tipo cuadro de diálogo) de una forma fácil con VB6 sin recurrir a la Api. Me interesa un formulario que quede como el de buscar y reemplazar (de Access o Excel), el cual se queda por encima de la aplicación pero puedes trabajar con la aplicación (no me sirve la api SetWindowLong con parámetro TOPMOST porque cuando cambio de aplicación sigui visible).

Si sabéis de alguna manera fácil os lo agradeceré, si no, tendré que sumergirme en el fascinante y complicado mundo de las apis.

Gracias.
Koki
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Formulario emergente (PopUp) tipo cuadro de diálog

Publicado por J2ML (464 intervenciones) el 24/01/2003 18:39:44
Bueno a veces la dificultades de los problemas esta en la mente de quien los afronta. Con API sólo debes:
1.- Colocar en un módulo:
Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

2.- en el Form1:
Private Sub Form_Load()
Form2.Show
End Sub

Private Sub Form_Unload(Cancel As Integer)
Unload Form2
End Sub

3.- En el Form2 colocas:
Private Sub Form_Load()
Dim res As Long
res = SetParent(Form2.hWnd, Form1.hWnd)
End Sub

Espero sea lo que deseas. Por cierto el ejemplo fue extraído de www.ambsoftware.com.

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Formulario emergente (PopUp) tipo cuadro de diá

Publicado por maCo (123 intervenciones) el 25/01/2003 00:20:21
Hola
Sabes las APIs de Windows no tienen nada de complicado :)
la verdad no tengo excel, ni Access, y menos Office =P
pero para eso creo que no neceitas recurrir a funciones de la API
si es lo que pienso que quieres solo debes poner esto

Formulario.Show vbModeless, Me
chao
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar