iOS Question Call B4i sub from inline OBJC

[narek adonts]

How can I call b4i sub from inline Objective C code (event,...)

Narek

 

[Erel]

Here:

Private Sub Application_Start (Nav As NavigationController)
   NavControl = Nav
   Page1.Initialize("Page1")
   Nav.ShowPage(Page1)
   Dim no As NativeObject = Me
   no.RunMethod("methodThatRaiseEvent", Null)
End Sub

Sub Some_Sub(x As Int)
   Log(x)
End Sub

#If OBJC
- (void)methodThatRaiseEvent {
   [self.bi raiseEvent:nil event:@"some_sub:" params:@[@10]];
}
#End If

Note that the sub name in the raiseEvent call must be lower cased.

 

[narek adonts]

Thanks

 

[narek adonts]

how pass an NSArray with raiseevent

[self.bi raiseEvent:nil event"some_sub:" params[(NSArray*)myarray]];

it doesnt work this way

 

[Erel]

B4IList* lst = [B4IList new];
lst.object = myArray;

Now pass the list.

 

[Derek Johnson]

Here:

Private Sub Application_Start (Nav As NavigationController)
   NavControl = Nav
   Page1.Initialize("Page1")
   Nav.ShowPage(Page1)
   Dim no As NativeObject = Me
   no.RunMethod("methodThatRaiseEvent", Null)
End Sub

Sub Some_Sub(x As Int)
   Log(x)
End Sub

#If OBJC
- (void)methodThatRaiseEvent {
   [self.bi raiseEvent:nil event:@"some_sub:" params:@[@10]];
}
#End If

I noticed that when I tried this example that I got this warning in the log:

Unexpected event (missing RaisesSynchronousEvents):some_sub:

Could you tell me please, is there some declaration needed to get rid of this warning?

 

[narek adonts]

Are you using the same code? Or you modified it? If yes then please post your code

 

[Derek Johnson]

Here's the actual code and the responses in the log:

Sub Button2_Click
    log("Clicked Me")
    Try
         Dim NativeMe As NativeObject = Me
         NativeMe.RunMethod("test:", Array (True))
    Catch
        rlog("Last exception:" & LastException.Description)
    End Try
End Sub

#If OBJC

- (void) test: (bool) on {
   NSLog(@"this is a message");
   [self.bi raiseEvent:nil event:@"olog:" params:@[@"Testing.."]];
}

#End If

Sub olog(msg As String)
    Log(msg)
    TextView1.Text=TextView1.Text & msg  & CRLF
End Sub

This is the log;

Application_Start
Application_Active
Application_Active
Clicked Me
this is a message
Unexpected event (missing RaisesSynchronousEvents): olog:
Testing..

 

[Erel]

Replace raiseEvent with raiseUIEvent.

 

[wineos]

[self.bi raiseEvent:nil event:@"some_sub:" params:@[@10]];

If I want to call an event without parameter, how to change the above code?

Thank you.

 

[narek adonts]

Code:
[self.bi raiseEvent:nil event"some_sub" params[]];

 

[wineos]

Thanks Narek,

May I ask once more: If I want to call an event with more than 1 parameter, then how to write it?

Thank you.

 

[narek adonts]

[self.bi raiseEvent:nil event:@"some_sub:::" params:@[(param1),(param2),(param3)]];

 

[wineos]

Thank you so much, Narek.

 

[wineos]

Another question.

[self.bi raiseEvent:nil event:@"some_sub:" params:@[@10]];

I change the parameter to 1, i.e.

[self.bi raiseEvent:nil event:@"some_sub:" params:@[@1]];

When the code run to

Sub Some_Sub(x As Int)

the system prompted error, saying that it is not an array. But when I change the parameter to 10, it works.

Anyone can help?

Thank you.

 

[narek adonts]

Strange. Try this

[self.bi raiseEvent:nil event:@"some_sub:" params:@[(float)(1.0)]];

 

[wineos]

Thank you Narek, I solve it, just like what you did.

[self.bi raiseEvent:nil event:@"some_sub:" params:@[@((int)1)]];