Cartwall wird nicht mehr angezeigt, reagiert aber beim Hotkey (layout.ini & mAirList.ini sind per Mail unterwegs)
Der IO-Warrior reagiert bei der Cartwall nicht mehr und gibt das Signal nicht mehr aus. Hat bei der 1.5.30 noch astrein funktioniert. Bei den Playern funktioniert es noch.
Gruß HolGer
EDIT
Datenbank-Suche machts auch nicht mehr. Wird ein zu suchendes Wort eingegeben, so erscheint “List index out of bounds (4)”
Nutze die eldoDB
Datenbank-Suche und Cartwall-Anzeige sind beide repariert. Gibt nachher ein Update. Danke!
Die Cartplayer schicken seit 1.5.31 eigene Event-Types für Start, Stop, EOF-Warnung und EOF: ntCartPlayerStart, ntCartPlayerStop, ntCartEOFWarning, ntCartEOF. Die musst du dann im Script entsprechend berücksichtigen. Zum Beispiel so:
if (n.GetNotificationType in [ntPlayerStop, ntCartPlayerStop]) then
IOWarrior.SetPort(0, 31, false)
else if (n.GetNotificationType in [ntEOFWarning, ntCartEOFWarning]) then
IOWarrior.SetPort(0, 31, true);
begin
// fetch notification data
n := GetNotification;
if (n.GetNotificationType = ntMask) then
SetNotificationTypes([ntEOFWarning, ntCartEOFWarning, ntCartPlayerStop, ntPlayerStop])
else
if (n.GetNotificationType in [ntPlayerStop, ntCartPlayerStop]) then
IOWarrior.SetPort(0, 31, false)
else if (n.GetNotificationType in [ntEOFWarning, ntCartEOFWarning]) then
IOWarrior.SetPort(0, 31, true);
end.[/code]
(Man beachte “in” statt “=”, und die zusätzlichen eckigen Mengenklammern.)
See http://www.mAirList.com for further information.
-------------------------------------------------------------------------------}
var n: INotification;
pi: IPlaylistItem;
begin
// fetch notification data
n := GetNotification;
if (n.GetNotificationType = ntMask) then
SetNotificationTypes([ntEOFWarning, ntCartEOFWarning, ntPlayerStop, ntCartPlayerStop])
else
if (n.GetNotificationType in [ntPlayerStop, ntCartPlayerStop]) then
IOWarrior.SetPort(0, 31, false)
else if (n.GetNotificationType in [ntEOFWarning, ntCartEOFWarning]) then
IOWarrior.SetPort(0, 31, true);
end.[/code]
Hab das Zeug oben mal rausgeschmissen. Dann ist es Zeile 11.
See http://www.mAirList.com for further information.
-------------------------------------------------------------------------------}
var n: INotification;
pi: IPlaylistItem;
begin
// fetch notification data
n := GetNotification;
if (n.GetNotificationType = ntMask) then
SetNotificationTypes([ntEOFWarning, ntCartEOFWarning, ntPlayerStop, ntCartPlayerStop])
else
if (n.GetNotificationType in [ntPlayerStop, ntCartPlayerStop]) then
IOWarrior.SetPort(0, 31, false);
else if (n.GetNotificationType in [ntEOFWarning, ntCartEOFWarning]) then
IOWarrior.SetPort(0, 31, true);
end.[/code]
Ich ärger mich gerade mit Windows 2000 rum … muss das auf einem neuen Rechner installieren, auf dem morgen die neue Musik-Scheduler-Software draufkommt g
Währenddessen könnte ich mal das Build-System anwerfen. Ein paar Bugfixes gibt es ja doch unter’s Volk zu bringen.