Hi List,
I have a projector which will be on the hard drive and the MPEG files will
be on a CD-Rom. Currently i can detect what cd is in the drive. But the
problem is i have around 50 mpeg files on 3 cd-roms and i am having trouble
when i swap the cd, the mpeg files do not load. Code below. Any help is
appreciated.
on beginSprite me
passed = false
fileXtraObj = new (xtra "filextra3")
set drives = fileXtraObj.fx_VolumesToList ()
checkCd -- custom handler to get the cd-rom drive letter
repeat while passed = false
repeat with x = 1 to drives.count
theLabel = baDiskInfo( drives[x].char[1] , "name" )
put theLabel
if theLabel = cdLab then
theDriveLetter = drives[x]
set the searchPaths = [theDriveLetter]
set the file of sprite(1) to thedriveLetter & "9AB.mpg" ---Problem
passed = true
exit
end if
end repeat
Answer = baMsgBox( alertMessage, "Where is.CD Labelled Volume of CD.." ,
"OKCancel", "Exclamation" , 1 )
if answer <> "OK" then
nothing
fileXtraObj = 0
end if
end repeat
end
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
