iOS Question Compiler does not like this

[Robert Valentino]

This Code

    Type TPDFPrint_PageSize(Width As Float, Height As Float)
    Type TPDFPrint_PageMargins(Left As Float, Top As Float, Right As Float, Bottom As Float, TopOfPage As Float, EndOfPage As Float)

    Private    mPageSize                                        As TPDFPrint_PageSize
    Private    mMargins                                        As TPDFPrint_PageMargins


#Region PDFDrawRectangle
Public  Sub PDFDrawRectangle(RectToDraw As Rect, Color As Int, Filled As Boolean, Stroke As Int, FillColor As Int) As Rect
            Dim RealDraw        As Rect
           
            RealDraw.Initialize(RectToDraw.Left, RectToDraw.Top, RectToDraw.Right, RectToDraw.Bottom)

            If  RealDraw.Right = -1 Then
                RealDraw.Right = (mPageSize.Width - (mMargins.Right + RealDraw.Left))
            End If           
           
            If  RealDraw.Bottom = -1 Then
                RealDraw.Height = (mPageSize.Height - (mMargins.Bottom + RealDraw.Top))      ' this is line 592                        
            End If
           
            RealDraw.Left    = RealDraw.Left + mMargins.Left
            RealDraw.Top    = RealDraw.Top    + mMargins.Top
                       
            mPDF.DrawRect(RealDraw, Color, False, Stroke)
           
            If  Filled Then
                mPDF.DrawRect(RealDraw, FillColor, True, Stroke)
            End If
           
            Return RealDraw
End Sub
#end Region

Spoiler

Compiling debugger engine code. Error
B4i line: 592
RealDraw.Height = (mPageSize.Height - (mMargin
shell\src\com\BOBs\BBs\b4i_creports_subs_0.java:1379: error: unexpected type
_realdraw.runMethod(true,"Height") = BA.numberCast(float.class, (RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mpagesize" /*RemoteObject*/ ).getField(true,"Height" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mmargins" /*RemoteObject*/ ).getField(true,"Bottom" /*RemoteObject*/ ),_realdraw.runMethod(true,"Top")}, "+",1, 0))}, "-",1, 0)));Debug.locals.put("RealDraw", _realdraw); ^
required: variable
found: value
1 error

The code looks fine and works GR8 under B4A


Also did not like this until I moved the string to a int

                Dim SortedMatchup         As String  = SortedMatchups.Get(SortedMatchupsLoop)
                Dim SortedParsed()        As String  = Regex.Split("~", SortedMatchup)
                
                If  SortedParsed.Length <> 3 Or IsNumber(SortedParsed(2)) = False Then 
                    Continue
                End If
                 
#if B4A                 
                MatchupsLoop = SortedParsed(2)
#else if B4i
                Dim x As Int = SortedParsed(2)
                
                MatchupsLoop = x
#end if

Spoiler

Compiling debugger engine code. Error
B4i line: 1416
MatchupsLoop = SortedParsed(2)
shell\src\com\BOBs\BBs\b4i_cstandings_subs_0.java:602: error: > expected
_matchupsloop = BA.ObjectToNumber(_sortedparsed.runMethod(true,"getObjectFast:", BA.numberCast(int.class, 2)).<NSString*>get()).intValue;Debug.locals.put("MatchupsLoop", _matchupsloop); ^
1 error

 

[Erel]

Moved to B4i forum.

Can you upload the project?

 

[Robert Valentino]

Wouldn't want to do that, but would send it directly to you

Where should I send it?

 

[Erel]

[email protected]

 

[Robert Valentino]

Couldn't recreate in smaller or test project so shipped code off to Erel.

Hopefully he can figure out what Bozo mistake I did that is causing this.

 

[Robert Valentino]

OK, I wrote this TEST code to help figured out one of the compiler problems

This code

            Dim Matchups        As List

            Dim SortedMatchups As List
           
            Matchups.Initialize
            SortedMatchups.Initialize

            For MatchupsLoop = 0 To Matchups.Size-1
                Log("Nothing - Just a test")
            Next
                       
  
            For SortedMatchupsLoop = 0 To SortedMatchups.Size-1
                Dim SortedMatchup         As String  = SortedMatchups.Get(SortedMatchupsLoop)
                Dim SortedParsed()        As String  = Regex.Split("~", SortedMatchup)
               
                If  SortedParsed.Length <> 3 Or IsNumber(SortedParsed(2)) = False Then
                    Continue
                End If
                
                MatchupsLoop = SortedParsed(2)                '    FixMe Compiler  Line would not compile in B4i
            Next

Get this error

Spoiler

B4i line: 131
MatchupsLoop = SortedParsed(2) ' FixMe Comp
shell\src\com\BOBs\Testing\b4i_b4xmainpage_subs_0.java:135: error: > expected
_matchupsloop = BA.ObjectToNumber(_sortedparsed.runMethod(true,"getObjectFast:", BA.numberCast(int.class, 2)).<NSString*>get()).intValue;Debug.locals.put("MatchupsLoop", _matchupsloop);

The REASON I found that this code is not working is because MatchupsLoop was defined within the for loop and I assume has gone out of scope. If I were to add a

DIM MatchupsLoop as Int

before the for loop then I can use the MatchupsLoop inside the other SortedMatchupsLoop

AGAIN: The code above is just s snip-it of the code but allowed me to see the problem but can compiled as is to inside a a test program to cause the effect. Caught me doing something bad (that works perfectly find under B4A)

This compiles just fine

            Dim Matchups        As List

            Dim SortedMatchups As List
           
            Dim MatchupsLoop  as Int

            Matchups.Initialize
            SortedMatchups.Initialize

            For MatchupsLoop = 0 To Matchups.Size-1
                Log("Nothing - Just a test")
            Next
                       
  
            For SortedMatchupsLoop = 0 To SortedMatchups.Size-1
                Dim SortedMatchup         As String  = SortedMatchups.Get(SortedMatchupsLoop)
                Dim SortedParsed()        As String  = Regex.Split("~", SortedMatchup)
               
                If  SortedParsed.Length <> 3 Or IsNumber(SortedParsed(2)) = False Then
                    Continue
                End If
                
                MatchupsLoop = SortedParsed(2)                '    FixMe Compiler  Line would not compile in B4i
            Next

 

[Robert Valentino]

Attached is a small program that does nothing but causes the 2nd compiler error I was having

Spoiler

B4i line: 83
RealDraw.Height = (mPageSize.Height - (mMargin
shell\src\com\BOBs\Testing\b4i_b4xmainpage_subs_0.java:140: error: unexpected type
_realdraw.runMethod(true,"Height") = BA.numberCast(float.class, (RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mpagesize" /*RemoteObject*/ ).getField(true,"Height" /*RemoteObject*/ ),(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mmargins" /*RemoteObject*/ ).getField(true,"Bottom" /*RemoteObject*/ ),_realdraw.runMethod(true,"Top")}, "+",1, 0))}, "-",1, 0)));Debug.locals.put("RealDraw", _realdraw);
^
required: variable
found: value
1 error

 

[Erel]

The error in the last example happens because Rect.Height is a method. It is not a property or a field. You cannot assign a value to a method.

 

[Robert Valentino]

I see that now that you pointed it out. In B4A it isn't
To change the height, I need to set Top and Bottom?

 

[Erel]

Yes.