B4J Library [B4X] [XUI] SD FlexGrid (Table)

I created a new library to show a table (or grid) similar to the one in EXCEL.

There are already excellent classes that allow many to accomplish things, such as xCustomListView by @Erel (B4X) and with the FlexibleTable by @klaus (B4A). I wanted to make something slightly different suited to my needs.

WARNING
The use of libraries for personal and / or commercial use is permitted. It is not allowed to modify the sources or change the name of the library. Reverse engineering is not authorized to access the sources for any reason, not even for study or learning reasons.

Explanations:

1. To get the calculation of the cells that contain a formula I have added Erel's B4XEval to my Library, but as soon as possible I will make it external so that everyone can modify it according to their needs.
2. To select multiple cells, position yourself on the first cell of those to be selected (the one at the top left) click a shot and then click again and drag your finger to cover all the cells (or area) that you want to select
3. It is still in beta version, presents problems in large grids.
4. Now only for B4A and B4i Now for B4A,B4i,B4j
5. In the example to select a group of cells just long click on a cell (not checkbox). In the case of B4J click with the right mouse button

SD_FlexGrid

Author: Star-Dust
Version: 0.45

• Eval
  version 2.00
  Eval Method By Erel: https://www.b4x.com/android/forum/threads/b4x-eval-expressions-evaluator.54629/
  • Fields:
    • Error As Boolean
  • Functions:
    • Calculate (Expression As String) As Double
    • Class_Globals As String
    • Initialize (FG As FlexGrid) As String
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
• FlexGrid
  • Events:
    • CellClick (Row As Int, Col As Int)
    • CellLongClick (Row As Int, Col As Int)
    • FeetClick (Index As Int)
    • HeadClick (Index As Int)
    • Modified (Row As Int, Col As Int)
    • ScrollX (Position As Double)
    • ScrollY (Position As Double)
  • Fields:
    • EditBackgroundColor As Int
    • EditTextColor As Int
    • TypeButton As Int
    • TypeCheck As Int
    • TypeDouble As Int
    • TypeFloat As Int
    • TypeImage As Int
    • TypeInt As Int
    • TypeList As Int
    • TypeString As Int
  • Functions:
    • AddRow (Cell As Object(), Refresh As Boolean) As String
      eg. Flexgrid.AddRow(Array As Object(i,B,"User ","Description " ,100.00), True)
    • AddRow2 (Cell As Object(), HeightRow As Int, Refresh As Boolean) As String
      eg. Flexgrid.AddRow(Array As Object(i,B,"User ","Description " ,100.00),40dip,True)
    • AddRowAt (index As Int, Cell As Object(), Refresh As Boolean) As String
      eg. Flexgrid.AddRow(2,Array As Object(i,B,"User ","Description " ,100.00), True)
    • AddRowCustomize (Cell As Object(), Text_Color As Int, Background_Color As Int, TextFont As B4XFont, Refresh As Boolean) As String
    • AddToParent (Parent As B4XView, Left As Int, Top As Int, Width As Int, Height As Int, ColsNumber As Int) As String
      Parent is Panel to Add Grid
      eg. Flexgrid.AddToParent(Activity,0,0,100%x,100%y,5)
    • Class_Globals As String
    • ClearRows As String
      erase all rows contents
    • ClearSelection As String
      cell no longer be selected.
    • DesignerCreateView (Base As Object, Lbl As Label, Props As Map) As String
      Base type must be Object
    • EditCell (Row As Int, Col As Int) As String
      eg. Flexgrid.EditCell(1,1)
    • EditCellOnSite (Row As Int, Col As Int) As String
      eg. Flexgrid.EditCell(1,1)
    • GetCellBackgroundColor (Row As Int, Col As Int) As Int
    • GetCellCol (Col As Int) As Object()
      eg. Dim S() as String = Flexgrid.GetCellCol(1)
      eg. Dim B() as Boolean = Flexgrid.GetCellCol(2)
    • GetCellRow (Row As Int) As Object()
      eg Dim Row() as Object = Flexgrid.GetCellRow(1)
    • GetCellTextColor (Row As Int, Col As Int) As Int
    • GetCellTextFont (Row As Int, Col As Int) As B4XFont
    • GetCellValue (Row As Int, Col As Int) As Object
      eg. Dim I as int = Flexgrid.GetCellValue(1,1)
      eg. Dim S as String = FlexGrid.GetCellValue(2,2)
    • GetTypeCol (Col As Int) As Int
      eg. If Flexgrid.GetTypeCol(1)=Flexgrid.TypeInt Then .....
    • Initialize (Callback As Object, EventName As String) As String
    • Invalidate As String
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
    • RemoveRow (Row As Int) As String
      Row (0...n-1)
      eg. Flexgrid.RemoveRow(1)
    • ResetCustomizeCell (Col As Int, Row As Int) As String
      eg. Flexgrid.ResetCustomizeCell(1,1)
    • SearchInColumn (Text As String, Col As Int, FromRow As Int, exactly As Boolean, IgnoreCap As Boolean) As Int
      Search for text in the indicated column starting from the start row.
      If the start row is 0 it will check the entire column.
      It will return the position of the line containing the text
      <code>Dim Col As Int = 5
      Dim Row As Int = FlexGied1.SearchInColumn("My text",Col,0, False, True)
      if Row>-1 then Log("Find in row " & Row) Else log("Don't find")
      </code>
    • SearchInColumn2 (Text As String, Col As Int, FromRow As Int, exactly As Boolean, IgnoreCap As Boolean) As List
      Search for text in the indicated column starting from the start row.
      If the start row is 0 it will check the entire column.
      It will return the list of position of the line containing the text
      <code>Dim Col As Int = 5
      Dim IndexFinded As List = FlexGied1.SearchInColumn2("My text",Col,0, False, True)
      if IndexFinded.Size>0 then Log("Find in row " & Row) Else log("Don't find")
      </code>
    • SelectCell (Row As Int, Col As Int, Mobile As Boolean) As String
      eg. Flexgrid.SelectCell(1,1,True)
      If Mobile is True, the selectable area can be enlarged by touching and dragging it to the desired box.
    • SelectCells (FromRow As Int, FromCol As Int, ToRow As Int, ToCol As Int, Mobile As Boolean) As String
      eg. Flexgrid.SelectCell(1,1,5,4,True)
      If Mobile is True, the selectable area can be enlarged by touching and dragging it to the desired box.
    • SelectCol (Col As Int) As String
      eg. Flexgrid.SelectCol(1)
    • SelectRow (Row As Int) As String
      eg. Flexgrid.SelectRow(1)
    • SetCellCustomize (Row As Int, Col As Int, Text_Color As Int, Background_Color As Int, TextFont As B4XFont) As String
      eg. Flexgrid.SetCellCustomize(1,1,XUI.Color_Black,XUI.Color_White,XUi.CreateDefaultFont(12))
    • SetCellListIndex (Row As Int, Col As Int, Index As Int) As String
    • SetCellValue (Row As Int, Col As Int, Value As Object) As String
      eg. Flexgrid.SetCellValue(1,1,True)
      eg. Flexgrid.SetCellValue(2,2,"OK")
      eg. Flexgrid.SetCellValue(3,3,3)
      eg. Flexgrid.SetCellValue(Row,Col,"A,B,C,D,E") for TypeList
    • SetColAlignment (ColumnIndex As Int, Alignment As String) As String
      Index (0..n-1)
      eg. SetColAlignment(0,"CENTER")
    • SetColCustomize (Col As Int, Text_Color As Int, Background_Color As Int, TextFont As B4XFont) As String
      eg. Flexgrid.SetColCistomize(1,XUI.Color_Black,XUI.Color_White,XUi.CreateDefaultFont(12))
    • SetColName (ColumnIndex As Int, Name As String) As String
      Index (0..n-1)
      eg. Flexgrid.SetColName(1,"Help")
    • SetColsNumber (ColumnNumber As Int) As String
      Reset Grid and Change Cols Number
    • SetColType (ColumnIndex As Int, Typ As Int) As String
      Index (0..n-1)
      eg. SetColType(0,FlexGrid.TypeInt)
    • SetColWidth (ColumnIndex As Int, Width As Int) As String
      Index (0..n-1)
      eg. SetColWidth(0,100dip)
    • SetDataRow (Row As Int, Cell As Object()) As String
      eg. Flexgrid.SetRow(Row,Array As Object(i,B,"User ","Description " ,100.00))
    • SetDataRow2 (Row As Int, Cell As Object(), HeightRow As Int) As String
      eg. Flexgrid.SetRow2(Row,Array As Object(i,B,"User ","Description " ,100.00),40dip)
    • SetFeetHeight (Height As Int) As String
      Set Header Height
    • setFootColValue (col As Int, Fv As String) As String
      eg. Flexgrid.FeetValue=array As String ("First","Second")
    • setHeaderAlignment (Col As Int, Alignment As String) As String
      eg. Flexgrid.HeaderAlignment="CENTER"
    • SetHeadHeight (Height As Int) As String
      Set Header Height
    • SetPadding (Left As Int, Top As Int, Right As Int, Bottom As Int) As String
      eg. FlexGrid1.SetPadding(10dip,0,10dip,0)
    • SetRowCustomize (Row As Int, Text_Color As Int, Background_Color As Int, TextFont As B4XFont) As String
      eg. Flexgrid.SetRowCustomize(1,XUI.Color_Black,XUI.Color_White,XUi.CreateDefaultFont(12))
    • SetRowHeight (IndexRow As Int, Height As Int) As String
      IndexRow (0..Size-1)
      eg. setRowHeight(0,60dip)
    • SetRowsHeight (Height As Int) As String
      Set all Rows Height
    • SetSingleLine (SLine As Boolean) As String
      To set the cells to single or multiple lines
    • SortForCol (Column As Int) As String
  • Properties:
    • Base As B4XView [read only]
    • ColCount As Int [read only]
    • ColorSelectedArea
      Set the color of the selected area
    • ColorSelectingArea
      Set the color of the area during the selection phase
    • ColsAlignment
      eg. setColsAlignment(Array As String ("LEFT","CENTER","CENTER","RIGHT"))
    • ColsName As String()
      eg. Flexgrid.ColName=array As String ("First","Second")
    • ColsType
      eg. ColsType=Array As Int(FlexGrid1.TypeInt,FlexGrid1.TypeCheck,FlexGrid1.TypeString,FlexGrid1.TypeString,FlexGrid1.TypeFloat)
    • ColsWidth
      eg. SetColsWìdth(Array As Int (100dip,50dip,100dip,100dip))
    • Font
      eg. Flexgrid.Font=xui.CreateDefaultFont(12)
    • FootFont
      eg. Flexgrid.FeetFont=xui.CreateDefaultFont(12)
    • FootValue As String()
      eg. Flexgrid.FeetValue=array As String ("First","Second")
    • FootVisible
      eg. FG.FeetVisible=True
    • HeaderFont
      eg. Flexgrid.HeaderFont=xui.CreateDefaultFont(12)
    • HeaderVisible
      eg. FG.HeadVisible=True
    • Height As Int
    • RowCount As Int [read only]
      Dim Size as int = Flexgrid.RowCount
    • ScrollToCol
      eg. Flexgrid.ScroolToCol=50 (Col= 0..Size-1)
    • ScrollToRow
      eg. Flexgrid.ScroolToRow=50 (Row= 0..Size-1)
    • ScrollX As Double
    • ScrollY As Double
    • SelectedColumnEnd As Int [read only]
      return -1 if not selected
    • SelectedColumnStart As Int [read only]
      return -1 if not selected
    • SelectedRowEnd As Int [read only]
      return -1 if not selected
    • SelectedRowStart As Int [read only]
      return -1 if not selected
    • Width As Int

