Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   PowerCOBOL (ActiveX, v4 - v11) (https://www.cobolforo.es/forumdisplay.php?f=9)
-   -   [Sintaxis] Modificar Propiedades de un FORM (https://www.cobolforo.es/showthread.php?t=146)

Rapinto 4 de junio de 2015 22:28

Kuk,

Não sei se já alguma vez, contaste o tempo que demora a mais a carregar uma Listview, fazendo o THRUEVENTS em todas as linhas!!! Chega a demorar 3 ou 4 vezes mais. Já tive casos de 10x mais (1 minuto para 10 minutos).

Eu uso um contador, e faço o thruevents de x em x linhas, por exemplo 30 ou 50. Alem disso temos que ter cuidado, pois o THRUEVENTS (no Visual Basic - DoEvents) executa tudo o que estiver pendente para processar.
Assim se entretanto o operador carregou num botão da form o programa vai executar o click do botão e pode estragar o carregamento. Imagina que por exemplo o botão tem um Clear da LISTVIEW!!! Ou que o operador fecha a form em cima no X vermelho!!!!

Saludos,
Rui Pinto

Kuk 5 de junio de 2015 09:20

Rapinto, llevas razón. Si son muchos los datos a cargar, el ThruEvents hay que hacerlo cada x registros. O también, se puede hacer carga de X registros y el resto a petición (un Boton con texto "Cargar más..." o algo así.

Pero en cuando al segudno problema que dices, es teoricamente posible, pero en un CallForm, si además hacemos:

Código COBOL:
  1.  MOVE POW-FALSE   TO "Enabled"      OF POW-SELF
  2.  MOVE POW-MP-WAIT TO "MousePointer" OF POW-SELF
  3.  
  4.  ...BUCLE
  5.  
  6.  MOVE POW-TRUE       TO "Enabled"      OF POW-SELF
  7.  MOVE POW-MP-DEFAULT TO "MousePointer" OF POW-SELF

No habrá posibilidad de hacer click ni nada, porque el Form esta bloqueado. Asi evitamos problemas ;)


La franja horaria es GMT +2. Ahora son las 08:32.

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