Práctica con ResBuilder utilizando un TAB
- Debe ingresar al ResBuilder y crear un nuevo archivo de recursos. Para eso haga
clic derecho sobre el ícono Form de la vista de árbol (mostrada a la izquierda)
y luego, con el botón izquierdo haga clic sobre la opción "Add". Con
eso nos aparece un contexto vacío que debemos empezar a adecuar tal vez con
un título e indicando SEMICHARS como unidad de medida.
- Ahora debemos seleccionar la carpetita con el TAB
de la barra de herramientas, para que seguidamente lo pintemos o coloquemos
con un nuevo clic sobre el contexto vacío, tratando de ampliarlo al tamaño que
vayamos a requerir para las carpetas. Dentro de las propiedades del TAB debemos
indicar la cantidad de carpetas que este irá a tener.
- En el menú de árbol (de la izquierda), oprimimos el botón derecho
sobre Child Window y luego damos Add. Con eso nos aparece el contexto que luego
será la superficie de una de las carpetas del TAB. Póngale un título y también
indíquele SEMICHARS como unidad de medida.
- Por un momento, fijémonos en las dimensiones (alto
y ancho) del Tab y hagamos de nuevo clic izquierdo sobre el Child Window creado.
- Debemos adecuarle el tamaño a las medidas del Child
Window de manera que sean un poco más pequeñas que las que mostró el Tab. Por
ejemplo si el Tab tiene 216x186 el Child Window podría quedar con 207x148.
- Cambiar Flags al Child Window de manera que dejemos
chequeados los parámetros Enter as Tab y No Border.
- Repetir los pasos 3, 5 y 6 hasta agregar así un
Child Window para cada carpeta del Tab, de manera que todos queden con las mismas
propiedades.
- Ahora nos posicionamos en el Form y tocamos el Botón para crear
Child Window (ubicado en la Barra de Controles de arriba y que muestra un pequeño
contexto posado sobre otro). Este nos sirve como de guía para fijar la ubicación
de los Child Windows. Una vez seleccionado, pegamos esa guía en la esquina superior
izquierda del Tab, quedándonos pintado un cuadrito a partir de donde exactamente
vamos a colocar los Child Window.
- En las propiedades de esa guía ponemos el número
de Child Window que le vamos a asociar en el campo ‘Child Window’.
- Hacer lo mismo para las otras ventanas hijas, pero colocando cada nueva guía o cuadrito,
exactamente sobre la anterior.
- Hecho lo anterior, ahora hay que ligar caja cejilla del Tab con cada Child Window.
- Pararse en el Tab.
- En propiedades, en Tab Properties anotamos un título.
- Dentro de las últimas propiedades del Tab buscamos
‘Tab prop’, escogemos el número de Tab a ligar, le ponemos un título (necesario
para la carpeta) y en Automanaged Control ID: anotamos el No. asignado al Child
Window en el Form (no en el Child Window) y le damos Ok. Repetir lo mismo para
cada carpeta.
- Finalmente, sobre el contexto de cada uno de los Child windows creados, agregue algunos
objetos a cada carpeta del Tab.
- Salvar el Tab con nombre MiPrimerTab
- Para verlo desplegado, digite y corra el siguiente programa:
Cómo desplegar un archivo de recurso .BRC desde Visual Pro/5
Ahora que ya hemos creado nuestra forma con ResBuilder, creando el archivo
de recurso MiPrimerTab.brc, veamos como se puede desplegar por medio
de Visual Pro/5 Visual Pro/5
0010 BEGIN
0020 sysgui=UNT; OPEN (sysgui)"X0"
0030 h=RESOPEN("\Basis\cursovp5\MiPrimerTab.brc")
0040 h$=RESGET(h,1,101)
0050 PRINT (sysgui)'RESOURCE'(LEN(h$)),h$
0060 ESCAPE
|