ナレッジベース

SPREAD for Windows Forms 7.0J

修正済み

行数が0（ゼロ）のときに列ヘッダにツールチップが表示されない場合があります。
　
【手順】
1.新規フォームにSPREADを配置します
2.下記サンプルコードをコピーし、アプリケーションを実行します
3.A列の列ヘッダにマウスカーソルを移動します
　　 --テキストチップが表示されません

【サンプルコード】
　　Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　　　' テストデータの設定
　　　　FpSpread1.ActiveSheet.ColumnHeader.Cells(0, 0).Text = "あいうえおかきくけこ"
　　　　FpSpread1.ActiveSheet.RowCount = 0

　　　　' テキストチップの設定
　　　　FpSpread1.TextTipPolicy = FarPoint.Win.Spread.TextTipPolicy.Floating

　　　　' セル型の設定
　　　　Dim tcell As New FarPoint.Win.Spread.CellType.TextCellType()
　　　　FpSpread1.ActiveSheet.ColumnHeader.Cells(0, 0).CellType = tcell
　　End Sub

Service Pack 6（v7.0.2019.2008）で修正済み。
Service Pack 6（v7.0.2019.2008）より前のバージョンでは次の回避方法が有効です。
------------------------------------------

CellTypeの代わりにRendererを使用します。

【サンプルコード】
　　Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　　　' テストデータの設定
　　　　FpSpread1.ActiveSheet.ColumnHeader.Cells(0, 0).Text = "あいうえおかきくけこ"
　　　　FpSpread1.ActiveSheet.RowCount = 0

　　　　' テキストチップの設定
　　　　FpSpread1.TextTipPolicy = FarPoint.Win.Spread.TextTipPolicy.Floating

　　　　' セル型の設定
　　　　Dim tcell As New FarPoint.Win.Spread.CellType.TextCellType()
　　　　'FpSpread1.ActiveSheet.ColumnHeader.Cells(0, 0).CellType = tcell
　　　　FpSpread1.ActiveSheet.ColumnHeader.Cells(0, 0).Renderer = tcell

　　　　'' 折り返しを禁止したい場合
　　　　'' 全ての列ヘッダラベルのWordWrapを無効にします
　　　　'Dim ch As New FarPoint.Win.Spread.CellType.EnhancedColumnHeaderRenderer
　　　　'ch.WordWrap = False
　　　　'FpSpread1.ActiveSheet.ColumnHeader.DefaultStyle.Renderer = ch
　　End Sub