FiveTech Software tech support forums

... 21.04, ahora solucionado. https://forums.fivetechsupport.com/viewtopic.php?f=3&t=43494 * Nuevo: Nueva función EnumWindows( bEnumWindow [,nLParam] ). Enumera todas las ventanas de nivel superior de la pantalla pasando el manejador de cada ventana, a su vez a un bloque de código donde se ...

... crashing since version 2104 now fixed. https://forums.fivetechsupport.com/viewtopic.php?f=3&t=43494 * New: function EnumWindows( bEnumWindow [,nLParam] ). Enumerates all top-level windows on the screen by passing the handle to each window, in turn, to a codeblock where the handle of each window ...

METHOD HandleEvent( nMsg, nWParam, nLParam ) CLASS TCalendar

// TODO: Verify others messages

if nMsg==WM_LBUTTONUP
::Super:HandleEvent( nMsg, nWParam, nLParam )
endif
return nil



wich is the message for doubleclick ? ( wm_ ?)

... HandleEvent() method and add support for such event CLASS TMyWindow FROM TWindow   CLASSDATA lRegistered   METHOD HandleEvent( nMsg, nWParam, nLParam )   METHOD Notify( nIdCtrl, nPtrNMHDR ) // Common controls notificationsENDCLASSMETHOD HandleEvent( nMsg, nWParam, nLParam ) ...

hi Antonio,

Antonio Linares wrote:You have to inherit a new class from TWindow and redefine the Method HandleEvent( nMsg, nWParam, nLParam )

Ok, thx i will try it

Dear Jimmy, You have to inherit a new class from TWindow and redefine the Method HandleEvent( nMsg, nWParam, nLParam ) CLASS TMyWindow FROM TWindow   CLASSDATA lRegistered      METHOD HandleEvent( nMsg, nWParam, nLParam ) ENDCLASSMETHOD HandleEvent( ...

...  // ::nOption := nOption         //  use last from LVN_ITEMCHANGED         EVAL( ::bClick, ::nOption, Self )      ENDIF   ENDIF instead of nLParam i have to use nPtrNMHDR

... nIdCtrl, nPtrNMHDR ) CLASS TGridLOCAL nCode   := GetNMHDRCode( nPtrNMHDR )LOCAL nWParam := GetWParam(    nPtrNMHDR )LOCAL nLParam := GetLParam(    nPtrNMHDR )   CASE nCode == LVN_KEYDOWN      if GETGRIDVKEY(nLParam) = 13 but it crash here :( HB_FUNC ( ...

Enrico, I will remember that we changed for a similar case
METHOD HandleEvent( nMsg, nWParam, nLParam ) CLASS TControl
case nMsg == WM_SYSCOMMAND
return ::SysCommand( nWParam, nLoWord( nLParam ), nHiWord( nLParam ) )
Best regards,
Otto

... PASSWORD IS SHOWN IF PASTED CLASS TPGet FROM TGET DATA CTRL_V AS CHARACTER METHOD KeyChar( nKey, nFlags ) METHOD HandleEvent( nMsg, nWParam, nLParam ) ENDCLASS ********************* METHOD KeyChar( nKey, nFlags ) CLASS TPGet SELF:CTRL_V := 'N' IF NKEY = K_CTRL_V //** NKEY=22 Ctrl-V PASTE ...

... reference 'NMSG' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'SELF' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NLPARAM' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NLPARAM' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NWPARAM' ...

... reference 'NMSG' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'SELF' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NLPARAM' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NLPARAM' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NWPARAM' ...

... Replace(cField,uValue) METHOD Commit(cWhere) METHOD AppendBlank() INLINE ::lAppend:=.T. METHOD InsertInto() METHOD HandleEvent(nMsg, nWParam, nLParam ) EXTERN ; WndHandleEvent( Self, nMsg, nWParam, nLParam ) METHOD End() ENDCLASS METHOD New( cSql,lLoad, oDataBase) CLASS Ttable DEFAULT lLoad:=.T. ...

... ) Called from: .\_a_say_dinamico.prg => MAIN( 37 ) Luego entonces cambie el return de los metodos Return ::Super:HandleEvent ( nMsg, nWParam, nLParam ) y Return ::Super:Destroy () y ya FUNCIONA Gracias

Hello, developing a program, I see that the that the bUpdate of TEdit is never called, I found the problem on METHOD Command( nWParam, nLParam ) CLASS TDialog: METHOD Command( nWParam, nLParam ) CLASS TDialog   local oWnd, nNotifyCode, nID, hWndCtl, oCtrl   nNotifyCode ...