>*-- Take care to replace the picture selections with correct pathnames >DEFINE CLASS cntnav AS container > > Width = 78 > Height = 28 > Picture = "nav_background.bmp" > BorderWidth = 0 > Name = "cntnav" > > ADD OBJECT imghistory AS image WITH ; > Picture = "nav_history_inactive.bmp", ; > BackStyle = 0, ; > Height = 21, ; > Left = 52, ; > MousePointer = 15, ; > Top = 4, ; > Width = 23, ; > Name = "imgHistory" > > ADD OBJECT imgnext AS image WITH ; > Picture = "nav_next_inactive.bmp", ; > BackStyle = 0, ; > Height = 26, ; > Left = 30, ; > MousePointer = 15, ; > Top = 1, ; > Width = 26, ; > Name = "imgNext" > > ADD OBJECT imgprev AS image WITH ; > Picture = "nav_prev_inactive.bmp", ; > BackStyle = 0, ; > Height = 26, ; > Left = 1, ; > MousePointer = 15, ; > Top = 1, ; > Width = 26, ; > Name = "imgPrev" > > PROCEDURE imghistory.MouseLeave > LPARAMETERS nButton, nShift, nXCoord, nYCoord > This.Picture = [nav_history_inactive.bmp] > ENDPROC > > PROCEDURE imghistory.MouseEnter > LPARAMETERS nButton, nShift, nXCoord, nYCoord > This.Picture = [nav_history_active.bmp] > ENDPROC > > PROCEDURE imgnext.MouseLeave > LPARAMETERS nButton, nShift, nXCoord, nYCoord > This.Picture = [nav_next_inactive.bmp] > ENDPROC > > PROCEDURE imgnext.MouseEnter > LPARAMETERS nButton, nShift, nXCoord, nYCoord > This.Picture = [nav_next_active.bmp] > ENDPROC > > PROCEDURE imgprev.MouseLeave > LPARAMETERS nButton, nShift, nXCoord, nYCoord > This.Picture = [nav_prev_inactive.bmp] > ENDPROC > > PROCEDURE imgprev.MouseEnter > LPARAMETERS nButton, nShift, nXCoord, nYCoord > This.Picture = [nav_prev_active.bmp] > ENDPROC > >ENDDEFINE >