Programación General > Visual Basic 6.0 e inferiores

 Problema Con Ventanas

<< < (2/2)

fap1603:
Puedes hacer una rutina que controle los formulariso que tienes abiertos, la cual llamarias antes de llamar otro formulario, y dentro de esta rutina utilizas :

for i=0 to forms.count - 1 step 1
if forms.count(i).name = "formularioX" then lo que quieras
next i

eso te lee todos los formularios y cumple una condicion, lo que puedes hacer para ver los resultados es almacenarlos en una matriz y luego imprimirlo en un msgbox, o donde te paresca mejor,

para el efecto de lo que pides, con :

if forms.count -1 > 1 then
msgbox "nose puede abrir" o salirce de la rutina y no cargar
end if

Eso te da una idea. Espero te sea util.

Sagutxo:
Salu2. para el tema de formularios uso el menu del MDI, en la opcion que pongo siempre en el menú para salir del programasuelo jugar con el evento

Ejemplo:
   
   if menu.archivo.enable = true


   Si eso es true permito abrir el formulario, de lo contrario pos no es posible porque los menus estan disable.

   Si usas esto te recomiendo que uses una variable public ya que tendrás que poner a true los menus cada vez que salgas de un formulario en el evento Query Unload. Y claro, cada vez que entres en un form tendrás que poner los menus en disable. Con esto tambien impediras que el usuario salga del prog cuando quiera.

   Create una mini función que los ponga a enabled y disable todos los menus del MDI.

Espero haberte podido ayudar.
 :comp:

solcito:
:D gracias chicos, probe haciendo lo que dijo frap1603 y funciona de maravillas  :P

Navegación

[0] Índice de Mensajes

[*] Página Anterior