VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM VisualAge RPG Parts Reference - IBM

as400bks.rochester.ibm.com
from as400bks.rochester.ibm.com More from this publisher
08.05.2013 Views

Focus Determina si el componente tiene el foco actualmente. Cuando un componente tiene el foco, el cursor de entrada se traslada a él y la entrada del usuario se dirige hacia él. Por ejemplo, para que un usuario pueda escribir en un campo de entrada, éste debe tener el foco. Cuando un componente recibe el foco, recibe un evento GotFocus. Tipo Numérico Se aplica a los componentes Recuadro de selección Recuadro de combinación Contenedor Campo de entrada Pulsador gráfico Barra de Recuadro de lista Edición de múltiples desplazamiento horizontal líneas Cuaderno Pulsador Botón de selección Graduador Selector cíclico Subarchivo Barra de desplazamiento vertical Ventana* * Restricción: Este atributo sólo se puede establecer en tiempo de ejecución para el componente ventana en las aplicaciones Java. Códigos de operación SETATR Operativo en tiempo de ejecución sí GETATR sí Valor permitido Uno de los siguientes: 0 El componente no tiene el foco de entrada 1 El componente tiene el foco de entrada 198 VisualAge RPG Manual de consulta de componentes Nota: Este atributo sólo se puede establecer en 1.

Ejemplo de formato libre *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C EVAL %setatr('win01': 'EF1': 'Focus') = 1 * C EVAL rc = %getatr('win01': 'EF1': 'Focus') * Ejemplo de formato fijo Conmutar el foco para un componente: *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C * 'EF1' GETATR 'FOCUS' HasFocus 1 0 C * 'EF1' SETATR 1 'FOCUS' Capítulo 2. Atributos de componente 199

Ejemplo de formato libre<br />

*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />

CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />

*<br />

C EVAL %setatr('win01': 'EF1': 'Focus') = 1<br />

*<br />

C EVAL rc = %getatr('win01': 'EF1': 'Focus')<br />

*<br />

Ejemplo de formato fijo<br />

Conmutar el foco para un componente:<br />

*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />

CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />

*<br />

C<br />

*<br />

'EF1' GETATR 'FOCUS' HasFocus 1 0<br />

C<br />

*<br />

'EF1' SETATR 1 'FOCUS'<br />

Capítulo 2. Atributos de componente 199

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!