FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Invalid lvalue 'Numeric'
Posts: 175
Joined: Tue Nov 10, 2009 10:56 AM

Invalid lvalue 'Numeric'

Posted: Mon Jul 05, 2010 10:12 AM

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

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Invalid lvalue 'Numeric'

Posted: Mon Jul 05, 2010 11:01 AM
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
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 175
Joined: Tue Nov 10, 2009 10:56 AM

Re: Invalid lvalue 'Numeric'

Posted: Mon Jul 05, 2010 03:16 PM

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


Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Invalid lvalue 'Numeric'

Posted: Mon Jul 05, 2010 03:58 PM

Acwoo,

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

It should be 72.656 bytes length. Please check it

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion