Ver Mensaje Individual
  #2
Antiguo 9 de agosto de 2019, 16:17
Kuk
Administrador
Última Actividad 21.09.2026 18:24
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

dmosca, debe ser algo así :

Código COBOL:
  1.  01  IDX-1              PIC S9(9) COMP-5.
  2.  01  lItem OBJECT REFERENCE POW-CLISTITEM.
  3.  PROCEDURE DIVISION.
  4.      
  5.      MOVE "Count"            OF CmListView1 TO IDX-1
  6.      MOVE "ListItems"(IDX-1) OF CmListView1 TO lItem
  7.      
  8.      MOVE POW-TRUE TO "Selected" OF lItem
  9.      
  10.      INVOKE lItem "EnsureVisible"
  11.      

Lo he escrito en Notepad++ así que posiblemente no compile, pero la idea está ahí



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita