代码如下:
intLeft = DGNews.Left + DGNews.Columns.Item(DGNews.Col).Left
intTop = DGNews.Top + DGNews.Columns.Item(DGNews.Col).Top + DGNews.RowHeight * DGNews.Row
CboData.Move intLeft, intTop, DGNews.Columns.Item(DGNews.Col).Width ', DGNews.Height
开始俩行看着位置是正确的,但是越往下点(row越大),combox的位置就越偏上,将datagrid的高度改成与combox一样了也不行,真怀疑这两个高度用的是不是一个单位,请各位大虾帮忙看看。
intLeft = DGNews.Left + DGNews.Columns.Item(DGNews.Col).Left
intTop = DGNews.Top + DGNews.Columns.Item(DGNews.Col).Top + DGNews.RowHeight * DGNews.Row
CboData.Move intLeft, intTop, DGNews.Columns.Item(DGNews.Col).Width ', DGNews.Height
开始俩行看着位置是正确的,但是越往下点(row越大),combox的位置就越偏上,将datagrid的高度改成与combox一样了也不行,真怀疑这两个高度用的是不是一个单位,请各位大虾帮忙看看。
m_ActiveCell.row = MSFlexGrid1.row
m_ActiveCell.col = MSFlexGrid1.col
With txtEdit
.Top = MSFlexGrid1.CellTop + MSFlexGrid1.Top
.Left = MSFlexGrid1.CellLeft + MSFlexGrid1.Left
.Width = MSFlexGrid1.CellWidth
.Text = MSFlexGrid1.Text
.Visible = True
.ZOrder
.SetFocus
End With
End If