FiveTech Software tech support forums

Silvio, Please include the file C:\FWH\source\classes\btnbmp.prg in your test program and then examine what the METHOD GotFocus( hCtlLost ) CLASS TBtnBmp does. You can then change the DrawFocusRect and the color. Best regards, Otto METHOD GotFocus( hCtlLost ) CLASS TBtnBmplocal ...

hi, what about GotFocus() / LostFocus() (WHEN / VALID ) :?: i do "switch" Numlock this Way under HMG    bGotFocus := {|| lOldKey:= SetNumLock() }   bLostFocus := {|| SetNumLock( lOldKey ) ...

... 0 ) Called from: ../../../tobject.prg => TTABCONTROL:ADIALOGS( 0 ) Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW_GOTFOCUS( 3018 ) Called from: => AEVAL( 0 ) Called from: .\source\classes\WINDOW.PRG => TWINDOW:GOTFOCUS( 3018 ) Called from: => TWINDOW:HANDLEEVENT( ...

hi, i´m searching for TAB Sample and found TTabControl() and TTabs() for TTabControl () i found c:\fwh\samples\testtctr.prg but Sample is limited to 10 lines ... :( --- as i remember SysTabControl is "just" Control for "Tabs" but have "no Body" in FiveWin Sample i can &...

... from TWINDOW:HANDLEEVENT(0) Called from TDIALOG:HANDLEEVENT(1516) in FueAje\Five\Dialog.prg Called from CALLWINDOWPROC(0) Called from TMULTIGET:GOTFOCUS(849) in FueAje\Five\mget.prg Called from TWINDOW:HANDLEEVENT(0) Called from TMULTIGET:HANDLEEVENT(1427) in FueAje\Five\Control.prg Called from ...

... working :!: . for a selected cell something like: :bGotfocus := {|nRow, nCol|... :bLostfocus := {|nRow, nCol|... or is it possible to use : METHOD GotFocus( hCtlFocus ) INLINE ( ::oActive := Self, ::Super:GotFocus( hCtlFocus ),; If( GetParent( hCtlFocus ) != ::hWnd, ::Super:Refresh( .f. ),) ) METHOD ...

... <nInClrDLine>] COLOR for BORDERBOTTOM when focused / not focused [<ldynamic: DYNAMIC>]; Allow change position of cInCaption when get gotfocus or lost focus [INALIGN <nInAlign>] Position for this get, relative to nPrevCtrl: default last [INPREVCTRL <nPrevCtrl>] Ctrl for ...

... using SetFocus but it jumps to the Exit button instead. (If I remove the second GET WHEN clause it will move to it but doesn't change to the gotfocus colours) TIA Peter #include "FWCE.ch"#include "vkey.ch"STATIC oWnd,oFont[3]STATIC oGetPass***********************FUNCTION ...

This is my login program that I need but the CUEBANNER is disappear when Get[1]:GotFocus(). If I oGet[1]:setfocus(), CUEBANNER "User Id" will never show. For PASSWORD Clause is working well. For this sample, I setfocus to Exit button. https://s26.postimg.org/cskwewqc9/Login.png

I've a question about CUEBANNER. When I use CUEBANNER on GET (Character), it will cuebanner text will disappear when ::gotfocus even I do not enter anything (still empty) but for PASSWORD not disappear if GET is empty. I try this sample, it doesn't show anything. #include 'fivewin.ch'function ...

... MULTIGET....  ....Set( _SET_INSERT, lSet)  This is right code. After leaving the multiget i change to old mode. I have also tested with ::gotfocus and ::lostfocus to Change the caret. Antonio, as the multiget cannot switch off the insert-mode, the caret should be always shown as block ...

Excelente Antonio! muchas gracias por la pronta ayuda, todo funcionando!
Saludos, Mariano

Para poder usar bKeyChar tienes que realizar estos cambios en la Clase TDbCombo: METHOD KeyChar( nKey, nFlags) CLASS TDBCombo...   // ::Super:KeyChar(nKey, nFlags)   if ! Empty( ::bKeyChar )      Eval( ::bKeyChar, nKey )   endif &n...

Asi puedes saber cuando se selecciona un ítem con el ratón:

oDBC1:bChange = { | oDbc, cItem | MsgInfo( cItem ) }

Mariano, Modifica así el método LostFocus() de la Clase TDbCombo: METHOD LostFocus( hWndGetFocus ) CLASS TDBCombo   local nAt := ::SendMsg( CB_GETCURSEL )   if nAt != CB_ERR      ::nAt = nAt + 1      Eval( ::bSetGet, ::aItems[...