Table Control

[harry5568]

Dear Administrator,
I could not find much help in the manual regarding use of Table control(or did I miss out on something!!).
Only help available are the source codes submitted by a few members.
For a newbie like me, is it possible to send-in info regarding complete use of the Table control,i.e it's creation,putting in data,data manipulation and its retrieval.
Thanx in advance...Harry :sign0163:

 

[harry5568]

My Specific requirement is as follows:
To make a 12x12 table with column headers as 50,52,54,56,58,60,62,64,66,68,70,72
row headers as 290,300,310,320,330,340,350,360,370,380,390.
A portion of table looks like:
50 52 54 56 58 60
290 -5 -3 -3 -5 -2 -1
300 2 3 4 3 1 6
310 2 1 8 1 9 0
320 6 2 5 1 8 2
330 1 4 1 5 1 0
340 9 1 0 1 7 8
Firstly, how do i create this table via table control without using csv/xml??
Secondly,how do i add/remove row/column headers and other data??
Thirdly,with reference from two combo boxes on the form,one giving column input and other giving the row input, how do I display the result in a textbox/label.For e.g,if one combobox gives input as 58 and other combobox as 320, how will textbox/label indicate 8,taking reference from the above table??
I'm sure its very simple for most of you.Will be very grateful for your replies.
Harry

 

[Erel]

A list with the methods and properties of the Table control is available here: Basic4ppc - Main Help

The steps required to build a table are:
1. Use Table.AddCol for each column
2. Use Table.AddRow for each row

 

[derez]

Harry
look here and you'll find some code for table management:
http://www.b4x.com/forum/share-your-creations/1113-minimat-matrix-calculator.html#post5837
There is a table design part in which you create a table, add and delete rows and columns and update the contents of cells.
I hope it will help you.

 

[harry5568]

Erel,
Thanks. I know that tutorial exists.If you could find time, please address my specific req as mentioned above,esp the third one,i.e
"Thirdly,with reference from two combo boxes on the form,one giving column input and other giving the row input, how do I display the result in a textbox/label.For e.g,if one combobox gives input as 58 and other combobox as 320, how will textbox/label indicate 8,taking reference from the above table??"
Thx...Harry

 

[Erel]

How many rows will you have in your table? If the table is not too large we can use a simpler approach.

 

[mjcoon]

For e.g, if one combobox gives input as 58 and other combobox as 320, how will textbox/label indicate 8,taking reference from the above table??"

I think that the basic choices are to have a visible table, in which case the cell you want would be displayed (with automatic scrolling of the whole table in the visible area) if you set the row and column to be "selected" using Table.SelectCell(). Or to have the table invisible as a hidden storage mechanism and extract the data from the cell chosen via your combo boxes using Table.Cell().

Whether you need a Save...() or Load...() depends on how the data is going to get into your table and whether you wish to retain any edits made to it.

HTH, Mike.

 

[harry5568]

How many rows will you have in your table? If the table is not too large we can use a simpler approach.

Hi Erel...The table has 12 rows and 12 columns.I don't intend changing the data in the table once it is filled-in. The data in the table is for reference only and will appear in the text-box when called for.
Thanx...I sound like such a layman amongst you guys:BangHead:...Harry

 

[harry5568]

Harry
look here and you'll find some code for table management:
http://www.b4x.com/forum/share-your-creations/1113-minimat-matrix-calculator.html#post5837
There is a table design part in which you create a table, add and delete rows and columns and update the contents of cells.
I hope it will help you.

derez..your minimat is quite complicated..i couldn't make out Head or Tail.
Also, some dll file is missing during run-up:signOops:.Thanx..Harry

 

[harry5568]

Whether you need a Save...() or Load...() depends on how the data is going to get into your table and whether you wish to retain any edits made to it.

hi mj..a very basic question...does the table have to be created everytime the program would run even if we just use the table for reference, OR would i have to everytime save it as a csv file...i mean ..won't the table stay permanently in the default memory of the table control??
I may be sounding stupid.Thanx...Harry:sign0144:

 

[Erel]

I've attached a small program which will help you get started.

Sub Globals
    'Declare the global variables here.

End Sub

Sub App_Start
    Form1.Show
    For col = 50 To 72 Step 2
        table1.AddCol(cNumber, col, 20)
    Next
    table1.ColWidth("50") = 40
    table1.AddRow(290, -5,-3) 'add the other values
    table1.AddRow(300, 2, 3)
    table1.AddRow(310, 2, 1)
    table1.AddRow(320, 6, 2)
    'fill the comboboxes
    For i = 0 To table1.ColCount - 1
        cmbCol.Add(table1.ColName(i))
    Next
    For i = 0 To table1.RowCount - 1
        cmbRow.Add(table1.Cell(50, i))
    Next
End Sub

Sub cmbCol_SelectionChanged (Index, Value)
    UpdateLabel
End Sub
Sub cmbRow_SelectionChanged (Index, Value)
    UpdateLabel
End Sub
Sub UpdateLabel
    If cmbCol.SelectedIndex = -1 OR cmbRow.SelectedIndex = -1 Then Return
    col = cmbCol.Item(cmbCol.SelectedIndex)
    rowValue = cmbRow.Item(cmbRow.SelectedIndex)
    For i = 0 To table1.RowCount - 1
        If table1.Cell("50", i) = rowValue Then
            row = i
            Exit 'exits the for loop
        End If
    Next
    label1.Text = table1.Cell(col, row)
End Sub

 

[harry5568]

amazing, fabulous,mindblowing.....3 cheers for you erel.. u're an angel...m glad u cud spare some time for me...i haven't gone through it yet..i'll ask u any doubts later:sign0188::sign0098::sign0142::sign0060:
harry

 

[harry5568]

Erel...seriously..On Second LOOK...this is what I Xactly Wanted...basic4ppc ROCKS!!! Very Many Thanks indeed i can take erel for a joyride in my cockpit on a320...he's a good man:sign0188:harry

 

[klaus]

Hi Harry,

As the values in your table are always the same you don't need a table control. You could easily use a two dimension array variable.
With the combobox indexes you get the array variable indexes and you can display the desired value.

Attached a small example program.
The values are initialized directly in the code, but this could also be done in a file and loading this one at the beginning of the program.

Best regards.

 

[Caravelle]

i can take erel for a joyride in my cockpit on a320

Whose cockpit would that be? People who can afford Airbus A320s don't usually write their own programs!

Caravelle

 

[harry5568]

Whose cockpit would that be? People who can afford Airbus A320s don't usually write their own programs!

Caravelle

hehe...the cockpit of the a320 i fly for my company belongs to me when i fly it..
asfaras writing own programs is concerned, one doesen't have to have tonnes of money to stop programming,or qualify as a pauper and then start programming:icon_clap:

 

[nl1007]

I've attached a small program which will help you get started.

...
    For i = 0 To table1.RowCount - 1
        cmbRow.Add(table1.Cell(50, i))
    Next
End Sub

...

Sub UpdateLabel
    If cmbCol.SelectedIndex = -1 OR cmbRow.SelectedIndex = -1 Then Return
    col = cmbCol.Item(cmbCol.SelectedIndex)
    rowValue = cmbRow.Item(cmbRow.SelectedIndex)
    For i = 0 To table1.RowCount - 1
        If table1.Cell("50", i) = rowValue Then
            row = i
            Exit 'exits the for loop
        End If
    Next
    label1.Text = table1.Cell(col, row)
End Sub

Since the Combo 'cmbRow' is filled from the table, surely cmbRow.SelectedIndex is the row number? You don't need to look for the text.. (row=cmbRow.SelectedIndex), skip the For..Next block.