| Newsgroups |
gmane.comp.windows.power-pro |
| Message-ID |
<[email protected]> |
I think I already implemented this; it is a windows 7 requirement, not a unicode requirement.
I checked on my win10 machine unicode version and muting and volume control worked fine.
It relies on pprovista.dll in standard install program which should be in your ppro exe folder and should be 51K or so (no version included, unfortunately).
I tested with this volume bar that I keep hidden at top of my screen and which you should be able to import to test. The test bar uses the exec.mute command, the muted keyword function, and the volume function and exec.volumeall commands.
[volume:Properties]
Format1 = IconSize: 16 Position: Floating Left: 990 Right: 1199 Top: -4 Bottom: 18 ShowIfBump: NearestEdge
Format2 = HideAfter: 500 MaxText: 127 Transparent: 50 Gradient: 120 VerticalGradient
Format3 = Flat Back: 128 219 249
Format4 = TopMost AllVDesks AutoShowBar TextCenter BarSize BumpWithin Marker HoverClick ActiveOnlyThis
[1]
id = mute
Label = *control button AUTOCHECKBOX clientedge (muted) clientedge
Format = back: 33 245 235 Height: 22 Width: 18 HoverClickright HoverClickMiddle NoHoverClick
LCmd1 = if
LParam1 = (cl.getctrlvalue("volume","mute")!=muted)
LCmd2 = exec.mute
MCmd1 = (none)
RCmd1 = cl.setctrlvalue("volume",
RParam1 = "mute", muted)
[2]
Label = test
Format = HideItem
LCmd1 = Configure.commandlists("?"++cl.GetLastbar())
MCmd1 = (none)
RCmd1 = (none)
[3]
id = when_shown
Label = *
Format = HideItem
LCmd1 = cl.setctrlvalue("volume",
LParam1 = "mute", muted)
LCmd2 = cl.setctrlvalue("volume",
LParam2 = "slider", volume)
MCmd1 = (none)
RCmd1 = (none)
[4]
Label = *info expr(muted)
Format = HideItem
LCmd1 = (none)
MCmd1 = (none)
RCmd1 = (none)
[5]
id = slider
Label = *control slider (volume) 0 255 0 noticks clientedge
Format = back: 18 224 241 Height: 22 Width: 100 HoverClickright HoverClickMiddle NoHoverClick
LCmd1 = exec.volumeall(cl.getctrlvalue("volume",
LParam1 = "slider"))
MCmd1 = (none)
RCmd1 = cl.setctrlvalue("volume",
RParam1 = "slider",volume)
[6]
Label = *info expr(volume*100/255)%
Format = Width: -7 Disable
LCmd1 = format
LParam1 = Drag
MCmd1 = (none)
RCmd1 = (none)
[7]
Icon =play.ico,0
Format = HoverClickright HoverClickMiddle NoHoverClick
LCmd1 = exec
LParam1 = MoreCommandsAsScript
LCmd2 = local
LParam2 = hh = win.handle("active")
LCmd3 = keys
LParam3 = {to =*player}{media_play_pause}
LCmd4 = wait.forinterval(250)
LCmd5 = win.show(hh)
MCmd1 = (none)
RCmd1 = keys
RParam1 = {vkb3}
[8]
Icon =next.ico,0
Format = HoverClickright HoverClickMiddle NoHoverClick
LCmd1 = exec
LParam1 = MoreCommandsAsScript
LCmd2 = local
LParam2 = hh = win.handle("active")
LCmd3 = keys
LParam3 = {to =vlc}{media_next_track}
LCmd4 = wait.forinterval(250)
LCmd5 = win.show(hh)
MCmd1 = (none)
RCmd1 = (none)
[9]
Icon =prev.ico,0
Format = HoverClickright HoverClickMiddle NoHoverClick
LCmd1 = exec
LParam1 = MoreCommandsAsScript
LCmd2 = local
LParam2 = hh = win.handle("active")
LCmd3 = keys
LParam3 = {to =vlc}{media_prev_track}
LCmd4 = wait.forinterval(250)
LCmd5 = win.show(hh)
MCmd1 = (none)
RCmd1 = (none)