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

Valor permitido Uno de los siguientes: 0 No se conecta el panel de ampliación o se oculta el panel de reproducción. 1 Se conecta el panel de ampliación o se muestra el panel de reproducción. Ejemplo de formato libre *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C * EVAL oldval = %getatr('window': 'MMP1': 'Panel') C * EVAL %setatr('window': 'MMP1': 'Panel') = 1 Ejemplo de formato fijo *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C 'MMP1' GETATR 'PANEL' OldVal 1 0 C * 'MMP1' SETATR 1 'PANEL' 316 VisualAge RPG Manual de consulta de componentes

PanelItem Devuelve un valor que indica el último botón que se ha cambiado en un panel de medios. Un botón se puede cambiar pulsando sobre el mismo con el ratón o estableciendo el atributo PanelMode. Puede establecer la verificación de este atributo cuando el usuario haya pulsado uno de los botones del panel de medios. De este modo se producirá un evento Press. A continuación puede utilizar el atributo PanelItem de la subrutina de acción Press para determinar la función que debe llevarse a cabo. Tipo Numérico Se aplica a los componentes Panel de medios Códigos de operación SETATR Operativo en tiempo de ejecución no GETATR sí Valor devuelto Estado del último botón del panel de medios que se ha pulsado: 0 No se ha pulsado ningún botón 1 Pause (Pausa) 2 Play (Reproducir) 3 Grabar 4 Stop (Parar) 5 Pista siguiente 6 Pista anterior 7 Índice siguiente 8 Índice anterior 9 Volumen 10 Posición Capítulo 2. Atributos de componente 317

Valor permitido<br />

Uno de los siguientes:<br />

0 No se conecta el panel de ampliación o se oculta el panel de<br />

reproducción.<br />

1 Se conecta el panel de ampliación o se muestra el panel de<br />

reproducción.<br />

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<br />

*<br />

EVAL oldval = %getatr('window': 'MMP1': 'Panel')<br />

C<br />

*<br />

EVAL %setatr('window': 'MMP1': 'Panel') = 1<br />

Ejemplo de formato fijo<br />

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

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

*<br />

C 'MMP1' GETATR 'PANEL' OldVal 1 0<br />

C<br />

*<br />

'MMP1' SETATR 1 'PANEL'<br />

316 <strong>VisualAge</strong> <strong>RPG</strong> Manual de consulta de componentes

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

Saved successfully!

Ooh no, something went wrong!