SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: pacegar en Jueves 18 de Noviembre de 2004, 09:55

Título: Control Activex
Publicado por: pacegar en Jueves 18 de Noviembre de 2004, 09:55

Hola chi@s....

Mi socnuslta es la siguiente. He hecho un control ActiveX que he insertado en mi aplicación. Lo que quiero hacer es que cuando llamo a ese activeX el control de ejecución no regrese a mi aplicación hasta que el activeX no haya acabado...

O por lo menos, si esto no es posible, que el activeX me devuelva un valor, tipo funcion, para saber cuando ha acabado...

Gracias por vuestras sugerencias
Un saludo

Título: Re: Control Activex
Publicado por: Brroz en Viernes 19 de Noviembre de 2004, 09:18

Hola pacegar.

Habría varias formas, la mejor que se me ocurre sería:

Crear un evento en el actX que se desencadenará al finalar el proceso el activeX, mediante una variable boolean controla en la aplicación el desencadenamiento del evento

En el Control activeX:

Código: Text

1.  
2. Public Event FinalizadoProceso()
3.  
4. Public Sub HazAlgo()
5. .
6. .
7. .
8.      RaiseEvent FinalizadoProceso
9.    
10. End Sub
11.  
12.  

En el form:

Código: Text

1.  
2. Private bFinalizado as boolean
3.  
4. Private Sub Comand1_Click()
5.     .
6.     .
7.     .
8.     bFinalizado = True
9.     ControlActiveX1.HazAlgo
10.     Do Until bFinalizado
11.         Doevents
12.     Loop
13.     .
14.     .
15.     .
16.  
17. End Sub
18.  
19. Private Sub ControlActiveX1_FinalizadoProceso()
20.  
21.     bFinalizado = True
22.  
23. End Sub
24.  
25.  

Chao.