Page 1 of 1
blClicked no nos funciona...
Posted: Wed Apr 12, 2006 2:10 pm
by dbzap
Al parecer este codigo ( blClicked referido al dialogo ) no esta funcionando en fwh27, pero en versiones anteriores si funconaba y nos permitia realizar algunas funciones.
DEFINE DIALOG oDlg RESNAME "CADENADOC" Of oWnd
odlg:blClicked := {|x,y| msginfo("hola" ) }
odlg:brclicked := {|| msginfo( "chao" ) }
ACTIVATE DIALOG.....
Posted: Wed Apr 12, 2006 2:17 pm
by dbzap
compilamos en programa de testmous y solo funciona un DOBLE CLICK IZQUIERDO....
estara malo ?
Posted: Wed Apr 12, 2006 4:49 pm
by Manuel Valdenebro
I believe will be better if you insert your messages in the spanish forum.
spanish translate:
Creo que es mejor que publiques tus mensajes en el Foro en Español. Está un poco mas abajo.
Posted: Wed Apr 12, 2006 5:36 pm
by Antonio Linares
Con FWH 2.7 build abril funciona ok.
Posted: Wed Apr 12, 2006 5:47 pm
by dbzap
Antonio, i modify the testmous.prg, ( i need a dialog )
But doens't work
Any Worng
(Antonio, modifique el codigo, (necesito un dialogo ), pero no funciono. )
// Testing the Mouse events
#include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------------------//
function Main()
* DEFINE WINDOW oWnd TITLE "Testing the Mouse"
DEFINE DIALOG oWnd FROM 5,10 TO 24, 55 TITLE "dialog"
oWnd:bLClicked = { | nRow, nCol, nFlags | oWnd:Say( 2, 2, "oWnd:bLClicked" ) }
oWnd:bLButtonUp = { | nRow, nCol, nFl8ags | oWnd:Say( 3, 2, "LButtonUp " ) }
oWnd:bMButtonDown = { | nRow, nCol, nFlags | oWnd:Say( 4, 2, "MButtonDown" ) }
oWnd:bMButtonUp = { | nRow, nCol, nFl8ags | oWnd:Say( 5, 2, "MButtonUp " ) }
oWnd:bRClicked = { | nRow, nCol, nFlags | oWnd:Say( 6, 2, "RButtonDown" ) }
oWnd:bRButtonUp = { | nRow, nCol, nFlags | oWnd:Say( 7, 2, "RButtonUp " ) }
oWnd:bMMoved = { | nRow, nCol, nFlags | MsgBeep() }
oWnd:bLDblClick = { | nRow, nCol, nFlags | MsgInfo( "Left Doble Click" ) }
*SET MESSAGE OF oWnd TO "Press any mouse button" CENTERED
ACTIVATE DIALOG oWnd
*ACTIVATE WINDOW oWnd
return nil
Posted: Fri Apr 14, 2006 6:31 pm
by dbzap
Antonio.
Nuestras versiones son nuevas ( no mas de 1 semana de FTDN )
el fw es 2.7 y el harbour (no xharbour) es del 8 de abril.
Gracias
Posted: Sat Apr 15, 2006 9:58 am
by Antonio Linares
Julio,
Solucionado. Os hemos enviado una librería modificada, por email.