Rhapsody Control

[tobyg]

I couldn't find any information on using EventGhost to control Rhapsody. I eventually figured out how to get it working using SendMessage, so I thought I'd post my solution to possibly save somebody else some time:

Code: Select all

<Folder Name="Rhapsody" id="124" Expanded="True">
            <Macro Name="Previous Track" Expanded="True">
                <Event Name="Key.PreviousTrack" />
                <Action Name="Find Rhapsody">
                    Window.FindWindow(None, u'Rhapsody', None, None, None, None, True, 0.0, 0)
                </Action>
                <Action>
                    Window.SendMessage(273, 40047, 0, 0)
                </Action>
            </Macro>
            <Macro Name="Next Track" Expanded="True">
                <Event Name="Key.NextTrack" />
                <Action Name="Find Rhapsody">
                    Window.FindWindow(None, u'Rhapsody', None, None, None, None, True, 0.0, 0)
                </Action>
                <Action>
                    Window.SendMessage(273, 40048, 0, 0)
                </Action>
            </Macro>
            <Macro Name="Play/Pause" Expanded="True">
                <Event Name="Key.Play" />
                <Event Name="Key.Pause" />
                <Action Name="Find Rhapsody">
                    Window.FindWindow(None, u'Rhapsody', None, None, None, None, True, 0.0, 0)
                </Action>
                <Action>
                    Window.SendMessage(273, 40071, 0, 0)
                </Action>
            </Macro>
            <Macro Name="Stop" Expanded="True">
                <Event Name="Key.Stop" />
                <Action Name="Find Rhapsody">
                    Window.FindWindow(None, u'Rhapsody', None, None, None, None, True, 0.0, 0)
                </Action>
                <Action>
                    Window.SendMessage(273, 40046, 0, 0)
                </Action>
            </Macro>
        </Folder>

Hope it helps!