Invalid lvalue 'Numeric'

[acwoo1]

Hi,

@ 10, 5 BTNBMP oBtn1 OF oWnd ;
SIZE 65, 70 ;
PROMPT "ABC" + CRLF + "Accounting" FILE "amber1.bmp" 2007 ;
FONT oFont TOP ;
ACTION ( WinExec( ".\abc\setup.exe" ) )

After I upgraded for fwh9.11 to fwh10.6, I have this error message for the above:

Invalid lvalue 'Numeric'

Any help appreciated.

Regards

ACWOO
using fwh10.6 + bcc582 + harbour 2.1.0

[Antonio Linares]

Acwoo,

Are you sure that the error comes from that source code line ? Here it is compiling fine:

c:\soporte\acwoo test>c:\harbour\bin\harbour -n -Ic:\fwh\include;c:\harbour\include test.prg
Harbour 2.1.0beta1 (Rev. 14694)
Copyright (c) 1999-2010, http://harbour-project.org/
Compiling 'test.prg'...
Lines 3718, Functions/Procedures 1
Generating C source output to 'test.c'... Done.

If you are unsure about the right line, please generate a .ppo file compiling with /p and then look for the line inside the .ppo file

[acwoo1]

Thanks for your help

Here is the prg


#include "FiveWin.ch"
static oWnd
function Main()
local oFont
Local oBtn1

DEFINE FONT oFont NAME "Arial" SIZE 0, -22 BOLD
skinbuttons()

DEFINE Dialog oWnd;
TITLE "Test" size 800,600 pixel

@ 10, 5 BTNBMP oBtn1 OF oWnd ;
SIZE 65, 70 ;
PROMPT "BCD" + CRLF + "Accounting" FILE "amber1.bmp" 2007 ;
FONT oFont TOP ;
ACTION ( WinExec( ".\bcd\setup.exe" ) )
ACTIVATE WINDOW oWnd MAXIMIZED

return nil
*******************************************

Here is the ppo

#line 219 "hbclass.ch"
DECLARE HBClass New( cName AS STRING, OPTIONAL SuperParams ) AS CLASS HBClass Create() AS OBJECT Instance() AS OBJECT AddClsMethod( cName AS STRING, @MethodName(), nScope AS NUMERIC, n2 AS NUMERIC, n3 AS NUMERIC ) AddMultiClsData( cType AS STRING, uVal, nScope AS NUMERIC, aDatas AS ARRAY OF STRING ) AddMultiData( cType AS STRING, uVal, nScope AS NUMERIC, aDatas AS ARRAY OF STRING, x AS LOGICAL, lPer AS LOGICAL ) AddMethod( cName AS STRING, @MethodName(), nScope AS NUMERIC ) AddInLine( cName AS STRING, bBlock AS CODEBLOCK, nScope AS NUMERIC ) AddVirtual( cName AS STRING )
#line 83 "FiveWin.ch"
EXTERNAL FW_GT










extern errorsys
#line 5 "bcd.prg"
static oWnd

function Main()

local oFont
Local oBtn1

oFont := TFont():New( "Arial", 0, -22,, .T.,,,,,,,,,,,, )
skinbuttons()


oWnd = TDialog():New(,,,, "Test",,, .F.,,,,,, .T.,,,, 800, 600, .F. )





oBtn1 := 2007 := TBtnBmp():New( 10, 5, 65, 70,,, "amber1.bmp",, {|Self|( WinExec( ".\bcd\setup.exe" ) )}, oWnd,,, .F., .F., "BCD" + Chr(13)+Chr(10) + "Accounting", oFont,,, !.F., Upper("TOP") )
oWnd:Activate( Upper("MAXIMIZED"), oWnd:bLClicked, oWnd:bRClicked, oWnd:bMoved, oWnd:bResized, oWnd:bPainted, oWnd:bKeyDown, oWnd:bInit,,,,,,,,,,, oWnd:bLButtonUp )

return nil
*****************************************
The error message:

No code generated.
Fivewin.ch(81) Warning W0001 Redefinition or duplicate definition of #define HB_SYMBOL_UNUSED
bcd.prg(22) Error E0022 Invalid lvalue 'Numeric'
*******************************************

Any help appreciated.

Thanks
Regards

ACWOO
using fwh10.6 + bcc582 + harbour2.1.0


[Antonio Linares]

Acwoo,

It seems as you are using a wrong or old FiveWin.ch

It should be 72.656 bytes length. Please check it