Skip to Content
It is currently February 26th, 2021, 10:13 pm

All times are UTC - 6 hours [ DST ]




Post new topic Reply to topic  [ 3 posts ] 
Author Message
PostPosted: April 23rd, 2020, 5:04 pm 
Offline
SVS Member
SVS Member

Joined: May 5th, 2008, 4:53 pm
Posts: 305
Hello,

Just like the subject says I want to get fullpath of queued tracks and check if the tracks exist.

Any similar script around? Queue table do not contain any kind of informations, only IDs.

With Regards,
Ivan

_________________
Ivan Radolović - Spacial Volunteer Support (SVS)


Top
 Profile  
Reply with quote  
PostPosted: April 24th, 2020, 6:26 am 
Offline
SVS Member
SVS Member

Joined: December 6th, 2004, 9:00 am
Posts: 8152
Location: Cologne (Germany)
We're talking about PAL, right?
The Queuelist contains all the Song objects and you can get the filename property from those.

If you really want to go through the database, you need to join the queuelist to the songlist like this:
Code:
SELECT songlist.* FROM queuelist JOIN songlist ON (queuelist.songID = songlist.ID)

_________________
Benedikt Bauer - SVS (Spacial Volunteer Support)

Shop for readymade PAL scripts by countrywesterndj - Or get a custom script made by me (or others)

My Project:
Send "Now Playing" from SAM to Twitter and/or Facebook | Sourcecode


Top
 Profile  
Reply with quote  
PostPosted: April 24th, 2020, 10:02 am 
Offline
SVS Member
SVS Member

Joined: May 5th, 2008, 4:53 pm
Posts: 305
Great.
Thank You.

PAL that check if tracks exist in queue on every song change.

Code:
PAL.Loop := true;
const palnotification : String = 'C:\Users\Rezija1\AppData\Local\SpacialAudio\SAMBCstudio\palnotification.txt';
var theGenre : String;
var Q : TDataSet;

Q := Query('select * from queuelist JOIN songlist ON (queuelist.songID = songlist.ID) order by queuelist.sortID',[],True);
Q.First;
while not Q.EOF do
begin

if not FileExists(Q['filename']) then
StrToFile(palnotification,'ATTENTION: File not exist in queue: ' + CHR(13)+CHR(10) + CHR(13)+CHR(10) + Q['filename']);
Q.Next;
end;
Q.Free;
PAL.WaitForPlayCount(1);

_________________
Ivan Radolović - Spacial Volunteer Support (SVS)


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 3 posts ] 

All times are UTC - 6 hours [ DST ]


Who is online

Users browsing this forum: No registered users and 26 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Group