List/Spinner

For more details: https://www.b4x.com/android/forum/threads/xui-flexgrid.98686/

Significative release logs:

• 0.12
  • Add method SelectCells (FromRow As Int, FromCol As Int, ToRow As Int, ToCol As Int, Mobile As Boolean)
  • Modify method SelectCell (Row As Int, Col As Int, Mobile As Boolean)
• 0.15: Added HeaderFont
• 0.16: Added SetColsNumber method.
• 0.19 (Sample)
  • Add method AddRowCustomize (Cell As Object()
  • Add method SearchInColumn (Text As String, Col As Int, FromRow As Int, exactly As Boolean, IgnoreCap As Boolean) As Int
• 0.21
  • Add TypeList. Allows you to add a ComboBox type box (Spinner in B4A and Picker in B4i) and select to a list
  • Added other examples to POST n. 2 To populate the grid from the database, search for a string in a column and to use TypeList in the grid
  • added SetCellListIndex method to change the position of the selected index
• 0.25
  • Added SetHeadHeight method
    sets the height of the header
  • Added SetRowsHeight method
    sets the height of all lines
• 0.27
  • added properties ScrollX and ScrollY
  • Added events ScrollX() and ScrollY()
• 0.29: Fixed bugs in vertical scrolling
• 0.31
  • Added SortForCol(Column As Int)
  • Added SetDataRow(Row As Int, Cell() As Object) and SetDataRow2(Row As Int, Cell() As Object, HeightRow As Int)
  • Added field ColorSelectedArea and ColorSelectingArea
  • Fix bug
• 0.32
  • Added SearchInColumn2. Returns the list of search result lines
• 0.33
  • Added setHeaderAlignment
• 0.34
  • Added the ability to freeze the last row (foot row) as well as the header so you can enter column totals that always remain visible
  • Fix minor bugs
• 0.35
  • Added the ability to select from Design that text cells are single or multiline
• 0.36
  • Fix bugs: SortForCol; SetColsNumber
• 0.37
  • Added: EditTextColor and EditBackgroundColor fields to be able to select colors for the on-site editable cell. By default it is black background and white text
• 0.38
  • Fixed bug on CheckBox alignment
• 0.39
  • Singleline and multiline option of the design now also affects the column header and column foot
• 0.40
  • Added ScrollToCol (together with ScrollToRow it is possible to position in a specific cell)
• 0.41
  • Fix bug
• 0.42
  • Added Width and Height to change the size of the grid from code during execution
• 0.43
  • Fixed bug on SearchInColumn2
• 0.44
  • Added SetSingleLine - To set the cells to single or multiple lines
• 0.45
  • Added SetPadding

 

[Star-Dust]

Examples for the use of the methods

Attached an example on how to populate the grid from a DB Sqlite
If you have to enter a lot of lines don't set Refresh to true. Insert invalidate at the end from the insert as in the example

Db.Initialize(File.DirInternal,"sample.db",False)
Dim res As ResultSet = Db.ExecQuery("SELECT * FROM list")

Do While res.NextRow
FlexGrid1.AddRow(Array As Object(res.GetString("Name"),res.Getint("Number"),(res.GetString("Active")="Y")),False)
Loop
FlexGrid1.Invalidate

Example AddRowCustomize

Dim B As boolean = False
For i=11 To 100
   B=Not(B)
   If b Then
       FlexGrid1.AddRowCustomize(Array As Object("B" & i,i,B,"User " & i,Null,Rnd(50,1000)/10),xui.Color_Black,0xFFFFFFFF,xui.CreateDefaultFont(16),True)
   Else
       FlexGrid1.AddRowCustomize(Array As Object("B" & i,i,B,"User " & i,Null,Rnd(50,1000)/10),xui.Color_Black,0xFF44FF44,xui.CreateDefaultFont(16),True)
   End If
Next

Example SearchInColumn

Dim rw As Int = FlexGrid1.SearchInColumn("User 10",3,0,True,True)
If rw>-1 Then FlexGrid1.SelectCell(rw,3,False)
Log("Find :" & rw)

Example TypeList (FG_Sample2)

FlexGrid1.ColsName=Array As String("ID","Sel","User","Img","Digit","List")
FlexGrid1.ColsType=Array As Int(FlexGrid1.TypeInt,FlexGrid1.TypeCheck,FlexGrid1.TypeString,FlexGrid1.TypeImage,FlexGrid1.TypeFloat,FlexGrid1.TypeList)

Dim ListItem As String =  "Jan,Feb,Mar,Apr,May,June,Jul"
For i=1 To 10
        FlexGrid1.AddRow(Array As Object(i,b,"User " & i,Null,Rnd(50,1000)/10,LIstItem),True)
Next

FlexGrid1.SetCellListIndex(0,5,3)  ' Row=0, Col = 5 , Index = 3

NEW EXAMPLE (Example 4)
Get a fixed row at the bottom of the row, similar to a column total
Obtain a Fixed Column to the left of the Table

 

[monki]

Hallo star-Dust,
great work but it not work with b4j 7.00?

Spoiler: Error Log

B4J Version: 7.00
Java Version: 8
Parsing code. (0.07s)
Building folders structure. (0.03s)
Compiling code. (0.10s)
Compiling layouts code. (0.00s)
Organizing libraries. (0.00s)
Compiling generated Java code. Error
Cannot find: D:\PRG\B4J 7.00\B4J\libraries\xui.jar

monki

 

[Cableguy]

You have to copy the XUI libs to the corresponding folders, and select it in the libs tab

 

[monki]

Hallo cableguy,
The Jxui lib is a intern lib und come with the Installation.
The jxui lib is in the internal lib folder and jxui is selected in the libs tab.
Die error Log say " Cannot find: D:\PRG\B4J 7.00\B4J\libraries\xui.jar"
The xui.jar is the Name of the B4A xui lib.

Monki

 

[Star-Dust]

Hallo star-Dust,
great work but it not work with b4j 7.00?

Spoiler: Error Log

B4J Version: 7.00
Java Version: 8
Parsing code. (0.07s)
Building folders structure. (0.03s)
Compiling code. (0.10s)
Compiling layouts code. (0.00s)
Organizing libraries. (0.00s)
Compiling generated Java code. Error
Cannot find: D:\PRG\B4J 7.00\B4J\libraries\xui.jar

monki

I'm sorry, but as you have observed from the files I have not released the version for B4J yet, but only B4A and B4i.
You are using the Android version on B4J

 

[DonManfred]

I have not released the version for B4J yet, but only B4A and B4i.
You are using the Android version on B4J

You should not mark this thread as B4X then if it is only for B4A and B4I.

 

[Cableguy]

You should not mark this thread as B4X then if it is only for B4A and B4I.

Why not!? @Erel has realeased XUI libs that only target B4J and B4A, not b4i... He does however need to make this CLEAR in the release thread!

 

[DonManfred]

@Erel has realeased XUI libs that only target B4J and B4A, not b4i...

really? Which one?

btw XUI != B4X

He does however need to make this CLEAR in the release thread!

i would suggest the same

 

[Cableguy]

Also, as stated In the release thread, this lib is BETA so it is not unusual for it to be... Not complete(ly) XUI

 

[Star-Dust]

Why not!? @Erel has realeased XUI libs that only target B4J and B4A, not b4i... He does however need to make this CLEAR in the release thread!

True, for example, the B4X libraries were announced only for B4A and B4J but only after a few weeks we were able to use them in B4i. But the thread was marked B4X.

There are other examples in this regard, but I do not want to prolong and i want to avoid controversy. I prefer to remove B4X and put it back when I add the B4J version.

 

[Erel]

As I see it, it is completely fine to mark a thread with [B4X] even if it only supports two platforms. You should explain it in the library instructions.

[B4X] tag is important as the search engine treats such threads as multiplatform.

 

[Robert Valentino]

I was checking out your example program and was trying to figure out what causes the below routine to get called 21 times when the program starts?

Sub FlexGrid1_CellClick(Row As Int, Col As Int)
    If Col=0 Then
        FlexGrid1.SelectRow(Row)
    Else
        Select FlexGrid1.GetTypeCol(Col)
            Case FlexGrid1.TypeCheck
                Dim B As Boolean = FlexGrid1.GetCellValue(Row,Col)
                Log("Cell content: " & B)
            Case FlexGrid1.TypeImage
'                Dim Bm As Bitmap = FlexGrid1.GetCellValue(Row,Col)
'                Log("Cell content: " & Bm)
            Case FlexGrid1.TypeInt
                Dim I As String = FlexGrid1.GetCellValue(Row,Col)
                Log("Cell content: " & I)
                FlexGrid1.EditCellonsite(Row,Col)
            Case FlexGrid1.TypeFloat
                Dim F As String = FlexGrid1.GetCellValue(Row,Col)
                Log("Cell content: " & F)
            Case FlexGrid1.TypeDouble
                Dim D As String = FlexGrid1.GetCellValue(Row,Col)
                Log("Cell content: " & D)
            Case FlexGrid1.TypeString
                Dim S As String = FlexGrid1.GetCellValue(Row,Col)
                Log("Cell content: " & S)
        End Select
    End If
End Sub

 

[sn_nn]

Very nice grid! But, can i scroll SD_flexgrid to some Column? (Using some like ScrollToCol=15)

 

[Benny Chen]

Easy to used !
Thank you very much !

 

[Star-Dust]

Very nice grid! But, can i scroll SD_flexgrid to some Column? (Using some like ScrollToCol=15)

Use ScrollToRow

 

[Xfood]

and this beautiful grid, could you add the search like b4xtable, and if I don't ask much the possibility to order the columns like b4xtable? thank you so much

 

[Star-Dust]

and this beautiful grid, could you add the search like b4xtable, and if I don't ask much the possibility to order the columns like b4xtable? thank you so much

Unfortunately, this feature is not currently implemented

 

[yuhaowang]

I created a new library to show a table (or grid) similar to the one in EXCEL.

There are already excellent classes that allow many to accomplish things, such as xCustomListView by @Erel (B4X) and with the FlexibleTable by @klaus (B4A)

I wanted to make something slightly different suited to my needs.

Explanations:

1. To get the calculation of the cells that contain a formula I have added Erel's B4XEvalto my Library, but as soon as possible I will make it external so that everyone can modify it according to their needs.
2. To select multiple cells, position yourself on the first cell of those to be selected (the one at the top left) click a shot and then click again and drag your finger to cover all the cells (or area) that you want to select
3. It is still in beta version, presents problems in large grids.
4. Now only for B4A and B4i

SD_FlexGrid

Author: Star-Dust
Version: 0.05

• Eval
  By Erel Uziel
  • Fields:
    • Error As Boolean
  • Functions:
    • Calculate (Expression As String) As Double
    • Class_Globals As String
    • Initialize (FG As FlexGrid) As String
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
• FlexGrid
  • Events:
    • CellClick (Row As Int, Col As Int)
    • CellLongClick (Row As Int, Col As Int)
    • HeadClick (Index As Int)
    • Modified (Row As Int, Col As Int)
  • Fields:
    • ActiveCheckBox As Boolean
    • TypeButton As Int
    • TypeCheck As Int
    • TypeDouble As Int
    • TypeFloat As Int
    • TypeImage As Int
    • TypeInt As Int
    • TypeString As Int
  • Functions:
    • AddRow (Cell As Object(), Refresh As Boolean) As String
      eg. Flexgrid.AddRow(Array As Object(i,B,"User ","Description " ,100.00), True)
    • AddRow2 (Cell As Object(), HeightRow As Int, Refresh As Boolean) As String
      eg. Flexgrid.AddRow(Array As Object(i,B,"User ","Description " ,100.00),40dip,True)
    • AddRowAt (index As Int, Cell As Object(), Refresh As Boolean) As String
      eg. Flexgrid.AddRow(2,Array As Object(i,B,"User ","Description " ,100.00), True)
    • AddToParent (Parent As B4XView, Left As Int, Top As Int, Width As Int, Height As Int, ColsNumber As Int) As String
      Parent is Panel to Add Grid
      eg. Flexgrid.AddToParent(Activity,0,0,100%x,100%y,5)
    • Class_Globals As String
    • ClearRow As String
    • ClearSelection As String
    • DesignerCreateView (Base As Object, Lbl As Label, Props As Map) As String
      Base type must be Object
    • EditCell (Row As Int, Col As Int) As String
      eg. Flexgrid.EditCell(1,1)
    • EditCellOnSite (Row As Int, Col As Int) As String
      eg. Flexgrid.EditCell(1,1)
    • GetCellCol (Col As Int) As Object()
      eg. Dim S() as String = Flexgrid.GetCellCol(1)
      eg. Dim B() as Boolean = Flexgrid.GetCellCol(2)
    • GetCellRow (Row As Int) As Object()
      eg Dim Row() as Object = Flexgrid.GetCellRow(1)
    • GetCellValue (Row As Int, col As Int) As Object
      eg. Dim I as int = Flexgrid.GetCellValue(1,1)
      eg. Dim S as String = FlexGrid.GetCellValue(2,2)
    • GetTypeCol (Col As Int) As Int
      eg. If Flexgrid.GetTypeCol(1)=Flexgrid.TypeInt Then .....
    • Initialize (Callback As Object, EventName As String) As String
    • Invalidate As String
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
    • RemoveRow (Row As Int) As String
      Row (0...n-1)
      eg. Flexgrid.RemoveRow(1)
    • ResetCustomizeCell (Col As Int, Row As Int) As String
      eg. Flexgrid.ResetCustomizeCell(1,1)
    • SelectCell (Row As Int, Col As Int) As String
      eg. Flexgrid.SelectCell(1,1)
    • SelectCol (Col As Int) As String
      eg. Flexgrid.SelectCol(1)
    • SelectPanel_Touch (Action As Int, X As Float, Y As Float) As String
    • SelectRow (Row As Int) As String
      eg. Flexgrid.SelectRow(1)
    • SetCellCustomize (Row As Int, Col As Int, Text_Color As Int, Background_Color As Int, TextFont As B4XFont) As String
      eg. Flexgrid.SetCellCustomize(1,1,XUI.Color_Black,XUI.Color_White,XUi.CreateDefaultFont(12))
    • SetCellValue (Row As Int, Col As Int, Value As Object) As String
      eg. Flexgrid.SetCellValue(1,1)=True
      eg. Flexgrid.SetCellValue(2,2)="OK"
      eg. Flexgrid.SetCellValue(3,3)=3
    • SetColAlignment (ColumnIndex As Int, Alignment As String) As String
      Index (0..n-1)
      eg. SetColAlignment(0,"CENTER")
    • SetColCustomize (Col As Int, Text_Color As Int, Background_Color As Int, TextFont As B4XFont) As String
      eg. Flexgrid.SetColCistomize(1,XUI.Color_Black,XUI.Color_White,XUi.CreateDefaultFont(12))
    • SetColName (ColumnIndex As Int, Name As String) As String
      Index (0..n-1)
      eg. Flexgrid.SetColName(1,"Help")
    • SetColType (ColumnIndex As Int, Typ As Int) As String
      Index (0..n-1)
      eg. SetColType(0,FlexGrid.TypeInt)
    • SetColWidth (ColumnIndex As Int, Width As Int) As String
      Index (0..n-1)
      eg. SetColWidth(0,100dip)
    • SetRowCustomize (Row As Int, Text_Color As Int, Background_Color As Int, TextFont As B4XFont) As String
      eg. Flexgrid.SetRowCustomize(1,XUI.Color_Black,XUI.Color_White,XUi.CreateDefaultFont(12))
    • SetRowHeight (IndexRow As Int, Height As Int) As String
      IndexRow (0..Size-1)
      eg. setRowHeight(0,60dip)
  • Properties:
    • Base As B4XView [read only]
    • ColsAlignment
      eg. setColsAlignment(Array As String ("LEFT","CENTER","CENTER","RIGHT"))
    • ColsName
      eg. Flexgrid.ColName=array As String ("First","Second")
    • ColsType
      eg. ColsType=Array As Int(FlexGrid1.TypeInt,FlexGrid1.TypeCheck,FlexGrid1.TypeString,FlexGrid1.TypeString,FlexGrid1.TypeFloat)
    • ColsWidth
      eg. SetColsWìdth(Array As Int (100dip,50dip,100dip,100dip))
    • Font
      eg. Flexgrid.setFont(xui.CreateDefaultFont(12))
    • RowCount As Int [read only]
      Dim Size as int = Flexgrid.RowCount
    • ScrollToRow
      eg. Flexgrid.ScroolToRow=50
• OrderData
  • Fields:
    • Added As Int
    • Index As Int
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
    • Level As Int
  • Functions:
    • Initialize
      Inizializza i campi al loro valore predefinito.
• ParsedNode
  • Fields:
    • IsInitialized As Boolean
      Verifica se l'oggetto sia stato inizializzato.
    • Left As ParsedNode
    • NodeType As Int
    • Operator As String
    • Right As ParsedNode
    • Value As Double
  • Functions:
    • Initialize
      Inizializza i campi al loro valore predefinito.

View attachment 75757 View attachment 75758 View attachment 75760
View attachment 75761 View attachment 75762 View attachment 75759

For more details: https://www.b4x.com/android/forum/threads/xui-flexgrid.98686/

Hello. How can I always locate it in the last line
Flexgrid.ScroolToRow=bottom？
Flexgrid.TopRow = Flexgrid.Rows - 1?

 

[Star-Dust]

Hello. How can I always locate it in the last line
Flexgrid.ScroolToRow=bottom？
Flexgrid.TopRow = Flexgrid.Rows - 1?

Flexgrid.ScrollToRow=FlexGrid.RowCount