Como saber o resultado do browse?

[JoséQuintas]

Após o browse da hwgui, como não tem LastKey() ou algo assim, como saber se foi selecionado ou não?
Só criando uma variável ou tem outra opção?

[JoséQuintas]

Por enquanto quebrei o galho assim.

Código: Selecionar todos

   @ 11, 101 BROWSE ARRAY oBrowse ;
      SIZE AppWindowRect( 3 ) - 10 - 10, AppWindowRect( 4 ) - 10 - 100 STYLE WS_BORDER + WS_VSCROLL + WS_HSCROLL + DS_CENTER ;
      ON CLICK { || lSelected := .T., oDlg:Close() }

Código: Selecionar todos

STATIC FUNCTION oBrowseKey( oDlg, oBrowse, nKey, cFilter, lSelected )

   nKey := hb_KeyStd( nKey )
   DO CASE
   CASE nKey == VK_RETURN .OR. nKey = VK_ESCAPE
      IF nKey == VK_RETURN
         lSelected := .T.
      ENDIF   
      oDlg:Close()
      RETURN .F.

[alxsts]

Olá!

Se alguma linha for selecionada, oBr:aSelected conterá uma cópia das colunas da linha selecionada.

[JoséQuintas]

Código: Selecionar todos

   ACTIVATE DIALOG oDlg CENTER

   IF Len( oBrowse:aSelected ) != 0
      MsgExclamation( "Tem coisa em aSelected" )
   ENDIF
   IF lSelected .AND. bCode != Nil

Usando essa variável não dá certo, o retorno é sempre Nil.

[Fernando queiroz]

Código: Selecionar todos

			@ 157,9 OWNERBUTTON oOwnerbutton3  OF oPanel1  SIZE 73,63 ;
					ON CLICK {|| ::MANUTENCAO_EXCLUI( LTRIM(str(oPage1:oBrowse1:aArray[ oPage1:oBrowse1:nCurrent, 1]))) , oPage1:oBrowse1:aArray := ::MANUTENCAO_CARREGA( "ORDER BY " + cAlvo_Consulta ), ::MANUTENCAO_onDlgInit( oDlg), obrowse1:REFRESH() };
					FLAT  ;
					TEXT 'Exclui' COLOR 16777215  ;
					COORDINATES 0, 40, 0, 0  ;
					BITMAP HBitmap():Addresource('delete-256-30')    ;
					COORDINATES 0, 5, 0, 0  ;
					TOOLTIP 'Exclui Produtos'
					oOwnerbutton3:aStyle := OwnerbuttonStyle

oPage1:oBrowse1:aArray[ oPage1:oBrowse1:nCurrent, 1]

ai eu estou passando para o metodo a variavel que eu quero do browse, no caso estou passando o array oPage1:oBrowse1:aArray
indexado com o primeiro campo [ oPage1:oBrowse1:nCurrent, 1]