【发布时间】:2016-04-26 06:34:15
【问题描述】:
我的程序中有DataGridView,我在MouseMove下编写了一个自定义工具提示,就像这样......
Private Sub dgv_dokument_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles dgv_dokument.MouseMove
Dim hit As DataGridView.HitTestInfo = dgv_dokument.HitTest(e.X, e.Y)
If hit.Type = DataGridViewHitTestType.Cell Then
If hit.ColumnIndex >= 0 AndAlso hit.RowIndex >= 0 Then
Dim s As Integer = Convert.ToInt32(dgv_dokument.Item(co.GetColIndex(dgv_dokument, "myNumCol"), hit.RowIndex).Value)
Dim ttText As String = ""
If s > 0 Then
Dim sb As New StringBuilder
get_data(s, sb)
ttText = sb.ToString
End If
dgv_dokument.Item(hit.ColumnIndex, hit.RowIndex).ToolTipText = ttText
Exit Sub
End If
End If
End Sub
在 get_data(s, sb) 下,我用字符串填充 StringBuilder,表示“列”格式化数据,如下所示...
sb.Append(code.ToString.PadLeft(5) + " ")
sb.Append(name.Trim.PadRight(27) + " ")
sb.Append(meas.Trim.PadRight(3) + " ")
sb.Append(qty.ToString("N2").PadLeft(10) + " ")
sb.Append(price.ToString("N2").PadLeft(12))
sb.Append(Environment.NewLine)
这一切都很好,除了我希望我的工具提示列对齐。这可以通过在 ToolTop 中使用比例字体来完成。
我能否以某种方式(以及如何)确定 DataGridView 工具提示的默认字体以外的其他字体?例如“新快递”。
【问题讨论】: