topic-17511

Posts: 1

Joined: Mon Nov 30, 2009 05:29 AM

FWH64 - same error msg with diff errors
Posted: Mon Nov 30, 2009 07:39 AM

Hi Antonio,
Thanks for the help related to new FWH64. I have another problem.
I have a program developed under FWH32 and being work fine under window 7/64.
Program compiled with FWH64 -> all good , no error.
Program start up fine in window 7 /64 -> ok
When run, no matter what errors - syntax, mistype, files etc. . It only
display one type of error message.
"Error Base/1099 Argument error: STR from Errorsys, line 0"
with difference number (1091, 1099)

Is there a way to display like the old FHW32 what kind of error , line no etc.. ?
It was very difficult to fix it if I don't know what it is.

many Thanks

Dinh HA

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FWH64 - same error msg with diff errors
Posted: Mon Nov 30, 2009 08:05 AM

Dinh,

Are you using Harbour 64 as I set it to you ?

Please post here the error.log file that you get, thanks

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FWH64 - same error msg with diff errors
Posted: Mon Nov 30, 2009 09:56 AM

Dinh,

These lines have to be removed from FWH64\source\function\errsysw.prg:

Code (fw): Select all Collapse

   #ifdef __CLIPPER__
      cErrorLog += "   CPU type: " + GetCPU() + CRLF
   #else
   //    cErrorLog += "   CPU type: " + GetCPU() + " " + ;                 // this
   //                 AllTrim( Str( GetCPUSpeed() ) ) + " Mhz" + CRLF    // this
   #endif

With those changes, the FWH64 error system works fine. You can modify errsysw.prg, recompile it and replace it in FiveH64.lib or simply modify errsysw.prg and compile and link it as another PRG of your application

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: FWH64 - same error msg with diff errors
Posted: Mon Nov 30, 2009 10:07 AM

Dinh,

This is a better solution:

Code (fw): Select all Collapse

      if ! IsWin64()
         cErrorLog += "   CPU type: " + GetCPU() + " " + ;
                      AllTrim( Str( GetCPUSpeed() ) ) + " Mhz" + CRLF
      endif

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion