Post by divanebaba » 15 Apr 2020, 10:30
Jetzt habe ich ein frisches Win10 und habe mich nochmal an der
COM-Erweiterung, genannt Comserver2, für
Foobar2000 v1.5.3 versucht.
War gar nicht so schwer
Code: Select all
RAlt & f::
Process, Exist, %fooPID% ; Prüft, ob eine Process-ID in der Variablen fooPID vorhanden ist
if (ErrorLevel = fooPID) ; Wenn ErrorLevel gleich der Variablen fooPID ist, wird das bereits gestartete Foobar2000 einfach nur aktiviert
winactivate, ahk_pid %fooPID%
else ; ansonsten wird das Programm Foobar2000 gestartet und die Process-ID in der Variablen fooPID gespeichert
{
if FileExist("C:\Program Files (x86)\foobar2000\foobar2000.exe")
{
run % "C:\Program Files (x86)\foobar2000\foobar2000.exe",,, fooPID
Process, priority, %fooPID%, H ; L (or Low), B (or BelowNormal), N (or Normal), A (or AboveNormal), H (or High), R (or Realtime).
settimer, FooBarControl, -4000 ; nach vier Sekunden wird der ComServer für Foobar2000 kreiert.
}
}
return
FooBarControl:
Foobar := ComObjCreate("Foobar2000.Application.0.7"),Foobar.Minimized := 1 ; Create the COM object and minimise foobar.
Playback := Foobar.Playback ;The playback handle.
Settings := Playback.Settings ;The settings handle.
return
#If !WinActive("ahk_exe vlc.exe") ; Folgende Hotkeys nur wenn das VLC-Player-Fenster nicht aktiv ist
CTRL & NumPadEnter::
ToolTip, % Playback.FormatTitle("%title% - %album artist%")
settimer, NoTooltip, -3000
return
CTRL & Right::
Playback.Next()
return
CTRL & Left::
Playback.Previous()
return
CTRL & NumPad0::
Playback.Pause()
return
#if
Seltsamerweise lief es früher mit
ComObjGet. Ich nutze jetzt
ComObjCreate
Jetzt kann ich endlich wieder die Pfeiltasten zum Springen zum nächsten Lied nutzen.
Hier noch der Link zum Download des Comservers.
Jetzt habe ich ein frisches Win10 und habe mich nochmal an der [url=https://autohotkey.com/boards/viewtopic.php?t=16]COM-Erweiterung[/url], genannt Comserver2, für [url=https://www.foobar2000.org/download/]Foobar2000 v1.5.3[/url] versucht.
War gar nicht so schwer :(
[spoiler2=][code]RAlt & f::
Process, Exist, %fooPID% ; Prüft, ob eine Process-ID in der Variablen fooPID vorhanden ist
if (ErrorLevel = fooPID) ; Wenn ErrorLevel gleich der Variablen fooPID ist, wird das bereits gestartete Foobar2000 einfach nur aktiviert
winactivate, ahk_pid %fooPID%
else ; ansonsten wird das Programm Foobar2000 gestartet und die Process-ID in der Variablen fooPID gespeichert
{
if FileExist("C:\Program Files (x86)\foobar2000\foobar2000.exe")
{
run % "C:\Program Files (x86)\foobar2000\foobar2000.exe",,, fooPID
Process, priority, %fooPID%, H ; L (or Low), B (or BelowNormal), N (or Normal), A (or AboveNormal), H (or High), R (or Realtime).
settimer, FooBarControl, -4000 ; nach vier Sekunden wird der ComServer für Foobar2000 kreiert.
}
}
return
FooBarControl:
Foobar := ComObjCreate("Foobar2000.Application.0.7"),Foobar.Minimized := 1 ; Create the COM object and minimise foobar.
Playback := Foobar.Playback ;The playback handle.
Settings := Playback.Settings ;The settings handle.
return
#If !WinActive("ahk_exe vlc.exe") ; Folgende Hotkeys nur wenn das VLC-Player-Fenster nicht aktiv ist
CTRL & NumPadEnter::
ToolTip, % Playback.FormatTitle("%title% - %album artist%")
settimer, NoTooltip, -3000
return
CTRL & Right::
Playback.Next()
return
CTRL & Left::
Playback.Previous()
return
CTRL & NumPad0::
Playback.Pause()
return
#if[/code][/spoiler2]Seltsamerweise lief es früher mit [c][url=https://ahkde.github.io/docs/commands/ComObjGet.htm]ComObjGet[/url][/c]. Ich nutze jetzt [c][url=https://ahkde.github.io/docs/commands/ComObjCreate.htm]ComObjCreate[/url][/c]
Jetzt kann ich endlich wieder die Pfeiltasten zum Springen zum nächsten Lied nutzen. :D :D
[url=https://hydrogenaud.io/index.php/topic,39946.0.html]Hier noch der Link zum Download des Comservers.[/url]