Hola, jeje...
Haces lo que explicaste anteriormente y a eso le añades esto:
APP, Global Properties, Classes, [Browser]
Pestaña EIP. Template Interface: Detailed
y cierras el Global Properties pulsando [Ok] a todo
!Browse Procedure, Embed point
!EIP Manager for Browse Using ?LIst (BrowseEIPManager)
!- ResetColumn PROCEDURE,VIRTUAL,PROTECTED
!-- CODE - Priority 5,001
IF Self.Column = 5 !Numero de columna dentro del List
SELF.EQ.Control.FEQ{PROP:Xpos} = SELF.EQ.Control.FEQ{PROP:Xpos} - 9
END
!Sobre uno de los Update Butons, Insert, Change o Delete, pulsas boton derecho y seleccionas Actions
!Se entiende que tienes marcado "Use Edit in Place"
!Pulsas [Configure Edit in place], Column Specific
!Seleccionas la Columna y pulsas [Properties]
!General
![Check] Allow Edit-In-Place
!Type: Check
!Text: "
!Justification: Default
!True: 1, False: 0
![Check] Transparent !No se si esto es necesario, pero lo tengo marcado
!y cierras pulsando [Ok] a todo
Observaciones:
- Esto es un efecto optico, el -9 en la posicion puede variar en funcion del ancho de la columna, suelo usar un ancho de 10 y sin la opcion "Resizeable"
- Para que el efecto quede bien, conviene que el Check sea el último campo del EIP o no te mostrara el resultado hasta q la termines.
Compilas y a correr ...