Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
  COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Información] Ocultar columna en un ListView Josber PowerCOBOL (ActiveX, v4 - v11) 5 29 de octubre de 2016 23:12
[Sintaxis] Excel - ubicar ultima celda Gusaiello AcuCobol 1 17 de agosto de 2016 08:42
[Sintaxis] Pasar parametros por linea de Comandos Joseg PowerCOBOL (ActiveX, v4 - v11) 6 19 de abril de 2016 22:07
[Aporte] Crear un ListView Kuk Cocina PowerCOBOL V3L10 1 19 de diciembre de 2015 21:10
[Aporte] ListView con Colores Josber Cocina PowerCOBOL + WinAPI 11 27 de noviembre de 2015 14:02
Respuesta
 
Herramientas

  #1
Antiguo 9 de agosto de 2019, 03:18
IDENTIFICATION DIVISION
dmosca
 Junior
ENVIRONMENT DIVISION
Avatar de dmosca
DATA DIVISION
marzo 2017
Mendoza
05.11.2021 17:43
PROCEDURE DIVISION
Posts: 68
Enviado: 32
Recibido: 4
Soluciones: 1
Reputación: 5
dmosca is an unknown quantity at this point
Tabla Trasladar el foco a la ultima linea de un Listview

Hola Foro

como se hace para trasladar el foco a la ultima linea de un listview?
dmosca no ha iniciado sesión   Responder Con Cita
Mejores respuestas Soluciones: 2
  #2
Antiguo 9 de agosto de 2019, 16:17
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
enero 2015
Madrid
36 años
26.11.2021 19:14
PROCEDURE DIVISION
Posts: 1.892
Enviado: 613
Recibido: 800
Soluciones: 99
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado
1 usuarios han marcado este post como "Solución"

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 no ha iniciado sesión   Responder Con Cita
  #3
Antiguo 9 de agosto de 2019, 16:34
IDENTIFICATION DIVISION
dmosca
 Junior
ENVIRONMENT DIVISION
Avatar de dmosca
DATA DIVISION
marzo 2017
Mendoza
05.11.2021 17:43
PROCEDURE DIVISION
Posts: 68
Enviado: 32
Recibido: 4
Soluciones: 1
Reputación: 5
dmosca is an unknown quantity at this point
Predeterminado

Kuk buen dia

funciona ok, muchas gracias
dmosca no ha iniciado sesión   Responder Con Cita
  #4
Antiguo 9 de agosto de 2019, 16:47
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
enero 2015
Madrid
36 años
26.11.2021 19:14
PROCEDURE DIVISION
Posts: 1.892
Enviado: 613
Recibido: 800
Soluciones: 99
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

dmosca, ok.

Oye cuando encuentres soluciones, compártelo también para que sepamos si te hemos podido ayudar o no. Sobre todo que puede servir a alguien más



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 no ha iniciado sesión   Responder Con Cita
  #5
Antiguo 10 de agosto de 2019, 15:47
IDENTIFICATION DIVISION
Jorgeanna
 Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de Jorgeanna
DATA DIVISION
septiembre 2015
Buenos Aires
23.08.2021 20:18
PROCEDURE DIVISION
Posts: 11
Enviado: 0
Recibido: 10
Soluciones: 1
Reputación: 0
Jorgeanna is on a distinguished road Jorgeanna is on a distinguished road
Predeterminado
1 usuarios han marcado este post como "Solución"

otra forma para ubicarse en el ultimo registro incorporado.

Código COBOL:
  1. move "Count" OF ListaItems to Ultimo
  2. move Ultimo to "SelItemIndex" OF ListaItems  
  3. INVOKE "ListItems"(Ultimo) of ListaItems "EnsureVisible"

Última edición por Josber fecha: 10 de agosto de 2019 a las 18:02.
Jorgeanna no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
dmosca (10 de agosto de 2019)
Respuesta


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 09:24.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2021, Jelsoft Enterprises Ltd.