|
A nebylo by jednodušší, kdyby MS přidal další vlastnost.
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.TopCenter
třeba na
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.VerticalTopCenter
Bylo by to jednodušší. Ale určitě se dočkáme ve frameworku 4 :-) Jinak jsem to samozřejmě vyřešil funkcí.
.Columns(ColumnIndex).HeaderText = String.Format(PrevodNaVertikalniText(DataGrid.Columns(ColumnIndex).HeaderText), vbCrLf)
Function PrevodNaVertikalniText(ByVal NazevSloupce As String) As String
Dim VertikalniText As String = ""
Dim i As Integer
For i = 0 To NazevSloupce.Length - 1
VertikalniText = VertikalniText & "" & NazevSloupce.Substring(i, 1) & "{0}"
Next
Return VertikalniText
End Function
|