1

カスタマイズされたコントロールの基本クラスとして Infragistics UltraWinGrid を使用しています。このコントロールを使用して検索結果を表示するプロジェクトの 1 つには、一致するものが見つからない場合にユーザー フレンドリなメッセージを表示する必要があります。

その機能を派生コントロールにカプセル化したいと考えています。そのため、コントロールを使用するプログラマーは、表示するメッセージを設定する以上のカスタマイズは必要ありません。これは一般的な方法で行う必要があります。1 つのサイズですべてのデータセットに適合します。

UltraWinGrid には、このタイプの使用に対する余裕が既にありますか? もしそうなら、どこに隠されていますか？:-)

この機能をコーディングする必要がある場合は、設定されたレコードセットに空白のレコードを追加し、それをグリッドに配置するアルゴリズムを考えることができます。あなたの意見では、これが解決策を処理する最善の方法ですか?

4

1 に答える 1

2

参考になるかどうかわかりませんが、これでスレッドを終了させて​​いただきます。組み込みの方法が見つからなかったので、この問題を次のように解決しました。 UltraGrid を継承するクラスで

Public Class MyGridPlain
Inherits Infragistics.Win.UltraWinGrid.UltraGrid

2 つのプロパティを追加しました。1 つは開発者が空のデータ ケースで言いたいことを指定するためのもので、もう 1 つは開発者がメッセージを必要な場所に配置できるようにするためのものです。

Private mEmptyDataText As String = String.Empty
Private mEmptyDataTextLocation As Point = New Point(30, 30)Public Shadows Property EmptyDataTextLocation() As Point
Get
     Return mEmptyDataTextLocation
End Get
Set(ByVal value As Point)
    mEmptyDataTextLocation = value
    setEmptyMessageIfRequired()
End Set
End Property

Public Shadows Property EmptyDataText() As String
Get
   Return mEmptyDataText
End Get
Set(ByVal value As String)
  mEmptyDataText = value
  setEmptyMessageIfRequired()
End Set
End Property

空のデータをチェックし、そうであればメッセージを設定するメソッドを追加しました。そして、既存の空のメッセージを削除する別の方法。

    Private Sub setEmptyMessageIfRequired()

        removeExistingEmptyData()

        'if there are no rows, and if there is an EmptyDataText message, display it now.
        If EmptyDataText.Length > 0 AndAlso Rows.Count = 0 Then
            Dim lbl As Label = New Label(EmptyDataText)
            lbl.Name = "EmptyDataLabel"
            lbl.Size = New Size(Width, 25)
            lbl.Location = EmptyDataTextLocation
            ControlUIElement.Control.Controls.Add(lbl)
        End If
    End SubPrivate Sub removeExistingEmptyData()
       'any previous empty data messages?
       Dim lblempty() As Control = Controls.Find("EmptyDataLabel", True)
       If lblempty.Length > 0 Then
           Controls.Remove(lblempty(0))
       End If

   End Sub

最後に、空のデータのチェックをグリッドの InitializeLayout イベントに追加しました。

Private Sub grid_InitializeLayout(ByVal sender As Object, _
      ByVal e As Infragistics.Win.UltraWinGrid.InitializeLayoutEventArgs) _
      Handles MyBase.InitializeLayout    

     setEmptyMessageIfRequired()

End Sub
于 2009-08-13T19:10:51.500 に答える