DataGrid com CheckBox
Estou desenvolvendo uma aplicação em Delphi/Asp.Net, inseri um DataGrid e adicionei um CheckBox a ele, o meu objetivo é quando o cliente quiser escluir um ítem do banco de dados ele marcar o ítem na Grid e clica no botão excluir, mas não encontrei nenhuma forma de verificar quais ítens estão marcados na Grid e pegar as informações referentes a este ítem, alguém pode me ajudar?
Obrigado!
Obrigado!
Adam
Curtidas 0
Respostas
Adam
23/01/2007
Consegui o código, mas está em Vb.Net, alguém pode me ajudar a traduzir para Delphi, não entendi para que server o DirectCast, por exemplo, segue o código abaixo:
Private Sub Button1_Click(ByVal sender As Object,
ByVal e As System.EventArgs) Handles Button1.Click
For Each item As DataGridItem In Me.DataGrid1.Items
If item.ItemType = ListItemType.Item OrElse
item.ItemType = ListItemType.AlternatingItem Then
Dim chk As CheckBox = DirectCast(item.FindControl(´CheckBox1´), CheckBox)
If chk.Checked Then
Me.Label1.Text &= item.Cells(2).Text & ´
´;
End If
End If
Next
End Sub
Private Sub Button1_Click(ByVal sender As Object,
ByVal e As System.EventArgs) Handles Button1.Click
For Each item As DataGridItem In Me.DataGrid1.Items
If item.ItemType = ListItemType.Item OrElse
item.ItemType = ListItemType.AlternatingItem Then
Dim chk As CheckBox = DirectCast(item.FindControl(´CheckBox1´), CheckBox)
If chk.Checked Then
Me.Label1.Text &= item.Cells(2).Text & ´
´;
End If
End If
Next
End Sub
GOSTEI 0