08.05.2013 Views

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

|<br />

|<br />

|<br />

|<br />

|<br />

|<br />

|<br />

Left<br />

Especifica la coordenada, en pixels, desde el borde izquierdo del objeto o pantalla<br />

que contiene este componente.<br />

Tipo Numérico<br />

Se aplica a los componentes<br />

ActiveX Control de animación Calendario Lienzo<br />

Recuadro de selección Recuadro de<br />

Referencia a<br />

Contenedor<br />

combinación<br />

componente lógico<br />

Cliente DDE Campo de entrada Gráfica Pulsador gráfico<br />

Recuadro de grupo Barra de<br />

desplazamiento<br />

horizontal<br />

Imagen Bean Java<br />

Recuadro de lista Medios Panel de medios Edición de múltiples<br />

líneas<br />

Cuaderno Interfaz ODBC/JDBC Recuadro de contorno Barra de progreso<br />

Pulsador Botón de selección Graduador Selector cíclico<br />

Texto estático<br />

Ventana<br />

Subarchivo Temporizador Barra de<br />

desplazamiento<br />

vertical<br />

Códigos de operación<br />

SETATR*<br />

Operativo en tiempo de ejecución<br />

sí<br />

GETATR sí<br />

*Nota: Puede definirse utilizando el cuaderno de propiedades en el<br />

diseñador GUI.<br />

Valor permitido<br />

Número de pixels<br />

Ejemplo de formato libre<br />

Mover un componente a la izquierda en su ventana:<br />

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

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

*<br />

C EVAL leftside = %getatr('win01': 'image1': 'Left')<br />

C EVAL %setatr('window': 'part': 'Left') =<br />

leftside - 120<br />

*<br />

Ejemplo de formato fijo<br />

Mover un pulsador 200 pixels a la derecha:<br />

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

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

*<br />

C 'PB01' GETATR 'LEFT' OldLeft 2 0<br />

C OldLeft ADD 200 NewLeft 2 0<br />

C<br />

*<br />

'PB01' SETATR NewLeft 'LEFT'<br />

272 <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!