Progress - COMO CAMBIAR IMAGENES EN PROGRESS

 
Vista:
sin imagen de perfil

COMO CAMBIAR IMAGENES EN PROGRESS

Publicado por ROCIO (1 intervención) el 19/11/2009 02:21:58
Hola a todos, resulta que estoy haciendo un proyecto en Progress 8 (es de compra-venta) y
1- quiero que cambie la imagen del articulo conforme vaya avanzando o retrocediendo y que coincida con la descripcion que ya les asigne.

2- quisiera agregar un combo box en una pantalla, y que en vez de teclear la especificacion, quiero usar el combo para que pueda seleccionarlo. Ya les asigne los items, pero no se como codificarlo o hacer que cambie

Espero sus respuestas, por su atencion gracias =)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:COMO CAMBIAR IMAGENES EN PROGRESS

Publicado por Ricardo (18 intervenciones) el 08/12/2009 17:27:33
No se si todavia te sirva pero lo puedes hacer asi:

en las Definiciones:

DEFINE TEMP-TABLE ttImagenes NO-UNDO
FIELD ttConsecutivo AS INTEGER
FIELD ttNombreImagen AS CHARACTER
INDEX idxImge ttConsecutivo.

/* en el MAIN BLOCK */

CREATE ttImagenes.
ASSIGN
ttImagenes.ttConsecutivo = 1
ttImagenes.ttNombreImagen = "adeicon/admin%.ico".

CREATE ttImagenes.
ASSIGN
ttImagenes.ttConsecutivo = 2
ttImagenes.ttNombreImagen = "adeicon/cnfginfo.ico".

/* tambien en el Main block, al final para llenar el comobox */

cbImg:LIST-ITEMS IN FRAME {&FRAME-NAME} = "".
FOR EACH ttImagenes NO-LOCK:
cbImg:ADD-LAST(ttImagenes.ttNombreImagen).
END.

/* en el CHOOSE del boton "primero" */

FIND FIRST ttImagenes NO-ERROR.
IF AVAILABLE ttImagenes THEN
imImagen:LOAD-IMAGE(ttImagenes.ttNombreImagen).

/* en el CHOOSE del boton "ultimo" */

FIND LAST ttImagenes NO-ERROR.
IF AVAILABLE ttImagenes THEN
imImagen:LOAD-IMAGE(ttImagenes.ttNombreImagen).

/* en el VALUE-CHANGED del combo box (cbImg) */
imImagen:LOAD-IMAGE(INPUT FRAME {&FRAME-NAME} cbImg).
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar