Cursor sumindo

[bencz]

Olá... (:

Estou com um problema aqui, e não estou conseguindo resolver... bom... procurei aqui no forum, e pude notar, que nao sou o primeiro a ter este problema, só que as soluções postadas no forum, nao me ajudaram... pois bem
quando eu abro uma nova janela, e depois fecho ela, o cursor do edit multiline desaparece.... e nao consigo restaurar o cursos, entao, como posso fazer ?

[bencz]

bom, estava aqui pensando, se tiver alguma forma de "reiniciar" o form, usando o on other message, seria muito bom (:

Falando nisso, como sei os parametros do on other message ?

Aqueles O, X, K ..... ??

Código: Selecionar todos

ON OTHERMESSAGE {| o, w, l } fnc(o w l) }

como o posso saber, oq cada parametro desse é ?

[sygecom]

Tem como postar um exemplo que eu possa compilar aqui e testar ? assim podemos identificar o erro e tentar ajustar.

[esbasso]

se esta usando somente a HWGUI dificilmente isso ocorre
se esta utilizando mesclado com outroa lib grafica então verifique teu codigo

[bencz]

Bom... isso acontece, qnd eu estou trabalhando em uma janela WVW e abro uma janela com HWGUI, e a-partir da janela HWGUI, eu chamo uma dialog WVW, dai, qnd eu fecho a dialog WVW, o cursor some ;x

[bencz]

Bom, montei um exemplo aqui, para vocês verem, como o cursor some, mas, qnd eu aperto TAB, e vou p/ um outro TextBox, o cursor volta...

Código: Selecionar todos

#include "hwgui.ch"

function main()
		 WVW_SETTITLE(, "OLA")
		 
		 gen_hwgUI()
return nil

function teste_atalho()
		 WVW_SetMainCoord( .t. )
  		 WVW_nOpenWindow("MEU TESTE",10,20,20,50)

		 @ 11,21 SAY "OLA MUNDO"
		 @ 13,21 SAY MAXROW()+1
		 @ 14,21 SAY MAXCOL()+1

		 wait

		 WVW_lCloseWindow()
return nil

function gen_hwgUI()
		 LOCAL  vEdit1 := "", vEdit2 := "", vEdit3 := ""
		 LOCAL oEdit1, oEdit2, oEdit3, oButton1

	  	 INIT DIALOG oDlg TITLE "Form1" ;
	     AT 0,-130 SIZE 216,110 NOEXIT  ;
	     STYLE WS_POPUP+WS_CAPTION+WS_SYSMENU+WS_SIZEBOX+DS_CENTER
	     
	     SET KEY 0, VK_F12 TO teste_atalho()

		 @ 13,15 GET oEdit1 VAR vEdit1 SIZE 80,22
		 @ 13,44 GET oEdit2 VAR vEdit2 SIZE 80,22
		 @ 13,74 GET oEdit3 VAR vEdit3 SIZE 80,22
		 @ 117,14 BUTTON oButton1 CAPTION "Sair"   SIZE 90,30 ;
		   STYLE WS_TABSTOP   ;
		   ON CLICK {|| oDlg:Close() }

	     ACTIVATE DIALOG oDlg
return nil

[bencz]

E utlizando esse mesmo codigo... já é possivel apresentar o erro do VALID ( q acontece comigo... )

fiz o seguinte no oEdit3

Código: Selecionar todos

		 @ 13,74 GET oEdit3 VAR vEdit3 SIZE 80,22 VALID {|| MsgInfo("ola") }

E qnd dou um tab nele, nada acontece ;x

[esbasso]

voce não pode por no mesmo fonte codigo de telas hwgui e codigo de telas da outra lib
a hwgui tem de estar num prg separado

[bencz]

Bom, eu fiz isso, coloquei o código HWGUI em um arquivo e o código WVW em outro, mas, quando fecho a tela WVW, o cursos continua sem aparecer, no textbox, q antes, estava com o cursor. :X

[bencz]

Bom, pude reparar, que o cursor some, mas qnd eu digito, ele digita tanto no textbox, qnt no console ;x

[esbasso]

voce não pode chamar uma tela wvw de dentro de uma tela hwgui
sempre tem de ser o contrario

[bencz]

Ok (:
Muito obrigado pela a sua ajuda e paciência comigo (: