Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   PowerCOBOL (ActiveX, v4 - v11) (https://www.cobolforo.es/forumdisplay.php?f=9)
-   -   [Duda] Ocultar columna en un ListView (https://www.cobolforo.es/showthread.php?t=329)

Josber 17 de febrero de 2016 18:07
Ocultar columna en un ListView
 
Hola a tod@s,

Creo que no, pero, ¿Hay alguna manera de ocultar una columa en un ListView en tiempo de ejecución?

Muchas gracias.-

Kuk 17 de febrero de 2016 22:39
Josber, lo que yo hago es poner el ancho a 0. Pero también en el evento "Opened" bloqueo la cabecera:

Código COBOL:
  1.  01  LVM_GETHEADER                PIC S9(9) COMP-5 VALUE h"101F".              
  2.  01  WS-HANDLE                    PIC S9(9) COMP-5.                
  3.  01  RESP                         PIC S9(9) COMP-5.  
  4.  PROCEDURE DIVISION.                                               
  5.                                                                    
  6.      MOVE "hwnd" OF CMLISTVIEW1 TO WS-HANDLE                       
  7.                                                                    
  8.      CALL "SendMessageA" WITH STDCALL USING BY VALUE WS-HANDLE     
  9.                                             BY VALUE LVM_GETHEADER 
  10.                                             BY VALUE 0             
  11.                                             BY VALUE 0             
  12.                                             RETURNING RESP         
  13.                                                                    
  14.      CALL "EnableWindow" WITH STDCALL USING BY VALUE RESP          
  15.                                             BY VALUE 0             
  16.                                                                    

parmida 27 de octubre de 2016 23:46
Kuk intente ocultar como pusiste pero me da un error al compilar, estoy corriendo power 9.

Código:
Ficha.obj : error LNK2001: unresolved external symbol _SENDMESSAGEA@16
fatal error LNK1120: 1 unresolved externals
Tenes idea de lo que puede ser?

Muchas gracias!

Kuk 28 de octubre de 2016 08:31
parmida, tienes que poner en las propiedades de Script Cobol la siguiente directiva:

Código:
ALPHAL(WORD)
Luego haz Rebuild de todo el proyecto.

Nitzer 28 de octubre de 2016 12:04
Este mensaje no os va a solventar la duda planteada :)

Pero os recomiendo a todos que cuando vayais a utilizar un grid, escoged VsFlex de ComponentOne, es simplemente el mejor, al menos bajo mi punto de vista y la integración con PowerCobol (así como con otros lenguajes) es perfecta.

Espero algún día poner algún video de cosas que tengo programadas.

Rapinto 29 de octubre de 2016 23:12
Josber,

Tenho utilizado colocar "width" da coluna com zero.

Podes em "mousedown" da Listview forçar para que continue sempre a zero.

Não sei se isto te poderá resolver.
Un saludo,
Rui


La franja horaria es GMT +2. Ahora son las 23:46.

Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.