FiveTech Software tech support forums

... .\source\classes\FWDBG.PRG Called from ERRORSYS(31) in .\ERRSYSW.prg Called from __HBVMINIT(74) in ../../../harbinit.prg provando ad inserire un 'traceLog' immediatamente prima della chiamata a GDIP_FROMHBITMAP() ottengo queste informazioni: [.\IMGTXTIO.prg->FW_READIMAGE] ( 1460) Called From: ...

... TokenSep([<lRightSeparator>])->cSeparator Tone(<nFrequency>,<nDuration>)->Nil TraceLog(<xVariables,...>)->lTrue Transform(<exp>,<cSayPicture>)->cFormatString Trim(<cString>)->cTrimString TrueName(<cPath>)->cRoot ...

... TokenSep([<lRightSeparator>])->cSeparator Tone(<nFrequency>,<nDuration>)->Nil TraceLog(<xVariables,...>)->lTrue Transform(<exp>,<cSayPicture>)->cFormatString Trim(<cString>)->cTrimString TrueName(<cPath>)->cRoot ...

... Tan TanH TBMouse Throw Time TimeToSec TimeValid Token TokenAt TokenEnd TokenExit TokenInit TokenLower TokenLower TokenNext Tokennum TokenSep Tone TraceLog Transform Trim TrueName TtoC TtoS Type U2bin UnCompressString UnSelected UpDated Upper Used Val ValPos ValToPrg ValToPrgExp ValType Version ...

... ) ;      VALID  ( if( GETKEYSTATE( VK_ESCAPE ), nCounter++, nil ), ;         tracelog( GETKEYSTATE( VK_ESCAPE ), nCounter ), ;         if( GETKEYSTATE( VK_ESCAPE ) .and. nCounter ...

Antonio buenas noches, ahora son estos: Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406) Copyright 1999-2009, http://www.xharbour.org http:...

Antonio buenos dias, gracias por la ayuda Agrego la VM.LIB (xharbour), y me manda estos errorres :( :( Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex)...

... Line numbers and other similar optimizations which end up in producing smaller and faster executables. Built-in support for SET TRACE [On|Off] and TraceLog() function. Optimized and extended Garbage Collector. Optimized OOP system. Full support for Clipper undocumented OOP internals (not available ...

Anyhow , i will include your code (with a tracelog) , so that i can see which line produces the offending code.

To help us to locate the problem, please do this test.
Please also try to find the information to identity the alias, etc. within the error routine.

... some problems with LEN(::aDisplay) probably at random ? So i suppose that this is also now the case. Anyhow , i will include your code (with a tracelog) , so that i can see which line produces the offending code. Many thanks , Frank Demont

... from disabled in enabled BUT enter or doubleclicking in the browse let edit , but doesn't change obut[4] : it is still disabled ! Placing a tracelog in the when clausule from obut[4] : When (tracelog(lBuild) , lBuild) : When the edit button is used , i can see that oWnd:AevalWhen() is executed ...

... SetActiveWindow(oDlg:hWnd) , .T. }oCol:bEditValid    := {|oGet|IIF(oDdlg<>nil,(oDdlg:end(),tracelog(oDdlg,"After")),);                            ...

I use :

DEFINE TIMER oOut INTERVAL 59*60000 OF oWnd ;
ACTION iif( LEFT(Time(),2)=="00" , ( set(_SET_ERRORLOG ,"Autoclose.log") , tracelog( DTOC(Date()) + " , Programma closed , user " + UPPER(NetName(.T.)) ) , oWnd:END() ) , )


Frank

Marco ,

You could try with :

@ 3, 6 GET oGet OF oDlg WHEN (Tracelog(oDlg:nLastKey , GetKeyState( VK_SHIFT )),.T.)
// OR oGet:bGotFocus := {||Tracelog(oDlg:nLastKey , GetKeyState( VK_SHIFT ))}

To see the diferences with TAB , Shift TAB , Enter , Mouse activity , ......

Frank

... return the class of the item object. // if oItem:Class = 42 then it should be an email object but it returns another object. nClass := oItem:Class tracelog( nClass ) // If the current item is a regular email then the following line works. // If the current item is an undeliverable message or something ...