任务条

Question

为了解决修改分辨率的问题,写了函数.Private Function SetDisplaymode(LngWidth As Long, LngHeight As Long) As Long
  Dim NewDevmode As DEVMODE
  EnumDisplaySettings 0&, 0&, NewDevmode
  With NewDevmode
    .dmFields = DM_PELSHEIGHT Or DM_PELSWIDTH Or DM_POSITION
    .dmPelsWidth = LngWidth
    .dmPelsHeight = LngHeight
  End With
  
  SetDisplaymode = ChangeDisplaySettings(NewDevmode, CDS_TEST)
End Function可是,执行后,出现任务条滚到屏幕的中间了.请问,如何能避免任务条的滚动.

Answer 1

发个WM_SETTINGCHANGE广播看看,呵呵

Answer 2

就象楼上说的那样，你告诉windows一声就行了，或者你在程序中刷新桌面试试