FiveTech Software tech support forums

... teclado.... numa dialog sem bartitle. 2 Num get é possivel executar uma acção quando clicka nesse get ? Uma clausula do tipo "GotFocus e LostFocus" ? Assim quando o operador clica num determinado get poderia activar/desactivar automaticamente um teclado personalizado. Isto é possivel ...

Why if I make a search in this forum I have everytime "No suitable matches were found." but if i search the same word in tags i found a lot of topics? for example if i search the word "lostfocus" with tags i have "Search found 75 matches: lostfocus"

Thanks

Daniele

... => TCBROWSE:DRAWSELECT(478) Called from: .\source\classes\WBROWSE.PRG => (b)TWBROWSE:TWBROWSE(193) Called from: => TWBROWSE:LOSTFOCUS(0) Called from: .\source\classes\TCBROWSE.PRG => (b)TCBROWSE:TCBROWSE(67) Called from: => TCBROWSE:LOSTFOCUS(0) Called from: .\source\classes\CONTROL.PRG ...

James,

Thank you. Fixed:

METHOD LostFocus( hWndGetFocus ) inline ::SetPos(1), ::lAuto := .T., ::super:LostFocus( hWndGetFocus )

... Thank you for your reply. The error is Error description: Error BASE/44 Assigned value is wrong class: TAUTOGET:LAUTO and the error is in METHOD LostFocus( hWndGetFocus ) inline ::SetPos(1), ::lAuto := Nil, ::super:LostFocus( hWndGetFocus ) If I comment out this method, it works fine. Regards :D

... of time doing this ) .. when the user closes the browse .. the attached error occurs. >>>>> >>>>> Could this be a lostfocus error ?? >>>>> >>>>> Rick Lipkin >>>>>

... ) #endif METHOD Help( nWParam, nLParam ) METHOD Initiate( hWndFocus, hWnd ) METHOD KeyChar( nKey, nFlags ) METHOD KeyDown( nKey, nFlags ) METHOD LostFocus() INLINE ::lFocused := .f.,; If( ::bLostFocus != nil, Eval( ::bLostFocus ), nil ) METHOD MouseMove( nRow, nCol, nKeyFlags ) METHOD Paint() ...

... nRGB( 125, 165, 224 ) oApp():oGrid:nRecSelColor = 15512898 // Selected Row Black on White oApp():oGrid:bClrSelFocus = { || { 0, DARKCYAN } } // LostFocus Black on White oApp():oGrid:bClrSel ={ || { 0, DARKCYAN } } http://img243.imageshack.us/img243/6773/bargoodmu6.png

... oApp():oGrid:nRecSelColor = 15512898 // Selected Row Black on White oApp():oGrid:bClrSelFocus = { || { 0, nRGB( 238, 152, 25 ) } } // LostFocus Black on White oApp():oGrid:bClrSel ={ || { 0, nRGB( 238, 152, 25 ) } }

sorry i dont understand
i see all color ok

Window focus (xbrowse)


window lostfocus (xbrowse)

dutch wrote:Dear Sambomb

I don't remove TABSTOP in GET.

Regards,
Dutch

Sorry... I take a look again and see that the lostfocus is on the get, not in the browse.... Thanks

... 2) Using TSBrowse ( not current version ) there is sometimes a Workoarea not in use: ADSKEYNO message which comes from a TS Browse lostfocus call 3) The cursor on some computers disappears when moving from one field to another These problems did not occur under older FWH versions. ...

... Lock required Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:POSTEDIT(0) Called from: .\source\classes\XBROWSE.PRG => EDITGETLOSTFOCUS(0) Called from: .\source\classes\XBROWSE.PRG => (b)TXBRWCOLUMN:EDIT(0) Called from: .\source\classes\WINDOW.PRG => TWINDOW:LOSTFOCUS(0) ...

... nuevo DATA DATA lDentro AS LOGICAL INIT .F. // para saber si pinchamos por primera vez en el Get o ya estabamos Dentro 2) despues modificar METHOD LostFocus( hCtlFocus ) CLASS TGet ... ... if ! ::oGet:BadDate ::oGet:KillFocus() ::lDentro := .F. // hemos salido, ya no estamos dentro else ... ... ...

... the testbrowser after refresh ) 3. Once again a cell-bitmap 4. set the focus in the testbrowser to another row ....The result : the bitmap on the lostfocus is yellow 5. Choose preview ( a new Dialog ) http://www.pflegeplus.com/pictures/xbrw4a.jpg Another Test : active row = 3, ...