Hello.
I have a class with the name Box2.
Inside the class I declare one B4XTable I can't understand what I need to have on callback object so I can make b4xtable to work.
I show you some of my code to help you understand my problem.
Thank you
I have a class with the name Box2.
Inside the class I declare one B4XTable I can't understand what I need to have on callback object so I can make b4xtable to work.
I show you some of my code to help you understand my problem.
B4X:
Sub Class_Globals
Private B4XTable2 As B4XTable
End Sub
'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize
' Create table
B4XTable2.Initialize(??????, ??????) --> What I need to have here?
B4XTable2.AddColumn("findoc", B4XTable2.COLUMN_TYPE_NUMBERS)
Dim ItemCode As B4XTableColumn =B4XTable2.AddColumn("Code", B4XTable2.COLUMN_TYPE_TEXT)
ItemCode.Width = 92dip
Dim Barcode As B4XTableColumn = B4XTable2.AddColumn("Barcode", B4XTable2.COLUMN_TYPE_TEXT)
Barcode.Width = 100dip
Dim item As B4XTableColumn = B4XTable2.AddColumn("Material", B4XTable2.COLUMN_TYPE_TEXT)
B4XTable2.AddColumn("Ποσότητα", B4XTable2.COLUMN_TYPE_NUMBERS)
item.Width = 100dip
Dim Qnt As B4XTableColumn = B4XTable2.AddColumn("Qnt", B4XTable2.COLUMN_TYPE_NUMBERS)
Qnt.Width = 100dip
Dim RealQnt As B4XTableColumn = B4XTable2.AddColumn("Pallete", B4XTable2.COLUMN_TYPE_NUMBERS)
RealQnt.Width = 100dip
B4XTable2.Refresh
GetRecordLines("select_Lines", Main.findoc)
End Sub
Thank you