DATAGRID中选中一行？

tianda 2003-03-20 05:13:04

各位老大
如何任意点中DATAGRID中一格，可以选中一行？
谢谢先！！！

...全文

95 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

ivt 2003-03-22

打赏
举报

msflexgrid有一个selectionmode属性
问你是否选中整行或整列或自由选取
0----------flexselectionfree
1----------flexselectionbyrow
2-----------------------bycolumn
不知能不能达到你的要求

xinshou1979330 2003-03-22

打赏
举报

同意一楼说的

和MSHFLEXGRID一样的

VbtoDelphi 2003-03-22

打赏
举报

youhao(勇攀高峰)
我给你解除bug!
Private Sub DataGrid1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
if DataGrid1.RowContaining(Y)<>-1 then
DataGrid1.Row = DataGrid1.RowContaining(Y) ‘选中点击的当前行，并把当前行的数据赋给text控件显示！
Text1.Text = DataGrid1.Columns(1).Text
Text2.Text = DataGrid1.Columns(2).Text
Text3.Text = DataGrid1.Columns(3).Text
Text4.Text = DataGrid1.Columns(4).Text
Text5.Text = DataGrid1.Columns(5).Text
end if
End Sub

chenyu5188 2003-03-21

打赏
举报

完全同意楼上的

yessie 2003-03-21

打赏
举报

mouseclick?

youhao 2003-03-20

打赏
举报

Private Sub DataGrid1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
DataGrid1.Row = DataGrid1.RowContaining(Y) ‘选中点击的当前行，并把当前行的数据赋给text控件显示！
Text1.Text = DataGrid1.Columns(1).Text
Text2.Text = DataGrid1.Columns(2).Text
Text3.Text = DataGrid1.Columns(3).Text
Text4.Text = DataGrid1.Columns(4).Text
Text5.Text = DataGrid1.Columns(5).Text
End Sub

本门课程的技术呢比较陈旧,视频中的有些杂音,如果你们公司用不着这个技术你就别学了,因为这技术确实已经挺老的了,可以学一些新的前端技术,例如BootStrap或者Vue,或者angularJS啦什么都可以. 课程目标: 1.熟练掌握...