グリッドのデータ転送とバルーンチップの表示処理
グリッドのデータをクリックすると、GcComboFrameコントロールのLabelコントロールに転送する処理と、バルーンチップを表示する処理を作成します。
なお、フォームのLoadイベントハンドラは、C1FlexGrid1コントロールにデータベースを連結した時に自動的に作成されたコードが記述されています。
グリッドのデータ転送処理
この処理は、C1FlexGridコントロールのClickイベントハンドラに作成します。
グリッドのセルがクリックされると、Rowプロパティにその行番号が格納されますので、そのまま行番号と列番号を指定して、セルの値をGcComboFrameコントロールに配置したLabelコントロールのTextプロパティに順番に代入していきます。
C1FlexGrid1からC1FlexGrid4までは、最初のLabelコントロールに値が代入された時点で、次のGcComboFrameコントロールを有効にする処理を組み込みます。
これで、グリッドのセルをどれか1つクリックすれば、その行のデータがすべてLabelコントロールに転送されます。
Private Sub C1FlexGrid1_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid1.Click Dim i As Integer = C1FlexGrid1.Row Label7.Text = C1FlexGrid1(i, 2).ToString() Label8.Text = C1FlexGrid1(i, 3).ToString() Label9.Text = C1FlexGrid1(i, 4).ToString() Label10.Text = C1FlexGrid1(i, 5).ToString() Label11.Text = C1FlexGrid1(i, 6).ToString() If Label7.Text <> "" Then GcComboFrame2.Enabled = True End If End Sub Private Sub C1FlexGrid2_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid2.Click Dim i As Integer = C1FlexGrid1.Row Label12.Text = C1FlexGrid1(i, 2).ToString() Label13.Text = C1FlexGrid1(i, 3).ToString() Label14.Text = C1FlexGrid1(i, 4).ToString() Label15.Text = C1FlexGrid1(i, 5).ToString() Label16.Text = C1FlexGrid1(i, 6).ToString() If Label12.Text <> "" Then GcComboFrame3.Enabled = True End If End Sub Private Sub C1FlexGrid3_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid3.Click Dim i As Integer = C1FlexGrid1.Row Label17.Text = C1FlexGrid1(i, 2).ToString() Label18.Text = C1FlexGrid1(i, 3).ToString() Label19.Text = C1FlexGrid1(i, 4).ToString() Label20.Text = C1FlexGrid1(i, 5).ToString() Label21.Text = C1FlexGrid1(i, 6).ToString() If Label17.Text <> "" Then GcComboFrame4.Enabled = True End If End Sub Private Sub C1FlexGrid4_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid4.Click Dim i As Integer = C1FlexGrid1.Row Label22.Text = C1FlexGrid1(i, 2).ToString() Label23.Text = C1FlexGrid1(i, 3).ToString() Label24.Text = C1FlexGrid1(i, 4).ToString() Label25.Text = C1FlexGrid1(i, 5).ToString() Label26.Text = C1FlexGrid1(i, 6).ToString() If Label22.Text <> "" Then GcComboFrame5.Enabled = True End If End Sub Private Sub C1FlexGrid5_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid5.Click Dim i As Integer = C1FlexGrid1.Row Label27.Text = C1FlexGrid1(i, 2).ToString() Label28.Text = C1FlexGrid1(i, 3).ToString() Label29.Text = C1FlexGrid1(i, 4).ToString() Label30.Text = C1FlexGrid1(i, 5).ToString() Label31.Text = C1FlexGrid1(i, 6).ToString() End Sub
private void c1FlexGrid1_Click(object sender, EventArgs e) { int i = c1FlexGrid1.Row; label7.Text = c1FlexGrid1[i, 2].ToString(); label8.Text = c1FlexGrid1[i, 3].ToString(); label9.Text = c1FlexGrid1[i, 4].ToString(); label10.Text = c1FlexGrid1[i, 5].ToString(); label11.Text = c1FlexGrid1[i, 6].ToString(); if(label7.Text != "") { gcComboFrame2.Enabled = true; } } private void c1FlexGrid2_Click(object sender, EventArgs e) { int i = c1FlexGrid1.Row; label12.Text = c1FlexGrid1[i, 2].ToString(); label13.Text = c1FlexGrid1[i, 3].ToString(); label14.Text = c1FlexGrid1[i, 4].ToString(); label15.Text = c1FlexGrid1[i, 5].ToString(); label16.Text = c1FlexGrid1[i, 6].ToString(); if (label12.Text != "") { gcComboFrame3.Enabled = true; } } private void c1FlexGrid3_Click(object sender, EventArgs e) { int i = c1FlexGrid1.Row; label17.Text = c1FlexGrid1[i, 2].ToString(); label18.Text = c1FlexGrid1[i, 3].ToString(); label19.Text = c1FlexGrid1[i, 4].ToString(); label20.Text = c1FlexGrid1[i, 5].ToString(); label21.Text = c1FlexGrid1[i, 6].ToString(); if (label17.Text != "") { gcComboFrame4.Enabled = true; } } private void c1FlexGrid4_Click(object sender, EventArgs e) { int i = c1FlexGrid1.Row; label22.Text = c1FlexGrid1[i, 2].ToString(); label23.Text = c1FlexGrid1[i, 3].ToString(); label24.Text = c1FlexGrid1[i, 4].ToString(); label25.Text = c1FlexGrid1[i, 5].ToString(); label26.Text = c1FlexGrid1[i, 6].ToString(); if (label22.Text != "") { gcComboFrame5.Enabled = true; } } private void c1FlexGrid5_Click(object sender, EventArgs e) { int i = c1FlexGrid1.Row; label27.Text = c1FlexGrid1[i, 2].ToString(); label28.Text = c1FlexGrid1[i, 3].ToString(); label29.Text = c1FlexGrid1[i, 4].ToString(); label30.Text = c1FlexGrid1[i, 5].ToString(); label31.Text = c1FlexGrid1[i, 6].ToString(); }