FiveTech Software tech support forums

... cualquier ayuda o comentario. //............................................ FUNCTION Consultar() local cServer:= '//190.108.228.106:2812' local aInfo :={},aDir:={} dbcloseall() RDDSETDEFAULT("LETO") if LETO_CONNECT(cServer,'Invitado','invitado') == -1 MsgInfo("No se puede conectar ...

Dear Hakan, Please modify Class TFont line 243 this way: ::cFaceName = aInfo[ 4 ] and try it again many thanks I deleted the line I added and the error after making the change you mentioned Application===========   Path and name: C:\PrgW\Icra\IcraW.exe (32 ...

Dear Hakan,

Please modify Class TFont line 243 this way:

::cFaceName = aInfo[ 4 ]

and try it again

many thanks

o problema esta aqui, mais precisamente na linha destacada: METHOD DispBegin( lCreateDC ) CLASS TWBrowse local hDC, aInfo, hOldDC:= ::hDC DEFAULT lCreateDC:= .F. if lCreateDC hDC:= GetDC( ::hWnd ) else hDC:= ::hDC endif aInfo:= FWDispBegin( ::hWnd, hDC ) ::hDC:= aInfo[3] // hDC de ...

... como escrito acima ... andei olhando a classe e achei mais ou menos onde eh o problema: METHOD DispBegin ( lCreateDC ) CLASS TWBrowse local hDC, aInfo, hOldDC:= ::hDC DEFAULT lCreateDC:= .F. if lCreateDC hDC:= GetDC( ::hWnd ) else hDC:= ::hDC endif aInfo:= FWDispBegin( ::hWnd, hDC ) ::hDC:= aInfo[3] ...

... I have 111111111101 I must see all active checkboxes except the penultimate (November) I load the string with and save an array For n=1 to 12 aadd(aInfo,IIF(val(SubStr(cMese, n, 1))= 1,.t.,.f.) next then how insert it on xbrowse ?

... como fichero de log SetLogFile( NIL ) --> Pone exename.log como fichero de log (Por defecto) * Se ha modificado la función LogFile( cFileName, aInfo, [lDate] ) * Modified function LogFile( cFileName, aInfo, [lDate] ) Ahora, cFileName está predeterminado a SetLogFile() * Nueva función MapDrive( ...

... + exename.log as logfile SetLogFile( NIL ) --> PrevLog file. Sets exepathname.log as log file (default) * Modified function LogFile( cFileName, aInfo, [lDate] ) Now, cFileName defaults fo SetLogFile() * New function MapDrive( cDrive, cPath, cUser, cPassWord ) --> nResult (function\filename.prg) ...

... + exename.log as logfile SetLogFile( NIL ) --> PrevLog file. Sets exepathname.log as log file (default) * Modified function LogFile( cFileName, aInfo, [lDate] ) Now, cFileName defaults fo SetLogFile() * New function MapDrive( cDrive, cPath, cUser, cPassWord ) --> nResult (function\filename.prg) ...

... - 3-::nrowheight*2,::nheaderHeight/::nHeaderLines)*0.8; ,, .t., Eval( ::bClrHeader, Self ) [ 2 ] ) end // add lines end ::DispEnd( aInfo ) ::oFont:Deactivate( hDC ) return 0 4. METHOD LButtonDown( nRow, nCol, nFlags ) CLASS TXBrowse ... if ::lDrag return Super:LButtonDown( nRow, ...

In method METHOD Paint() CLASS TXBrowse if I rem DispBegin() and DispEnd() // local aInfo := ::DispBegin() and at the end of method I rem if ::nLen == 0 ::EraseData( nFirstRow ) // ::DispEnd( aInfo ) return nil endif // ::DispEnd( aInfo ) the problem is even more ...

Hello, I think I found an example: function setfiledate(cFile, dDate) local hFile := FOpen( cFile, FO_READWRITE ) local aInfo SET DATE FRENCH SET CENTURY ON SetFTime( hFile, "13:00:00", dDate ) // MsgInfo( "D o n e !" ) FClose( hFile ) return nil I will test. Best ...

... Nevertheless the following code works for me: function FW_GetAllMonitors()   local aMonitors   := {}   local aRect, nRow, nCol, aInfo, caInfo, nMonitors, nMonitor := 0   nMonitors   := FW_ActiveMonitors()   aRect       := FW_VirtualScreen()   for nRow := aRect[ ...

Can you please try different values like 100,200,300, etc in the place of 20 I used in the above line?

Notthing change, aInfo is always NIL with nMonitor is 2

It seems, in the line 374            aInfo    := MonitorInfoFromRC( 20, x )  aInfo returned is NIL. Can you please try FW_GetMonitor( 1 ) FW_GetMonitor( 2 ) and FW_Get_Monitor( 3 ) in separate lines and ...