Expliquemos:
Inicialmente en la instrucción 0020, debemos abrir el dispositivo SYSGUI
En la instrucción 0030 con el comando RESOPEN abrimos el archivo
de recurso. Note que se debe digitar toda la ruta donde se encuentra el archivo
de recurso ya que con este comando no se toma en cuenta los directorios definidos
en el PREFIX.
La instrucción 0040 almacena la información del archivo de recurso en la variable h$.
Los parámetros utilizados son los siguientes:
h = Variable utilizada para abrir el recurso .brc
1 = Grupo al que pertenece el recurso y que pueden ser los siguientes:
1=Window
2=Menu
4=Child Window
5=Image List
101= ID asignado al recurso que estamos desplegando (o cámbielo por el que usted usó).
Hagamos un programa para mantenimiento
Ingrese al ResBuilder y Cree un nuevo archivo
de recurso, agregue una forma principal al área de edición seleccionando el
ícono Form de la vista de árbol y botón derecho para seleccionar la opción
"Add". Especifique en la página de propiedades de la nueva forma
las siguientes propiedades.
Title Ejercicio 1
Form ID 101
Name frm_Ejercicio
Currents Units Semi-chars
X position 50
Y position 60
Width 250
Height 200
Flags Close box, Enter as Tab, Keyboard navigation, minimizable
Has Status Bar Yes
Agregue un control static text con las siguientes propiedades
Control ID 102
Name lbl_Cliente
Text Cliente
X position 12
Y position 30
Width 45
Height 12
Font MS Sans Serif, Normal, 8
Agregue otro control static text con las siguientes propiedades
Control ID 103
Name lbl_Nombre
Text Nombre
X position 12
Y position 47
Width 45
Height 12
Font MS Sans Serif, Normal, 8
Agregue otro control static text con las siguientes propiedades
Control ID 104
Name lbl_Direccion
Text Dirección
X position 12
Y position 68
Width 45
Height 12
Font MS Sans Serif, Normal, 8
Agregue otro control static text con las siguientes propiedades
Control ID 105
Name lbl_Telefono
Text Teléfono
X position 12
Y position 89
Width 45
Height 12
Font MS Sans Serif, Normal, 8
|