una pequeña ayuda por favor - VB-MUNDO

dagoba77 · #1 (**permalink**) 10-09-2005, 21:45:13

Saludos
Espero alguien pueda ayudarme con lo siguiente

He hecho unas cuantas aplicaciones sobre pedido para puntos de ventas en PYMES , control de inventrio , clientes proovedores etc...

Con la experiencia he notado que las aplicaciones encargadas solo difieren muy poco en cuestiones de apariencia y algunas configuraciones, de ahi en fuera los clientes quedan satisfechos con el resto de la aplicacion

Con el fin de ahorrarme engorroso codigo respecto a la pocicion de los controles , color de fondo , altura ,etc... opte almacenar estos valores en una base de datos a traves de un sencillo formulario que cree para este fin, esto me ha ahorrado horas de programacion pero ahora me causa un problemilla menor , pero molesto

En el codigo de cada aplicacion doy el valor a una variable de skin (la "piel") para el programa y segun el valor la base filtra , encuentra y asigna su valor a cada control o formulario , todo esta muy bien pero en el proceso de recuperacion de los valores los formularios hacen un "pestañeo" (no se como llamarlo) en el que se muestran incompletos o muestran objetos que se suponen invisibles, hasta que la funcion apropiada recupera los valores de cada control desde la base de datos, he tratado de hacer invisible el form, mientras se acomodan y asignan los valores y mostrarlo al terminar pero no funciona , pues el formulario aparece en cuanto algun control recupera su valor de visible a true no se si podrian darme alguna idea de como mantener invisible el formulario hasta que se catgen todos los valores o como presentar una pantalla del tipo "Espere un momento"

Se que es una simpleza pero me ha traido de cabeza un par de dias

Saludos

imported_chiaravel · #2 (**permalink**) 10-09-2005, 22:50:18

Por supuesto...

La ayuda la tienes muy sencilla.

Toma nota de los valores reales de Width y Height de tu formulario (ancho y alto) y mientras todo se esta dibujando setealo al minimo valor permitido, de esa forma tu formulario no sera "invisible" pero dudo que alguien puede reconocerlo ya que tendra un tamaño poco reconocible.

Otra alternativa es jugar con los valores TOP y LEFT y sacarlo de pantalla.

Supongo que con eso podras lograr tu cometido.

Saludos

MiguelS · #3 (**permalink**) 11-09-2005, 04:30:35

Cuando lo haces?
Si lo haces en Form_Load los cambios se deberian hacer antes de que el formulario sea visible.

acalanto · #4 (**permalink**) 11-09-2005, 06:44:55

Totalmente de acuerdo con MiguelS. Todo el código de inicialización del formulario (Poner controles, quitar, ocultar, cambiar fondo etc..), debes hacerlo en el evento Load y al final del mismo, DoEvents y Refresh del formulario.

imported_chiaravel · #5 (**permalink**) 11-09-2005, 11:32:19

Creo que tanto Miguel como Leonardo no tienen en cuenta que mientras se ejecuta el evento load y aun no estan visibles los controles, los mismos no estan cargados en memoria y es por eso que no se pueden resetear.

Saludos

MiguelS · #6 (**permalink**) 11-09-2005, 11:53:47

Prueba poner un 2 botones y escribir

Código:

Private Sub Form_Load()
Command1.Width = Command1.Width * 2
Command2.Visible = False
End Sub

Un boton cambia de ancho y el otro es invisible y no veo ningun prolema.

imported_chiaravel · #7 (**permalink**) 11-09-2005, 14:25:17

Mil Perdones... tienen razon.. me he confundido.. se que algunas propiedades no son SETEABLES hasta no estan visibles los controles y es por eso que me he confundido.

Saludos

dagoba77 · #8 (**permalink**) 12-09-2005, 01:10:30

Hola gracias por la ayuda efectivamente no puedo establecer las propiedades de los controles mientras se crga el formulario (el load) debido a que utilizo una instruccion como esta

Código:

  


set f  as screen. activeform ' aqui ya nececito el formulario activo


for each t in f 

"instrucciones en bucle"



next

Por el otro lado me parece muy ingenioso lo de clocar el formulario fuera de pantalla , lo intentare y envio comentarios

Gracias