PC Toledo

Bom dia Amigos .. acho q vou incomodar bastante aqui até pegar no tranco de vez hehehe

tenho um get de pesquisa dentro de um browse, funciona perfeitamente ... porem não consigo fazer ele sair do get e dar foco no browse com o <enter> somente com <tab> ... está assim :

Código: Selecionar todos


		@ 655,27 GET oEdit1_pesquisar VAR vEdit1_pesquisar OF oPanel1 PICTURE "@!" SIZE 371,22 MAXLENGTH 30 ;
		   VALID {|| If( hwg_GetKeyState( VK_RETURN ) < 0, ;  
		   ( oBrw:SetFocus(), .f. ), .t. ) } ;  
		   ON CHANGE {|| BuscaPorContemCliente(oEdit1_pesquisar:GetText(), oBrw), .t. }; // Pesquisa dinâmica
		   STYLE WS_TABSTOP

  		  BrowserCliente()

Abraço!

Deivid

Não sei se mudou algo desde a versão 2.17 que uso, mas para este efeito basta colocar a cláusula CLIPPER na construção da janela.

Código: Selecionar todos

  INIT DIALOG oDlgMDFeMain TITLE "Manifesto de Documentos Fiscais - Eletrônico" ;
  ICON HIcon():AddResource(100)  ;
  AT 0, 0 SIZE 1024,700 ;
  FONT HFont():Add( 'Segoe UI Semibold',0,-11,600,,,) CLIPPER  NOEXIT  ;
  STYLE WS_POPUP+WS_CAPTION+WS_SYSMENU+DS_CENTER ;
  ON INIT {|| SetTransparent( hWin, 200 ) }
  Thisform := oDlgMDFeMain

Tá igual.
Até postei fonte naquele outro tópico "SAIR COM ESC".
Como era sobre menu, não olhou se tinha algo mais.

Código: Selecionar todos

STATIC FUNCTION gui_DialogCreate( xDlg, nRow, nCol, nWidth, nHeight, cTitle, bInit, lModal )

   IF Empty( bInit )
      bInit := { || Nil }
   ENDIF
   INIT DIALOG xDlg ;
      CLIPPER ;
      FONT oFont ;
      NOEXIT ;
      TITLE     cTitle + " (" + GUI():LibName() + ")"  ;
      AT        nRow, nCol ;
      SIZE      nWidth, nHeight ;
      BACKCOLOR COLOR_WHITE ;
      ON INIT bInit

   (xDlg);(lModal)

   RETURN Nil

Olá!

#xcommand INIT DIALOG <oDlg> ;
[<res: FROM RESOURCE> <Resid> ] ;
[ TITLE <cTitle> ] ;
[ AT <x>, <y> ] ;
[ SIZE <width>, <height> ] ;
[ ICON <ico> ] ;
[ BACKGROUND BITMAP <oBmp> ] ;
[ STYLE <nStyle> ] ;
[ FONT <oFont> ] ;
[ <bclr: BACKCOLOR, COLOR> <bColor> ] ;
[<lClipper: CLIPPER>] ;
[<lExitOnEnter: NOEXIT>] ; //Modified By Sandro
[<lExitOnEsc: NOEXITESC>] ; //Modified By Sandro
[ <lnoClosable: NOCLOSABLE> ] ;
[ ON INIT <bInit> ] ;
[ ON SIZE <bSize> ] ;
[ ON PAINT <bPaint> ] ;
[ ON GETFOCUS <bGfocus> ] ;
[ ON LOSTFOCUS <bLfocus> ] ;
[ ON OTHER MESSAGES <bOther> ] ;
[ ON EXIT <bExit> ] ;
[ HELPID <nHelpId> ] ;

Saudações,
Itamar M. Lins Jr.

Meu diálog já está com o parâmetro CLIPPER .. e mesmo assim não sai .. nas pesquisas que fiz no fórum tinha visto este detalhe do parâmetro Clipper e do style stoptab..

Olá!
Se for o ULTIMO não sai mesmo.
Sai do primeiro até o penúltimo.

Se o dialog tiver só 1 get, vc precisa colocar mais um o tal get fantasma.

E no ultimo também. Quando tem vários gets,

Saudações,
Itamar M. Lins Jr.

deividdjs escreveu:Meu diálog já está com o parâmetro CLIPPER .. e mesmo assim não sai .. nas pesquisas que fiz no fórum tinha visto este detalhe do parâmetro Clipper e do style stoptab..

Este GET tem alguma cláusula WHEN ou VALID que talvez esteja brecando o processo ?

alaminojunior escreveu:
deividdjs escreveu:Meu diálog já está com o parâmetro CLIPPER .. e mesmo assim não sai .. nas pesquisas que fiz no fórum tinha visto este detalhe do parâmetro Clipper e do style stoptab..
Este GET tem alguma cláusula WHEN ou VALID que talvez esteja brecando o processo ?

Código: Selecionar todos

  @ 655,27 GET oEdit1_pesquisar VAR vEdit1_pesquisar OF oPanel1 PICTURE "@!" SIZE 371,22 MAXLENGTH 30 ;
         VALID {|| If( hwg_GetKeyState( VK_RETURN ) < 0, ;  
         ( oBrw:SetFocus(), .f. ), .t. ) } ;  
         ON CHANGE {|| BuscaPorContemCliente(oEdit1_pesquisar:GetText(), oBrw), .t. }; // Pesquisa dinâmica
         STYLE WS_TABSTOP

tem um VALID .. q inclusive está forçando a saida dele com o <enter> :\

complicado esse tal de GUI hheheeh

abs,

Não consigo agora testar nem mentalmente esse bloco de código, então sugiro ir por partes, remova esta cláusula valid e change e vá testando.

Amanhã consigo te enviar o código que uso para este tipo de pesquisa

Itamar M. Lins Jr. escreveu:Olá!
Se for o ULTIMO não sai mesmo.
Sai do primeiro até o penúltimo.

Se o dialog tiver só 1 get, vc precisa colocar mais um o tal get fantasma.

E no ultimo também. Quando tem vários gets,

Saudações,
Itamar M. Lins Jr.

boa noite Itamar ... como assim get fantasma ? então se eu tiver somente um get no dialog ele não sairá e dará foco em outro objeto no meu caso (oBrw) com a tecla enter ?? e como eu faria esse get fantasma ??

Abraço,

alaminojunior escreveu:Não consigo agora testar nem mentalmente esse bloco de código, então sugiro ir por partes, remova esta cláusula valid e change e vá testando.

eu fiz isso .. deixei o get pelado .. .e mesmo assim ele só sai dele e dá foco no browse com o <TAB> com o <ENTER> não ocorre nada !!

PC Toledo

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB

SAIR DO GET COM ENTER AO INVES DE TAB