Procedimiento GML MODE
Sintaxis
CALL "GML::MODE"
Propósito:
Cambia el grid principal a modo "solo lectura".
Nota:
El valor del GML_TPL.OPTION% determina el modo del grid. Un valor de 0 indica
un modo normal con el estatus de edición de las celdas determinado por
el valor de GML_TPL.E_MODE%[c] para cada celda individual. Un GML_TPL.OPTION% con
valor de 1 pone el grid en modo de solo lectura temporalmente sobre escribiendo
el valor de las variables GML_TPL.E_MODE%[c] para las celdas. Este procedimiento
es válido solo cuando se aplica a la celda principal (GML_TPL.MEMBER%=1).
Ejemplo A:
El grid principal en el set de grid es fijado a 1 para modo de solo lectura.
2400 GML.SET%=1
2410 CALL "GML::TPL_PREP"
2420 GML_TPL.OPTION%=1
2430 CALL "GML::MODE"
Ejemplo B:
El grid principal en el set de grid es fijado a 2 para modo de solo lectura y el
grid texto y colores de fondo también son cambiados para todas las celdas
en el grid principal.
2400 GML.SET%=2
2410 CALL "GML::TPL_PREP"
2420 GML_TPL.OPTION%=1
2430 GML_TPL.COL_N%=-1
2440 GML_TPL.ROW_N%=-1
2450 GML_TPL.T_COLOR$[1]=GML.DKGRAY$
2460 GML_TPL.B_COLOR$[1]=GML.LTGRAY$
2470 CALL "GML::MODE"
Opción:
El procedimiento MODE normalmente redibuja el grid. Fijando GML_TPL.DEF_FLAG%
a un valor de 1, prevendrá el procedimiento ejecutar el redibujo.
Procedimiento GML NEXT
Sintaxis
CALL "GML::NEXT"
Propósito:
Mueve la celda marcada en el grid principal a la siguiente celda del grid. Los
nuevos valores de fila y columna de la celda marcada son localizados en las variables GML_TPL.ROW_N% y GML_TPL.COL_N%.
Nota:
Si no hay celdas dentro del grid seleccionado, entonces la celda marcada es
fijada a la primera celda en el grid. Este procedimiento es válido solo
cuando se aplica al grid principal. (GML_TPL.MEMBER%=1).
Ejemplo:
2400 GML.SET%=1
2410 CALL "GML::TPL_PREP"
2420 CALL "GML::NEXT"
Opción:
El procedimiento NEXT normalmente mueve la celda marcada a la siguiente celda
editable del grid. Fijando GML_TPL.OPTION% a valor 1 moverá la celda
marcada a la siguiente celda editable o no editable.
|