Ampliar informacion de checkres.txt

Ampliar informacion de checkres.txt

Postby cnavarro » Sun Aug 03, 2014 11:31 am

Buenos dias
Podria ser posible que al crear el fichero checkres.txt incluyese en la linea o al principio del volcado el programa.EXE que lo genera?
Por ejemplo
Ahora obtenemos:
03/08/2014 11:29:35: FONT,-1844833697,TWINDOWSUI:SRIGHTUPUI(2271)->MAIN(155)

Y creo que podría ser interesante:
03/08/2014 11:29:35: APLICACION.EXE -- FONT,-1844833697,TWINDOWSUI:SRIGHTUPUI(2271)->MAIN(155)

Muchas gracias. Many thanks.
Saludos,Regards

Cristobal Navarro - Harbour (r1601050904) - xHarbour (Build 20150603) - VS 2015/17 - FWH 17.12

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
User avatar
cnavarro
 
Posts: 3883
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Ampliar informacion de checkres.txt

Postby Antonio Linares » Mon Aug 04, 2014 3:34 am

Cristobal,

Añadido para FWH 14.07

Solo hay que cambiar asi esta función en source\function\checkres.prg:

Code: Select all  Expand view
function CheckRes()

   local cInfo := "", n
   
   for n = 1 to Len( aResources )
      if aResources[ n, 2 ] != 0
         cInfo = GetModuleFileName( GetInstance() ) + " -- " + ;
                 aResources[ n, 1 ] + "," + AllTrim( Str( aResources[ n, 2 ] ) ) + ;
                  "," + aResources[ n, 3 ] + CRLF
         LogFile( "checkres.txt", { cInfo } )
      endif
   next  

   LogFile( "checkres.txt", { GetModuleFileName( GetInstance() ) + " -- " + ;
                              Replicate( "=", 100 ) } )   
return nil  
 
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 35258
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Ampliar informacion de checkres.txt

Postby cnavarro » Mon Aug 04, 2014 5:36 pm

Antonio, no hay nada mejor que llegar en el momento justo :D :D :D
Gracias
Muchas gracias. Many thanks.
Saludos,Regards

Cristobal Navarro - Harbour (r1601050904) - xHarbour (Build 20150603) - VS 2015/17 - FWH 17.12

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
User avatar
cnavarro
 
Posts: 3883
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Ampliar informacion de checkres.txt

Postby Antonio Linares » Mon Aug 04, 2014 5:41 pm

;-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 35258
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to To do - WishList / Por hacer - Peticiones

Who is online

Users browsing this forum: No registered users and 1 guest