B4J Question Combobox - Item is an object (class)

[ranul]

Hi,

My combobox items are actually objects (a class I wrote).

This is the class:

Sub Class_Globals
Private Code As Int
Private Description As String
End Sub

'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize(aCode As Int, aDesc As String)
setCode(aCode)
setDescription(aDesc)
End Sub
public Sub setCode(aCode As Int)
Code = aCode
End Sub
public Sub getCode() As Int
Return Code
End Sub
public Sub setDescription(aDesc As String)
Description = aDesc
End Sub
public Sub getDescription() As String
Return Description
End Sub

In the main module I initialize the combobox and I add items.

Dim c as MyClass
c.initialize(1,"One")
combo.items.add(c)

How do I tell the combobox to display the string (Description)?

Thanks.

 

[Daestrum]

Probably the easiest way is to add a routine in your class that returns a pane with the info as labels, then add that to the combobox.

example

In your Class add

Sub getAsPane As Pane
 Dim p As Pane
 p.Initialize("")
 Dim l As Label
 l.Initialize("")
 l.Text = code
 Dim ll As Label
 ll.Initialize("")
 ll.Text = description
 p.AddNode(l,0,0,30,30)         ' change these to suit how it looks
 p.AddNode(ll,20,0,100,30)
 Return p
End Sub

Where you add to combobox

Dim c as MyClass
c.initialize(1,"One")
combo.items.add(c.AsPane)  ' although sub is called getAsPane B4j will remove the get

If you just want to display the description without the code in the combobox

combo.items.add(c.Description)