グリッドのデータ転送とバルーンチップの表示処理
グリッドのデータをクリックすると、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();
}
