I'm working on updating some of my code to use the Quicktime 12.1 plugin
(instead of using some of the other, now broken, RB calls), and am getting a
consistent error on Windows that I'm not seeing on the Mac. The source movie
file opens in Quicktime on Windows and is about 80 seconds long. I get a
failure on ExportToFile with an error code in exp of -43 (fileNotFound). The
source file exists, the destination folder exists and the destination file does
not exist (as expected).
The code in question is below:
Dim movFile As FolderItem = GetOpenFolderItem("")
Dim tempMovieFile As FolderItem = GetSaveFolderItem("", "Temp.mov")
Dim movWhole As Movie = movFile.OpenAsMovie
Dim exp As new QTMovieExporterMBS
exp.Progress = 1
if exp.OpenExporter("MooV", "appl") then
exp.MovieWidth = movWhole.MovieWidth
exp.MovieHeight = movWhole.MovieHeight
Dim movieStart As Integer = 10.94 * movWhole.TimeScaleMBS
Dim movieLength As Integer = 10.0 * movWhole.TimeScaleMBS
' The next line is failing with an error -43 on Windows
if not exp.ExportToFile(movWhole, tempMovieFile, movieStart, movieLength)
then
if tempMovieFile.Exists then
tempMovieFile.Delete
end
end
end
So, what am I doing wrong that is making ExportToFile fail?
_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info
