B4J Question Node visibility outside container

[mediait]

If I have a pane containing a label then move that label outside the pane dimensions the label is still visible.

What I am trying to do is slide nodes from outside a pane into the pane display, but only be visible when it is within the pane dimensions.

Can anyone help?

 

[mediait]

From what I can understand you can use setClip() method of pane to hide anything outside of a rectangle dimensions.

Rectangle clipRect =newRectangle(pane.getWidth(), pane.getHeight());
pane.setClip(clipRect);

I have tried the following:

Dim rectangle As JavaObject
rectangle.InitializeNewInstance("java.awt.Rectangle", Array As Object(myPane.width, myPane.height))

Dim obj As JavaObject = myPane
obj.RunMethod("setClip",Array(rectangle))

but I get:
java.lang.RuntimeException: Method: setClip not matched
which I gather means I am not supplying the correct arguments for setClip().

Any ideas anyone?

 

[Erel]

Are you using a regular Pane? The clipping should happen automatically.

 

[mediait]

Yes, I am using a regular pane.

 

[mediait]

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
End Sub

Sub AppStart (Form1 As Form, Args() As String)
    MainForm = Form1
    MainForm.SetFormStyle("UNIFIED")
    'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
    MainForm.Show
  
    Dim p As Pane
    Dim l As Label
  
    p.Initialize(Null)
    l.Initialize(Null)
  
    MainForm.RootPane.AddNode(p,0,0,200,200)
    p.Style = "-fx-background-color: #888888;"
    p.AddNode(l,100,0,200,50)
    l.Text = "Hello world and world and world"
End Sub

Below shows the label text outside the pane.

 

[Erel]

It will work if you add the Pane with the designer.

 

[mediait]

I appreciate your time Erel, but there are unknown number of panes added dynamically in 20 second slides containing either labels or images and these nodes are animated within their containers.

Is there a way of clipping the panes at runtime?

 

[Erel]

Create a layout with a Pane. You can load this layout multiple times and use the loaded panes.

For i = 1 To 20
 MainForm.RootPane.LoadLayout("LayoutWithPane") 'pane name is StubPane
 ListOfPanes.Add(StubPane)
 StubPane.Visible = False
Next

 

[mediait]

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
    Private stubPane As Pane
End Sub

Sub AppStart (Form1 As Form, Args() As String)
    MainForm = Form1
    MainForm.SetFormStyle("UNIFIED")
    MainForm.RootPane.LoadLayout("layPane") 'Load the layout file.
    MainForm.Show
   
    Dim l As Label
   
    l.Initialize(Null)
   
    stubPane.Style = "-fx-background-color: #888888;"
    stubPane.AddNode(l,100,0,200,50)
    l.Text = "Hello world and world and world"
   
End Sub

It is still the same. Text is still displayed outside the container.

Is there no way of clipping the panes at runtime?

 

[Erel]

Is there no way of clipping the panes at runtime?

It is not so simple.

This is how it looks here:

Note that it is a mistake to set the style like this. It is better to set it in the designer or with CSSUtils. You should also pass an empty string as the event name (both are not related to the clipping issue).

 

[mediait]

Erel, did you add the label dynamically or in the designer?

 

[Erel]

Dynamically.
The project is attached.

 

[mediait]

Thanks for your time Erel. I was using the Scene Builder to create the layout but I saw from your example I should have been using the Open Internal Designer.
I have changed my programme code to load predefined panes from a layout and the pane nodes are now contained.