FiveTech Software tech support forums

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_ ?)

... You can do this. In the TSAY application in the window method ::handleEvent() describing the processing of a unique event. For example: if valtype(nMsg)="C" oDlg:AControls[1]:SetText(msg) return endif ::Super... From the application with the button we find the handle of the window with ...

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 ...

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

... - WITHOUT REFRESH 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 ...

... 'STATIC'" .\source\ereport.prg(5315) Warning W0001 Ambiguous reference 'SELF' .\source\ereport.prg(5317) Warning W0001 Ambiguous reference 'NMSG' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'SELF' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NLPARAM' .\source\ereport.prg(5318) ...

... 'STATIC'" .\source\ereport.prg(5315) Warning W0001 Ambiguous reference 'SELF' .\source\ereport.prg(5317) Warning W0001 Ambiguous reference 'NMSG' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'SELF' .\source\ereport.prg(5318) Warning W0001 Ambiguous reference 'NLPARAM' .\source\ereport.prg(5318) ...

... CONSTRUCTOR METHOD 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 ...

... is that the position where the pop is show must be passed to the handle. the code we have can pass up to 3 parameters:   function _FMH (hWnd, nMsg, hSender, uParam1, uParam2, uParam3) We would have to add one more parameter ( I do not think it creates problems ) the parameters to pass would ...

... 296 ) 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

... messages through its Handleevent method (by Daniel) CLASS TMyDialog FROM TDialog ............................... ENDCLASS METHOD HandleEvent( nMsg, nWParam, nLParam ) CLASS TMyDialog if nMsg == 50000 MsgBeep() endif return Super:HandleEvent( nMsg, nWParam, nLParam ) Everything works, but message ...

... to use the sample posted by Mr.Daniel ? For me, his sample is working fine here on both Harbour and xHarbour. Instead of return Super:HandleEvent( nMsg, nWParam, nLParam ) change it to return ::Super:HandleEvent( nMsg, nWParam, nLParam )

... for method: GotFocus( hCtlLost )' .\prg\TSBUTTON.PRG(1290) Error E0019 #error: 'Class "TSButton" not declared for method: HandleEvent( nMsg, nWParam, nLParam )' .\prg\TSBUTTON.PRG(1302) Error E0019 #error: 'Class "TSButton" not declared for method: HasAlpha( hBitMap )' .\prg\TSBUTTON.PRG(1318) ...

mosh1 wrote:

DLL FUNCTION Shell_NotifyIcon( nMsg AS LONG, pNID AS LPSTR ) AS BOOL PASCAL ;
FROM "Shell_NotifyIconA" LIB "shell32.dll"

Hi Antonio,

Is this function alive?. I have tried like below. It did not worked.

Shell_NotifyIcon("testtesttest")