owner drawn problem

[Brian Henry]

I cant seem to remember this one... I have a list view, and im owner drawing
the items, i dont want the selection to hide when it loses focus so i have
hideselection = false, but when i owner draw this all the items come up gray
instead of just the one that is selected when focus is lost, the blue one
shows up correctly when it has focus... any help on this would be great... i
need to do most of my drawing in the sub items drawing because of how my
control is structured..

here is an example, im trying to get it to act like a list view does when
its not owner drawn, so i can customize it later after i get this working
correctly

Public Class Form1

Private Sub ListView1_DrawC olumnHeader(ByV al sender As Object, ByVal e As
System.Windows. Forms.DrawListV iewColumnHeader EventArgs) Handles
ListView1.DrawC olumnHeader

e.DrawDefault = True

End Sub

Private Sub ListView1_DrawS ubItem(ByVal sender As System.Object, ByVal e As
System.Windows. Forms.DrawListV iewSubItemEvent Args) Handles
ListView1.DrawS ubItem

' e.Graphics.Fill Rectangle(Drawi ng.SystemBrushe s.Highlight, e.Bounds)

' ControlPaint.Dr awFocusRectangl e(e.Graphics, e.Item.Bounds,
Drawing.SystemC olors.WindowTex t, Drawing.SystemC olors.Highlight )

Debug.WriteLine (e.ItemIndex & ":" & e.ItemState.ToS tring)

If (e.ItemState And ListViewItemSta tes.Selected) =
ListViewItemSta tes.Selected Then

If (e.ItemState And ListViewItemSta tes.Focused) = ListViewItemSta tes.Focused
Then

' FOCUSED AND SELECTED

e.Graphics.Fill Rectangle(Drawi ng.SystemBrushe s.Highlight, e.Bounds)

ControlPaint.Dr awFocusRectangl e(e.Graphics, e.Item.Bounds,
Drawing.SystemC olors.WindowTex t, Drawing.SystemC olors.Highlight )

Else

' JUST SELECTED

e.Graphics.Fill Rectangle(Drawi ng.SystemBrushe s.Control, e.Bounds)

End If

' ELSE NOT SELECTED

Else

e.Graphics.Fill Rectangle(Drawi ng.SystemBrushe s.Window, e.Bounds)

End If

e.DrawText()

End Sub

End Class

<Global.Microso ft.VisualBasic. CompilerService s.DesignerGener ated()> _

Partial Class Form1

Inherits System.Windows. Forms.Form

'Form overrides dispose to clean up the component list.

<System.Diagnos tics.DebuggerNo nUserCode()> _

Protected Overrides Sub Dispose(ByVal disposing As Boolean)

If disposing AndAlso components IsNot Nothing Then

components.Disp ose()

End If

MyBase.Dispose( disposing)

End Sub

'Required by the Windows Form Designer

Private components As System.Componen tModel.IContain er

'NOTE: The following procedure is required by the Windows Form Designer

'It can be modified using the Windows Form Designer.

'Do not modify it using the code editor.

<System.Diagnos tics.DebuggerSt epThrough()> _

Private Sub InitializeCompo nent()

Dim ListViewItem1 As System.Windows. Forms.ListViewI tem = New
System.Windows. Forms.ListViewI tem("dfhfdh")

Dim ListViewItem2 As System.Windows. Forms.ListViewI tem = New
System.Windows. Forms.ListViewI tem("56h56h")

Dim ListViewItem3 As System.Windows. Forms.ListViewI tem = New
System.Windows. Forms.ListViewI tem("54h45h")

Me.ListView1 = New System.Windows. Forms.ListView

Me.ColumnHeader 1 = New System.Windows. Forms.ColumnHea der

Me.ColumnHeader 2 = New System.Windows. Forms.ColumnHea der

Me.Button1 = New System.Windows. Forms.Button

Me.SuspendLayou t()

'

'ListView1

'

Me.ListView1.Co lumns.AddRange( New System.Windows. Forms.ColumnHea der()
{Me.ColumnHeade r1, Me.ColumnHeader 2})

Me.ListView1.Fu llRowSelect = True

Me.ListView1.Hi deSelection = False

Me.ListView1.It ems.AddRange(Ne w System.Windows. Forms.ListViewI tem()
{ListViewItem1, ListViewItem2, ListViewItem3})

Me.ListView1.Lo cation = New System.Drawing. Point(0, 0)

Me.ListView1.Na me = "ListView1"

Me.ListView1.Ow nerDraw = True

Me.ListView1.Si ze = New System.Drawing. Size(241, 168)

Me.ListView1.Ta bIndex = 0

Me.ListView1.Us eCompatibleStat eImageBehavior = False

Me.ListView1.Vi ew = System.Windows. Forms.View.Deta ils

'

'Button1

'

Me.Button1.Loca tion = New System.Drawing. Point(94, 211)

Me.Button1.Name = "Button1"

Me.Button1.Size = New System.Drawing. Size(75, 23)

Me.Button1.TabI ndex = 1

Me.Button1.Text = "Button1"

Me.Button1.UseV isualStyleBackC olor = True

'

'Form1

'

Me.AutoScaleDim ensions = New System.Drawing. SizeF(6.0!, 13.0!)

Me.AutoScaleMod e = System.Windows. Forms.AutoScale Mode.Font

Me.ClientSize = New System.Drawing. Size(292, 273)

Me.Controls.Add (Me.Button1)

Me.Controls.Add (Me.ListView1)

Me.Name = "Form1"

Me.Text = "Form1"

Me.ResumeLayout (False)

End Sub

Friend WithEvents ListView1 As System.Windows. Forms.ListView

Friend WithEvents ColumnHeader1 As System.Windows. Forms.ColumnHea der

Friend WithEvents ColumnHeader2 As System.Windows. Forms.ColumnHea der

Friend WithEvents Button1 As System.Windows. Forms.Button

End Class