Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   PowerCOBOL (ActiveX, v4 - v11) (https://www.cobolforo.es/forumdisplay.php?f=9)
-   -   [Sintaxis] Filtro con CmEdit y evento "change" (https://www.cobolforo.es/showthread.php?t=581)

Roger 25 de febrero de 2017 16:52

Filtro con CmEdit y evento "change"
 
Amigos al poner una rutina de busqueda en el evento change del cmtext las letras de aceptacion se colocan en la primera parte ejemplo si pongo "AC" se muestra "CA" y el cursos se poseciona en la primera letra alguna forma rutina para cambiar de posecion de tal manera si escribo "CARTA" se muestre como tal y no "ATRAC".

Deseo que funcione como el evento Return en este caso sin tenerle que dar (enter).

Kuk 25 de febrero de 2017 18:50

Roger, échale un vistazo a este ejemplo de Eslopes, que se basa en un Timer: [Aporte] Ejemplo de Filtro de búsqueda (Type ahead search) - COBOL Foro

Roger 25 de febrero de 2017 22:16

Kuk este proyecto esta en powercobol3 y no se como hacerlo funcionar de todas formas lo que necesitaria son los codigos.

Kuk 25 de febrero de 2017 22:29

Roger, en el proyecto van los fuentes COBOL que puedes ver. Pero, básicamente, de lo que se trata es en evaluar el contenido del campo en un Timer, y no en el evento "Changed". Es decir, pones un CmTimer en tu Form, lo pones a 100 milisegundos y en el evento "Timer" haces algo similar a esto:

Código COBOL:
  1.  WORKING-STORAGE SECTION.
  2.  01  SV-TEXTO          PIC X(50) VALUE SPACES. *> AJUSTAR TAMAÑO
  3.  
  4.  PROCEDURE DIVISION.
  5.      
  6.      IF  POW-TEXT OF CmText1 NOT = SV-TEXTO
  7.          MOVE POW-TEXT OF CmText1 TO SV-TEXTO
  8.          
  9.          CALL "PROGRAMA_FILTRO" USING ...
  10.      END-IF

Roger 26 de febrero de 2017 14:09

Ok KUK si funciono con el timer use tus codigos.


La franja horaria es GMT +2. Ahora son las 02:49.

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