Jump to content
Fivewin Brasil

xBrowse com 1 click (resolvido)


SAOliveira

Recommended Posts

Estou precisando do seguinte.

na linha do xBrowse, disparar para uma função assim que ela receber o focu com o click esquerdo do mouse.

- bLDClick, bRClick, bKeyDow, ... não adianta.

logofw.png

"Melhor do que inventar um produto que todo mundo use,

E fabricar um produto que todos usem, joguem fora,

e depois voltem para comprar maisâ€

Editado por - S.A.Oliveira on 27/07/2012 22:56:16

Link to comment
Share on other sites

Estou precisando do seguinte.

na linha do xBrowse, disparar para uma função assim que ela receber o focu com o click esquerdo do mouse.

- bLDClick, bRClick, bKeyDow, ... não adianta.

logofw.png

"Melhor do que inventar um produto que todo mundo use,

E fabricar um produto que todos usem, joguem fora,

e depois voltem para comprar maisâ€

Editado por - S.A.Oliveira on 27/07/2012 22:56:16

Link to comment
Share on other sites

Veja se assim ajuda.

oBrw:bWhen := {|| IF( oBrw:hWnd == GetFocus(), MsgInfo("Com Focu"), ), .T. }

Um grande Abraço

Alessandroid=blue>

FW9.07 + xHb121 + CDX

Fico feliz com os Meus erros, pois eles me apontam a direção para o acerto.id=red>

Link to comment
Share on other sites

S.A.Oliveira

Eu utilizo da seguinte maneira:

ON DBLCLICK ( lCaptura:=.T.(ou qualquer variavel de captura) , ODlg:End() )........(resto do Brose)

depois do activate dialog colocar :

if lCaptura

tcodicbo:= cbo->codicbo

endif

PS: A variavel de captura deve iniciar sendo preenchida como .f., assim quando selecionada passa a ser .t. e preenche.

FWH.11.12

E-mail:ArthurSilvestreSnt@hotmail.com

Link to comment
Share on other sites

Tente

oBrw:BLClicked := {|| msgstop("clicou")}

abraços,

citação:

Estou precisando do seguinte.

na linha do xBrowse, disparar para uma função assim que ela receber o focu com o click esquerdo do mouse.

- bLDClick, bRClick, bKeyDow, ... não adianta.

logofw.png

"Melhor do que inventar um produto que todo mundo use,

E fabricar um produto que todos usem, joguem fora,

e depois voltem para comprar maisâ€


id=quote>id=quote>

Eduardo Motta

emotta@gmail.com.br

FWH 9.09 (original) - xHARBOUR 1.2.1 (comercial e original) - SQLRDD

AJbJ

Link to comment
Share on other sites

Ela herda as propriedades da TControl, e lá tem... Bom que resolveu...

Abraços,

citação:

Eduardo na mosca.

Agora mosca branca mesmo, porque na classe nenhuma referencia ao "BLClicked"

Grato.

logofw.png

"Melhor do que inventar um produto que todo mundo use,

E fabricar um produto que todos usem, joguem fora,

e depois voltem para comprar maisâ€


id=quote>id=quote>

Eduardo Motta

emotta@gmail.com.br

FWH 9.09 (original) - xHARBOUR 1.2.1 (comercial e original) - SQLRDD

AJbJ

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...