hi,
this is a quick and dirty batch script to auto import extra images from your hard drive into your catalog.
Not really new and not very sophisticated, but it's fast and works with multiple CD pictures per movie.
The idea behind this was to automatically make some multi-screenshot images from movie files and then auto import them in the catalog.
(To make the screens I used the programm "Auto-Movie-Thumbnailer" (http://funk.eu/amt/) which is very flexible and fast.)
--> You probably need to adjust var "movie" in the script (line 13,25) to fit to your filename rules.
Defaut is "moviename.ext" or "moviename - CDxx.ext".
For example for movie Terminator with file names
Terminator - CD1.avi, Terminator - CD2.avi
you can import
Terminator - CD1.jpg, Terminator - CD2.jpg
which contain the screenshots from the first and second CD.
I tested the import with over 500 movies, it took around 10s and success quota was around 50-90%, highly depending on filename quality.
Well, to keep it short, if you're too lazy to look for movie stills (but nevertheless want to have some) you can try this automatic version.
J.

Code: Select all
program extra_image_import;
var
index, count: integer;
movie, path: string;
begin
if GetIteration = 0 then path := 'D:\movie pics\';
movie := GetField(fDisks);
if movie = '1' then
begin
movie := path + GetField(fOriginalTitle) + '.jpg';
if FileExists(movie) then
begin
index := AddExtra;
ImportExtraPicture(index, movie);
SetExtraField(index, eCategory, 'Stills');
end;
end
else
begin
for count := 1 to StrToInt(movie,0) do
begin
movie := path + GetField(fOriginalTitle) + ' - CD' + IntToStr(count) + '.jpg';
if FileExists(movie) then
begin
index := AddExtra;
ImportExtraPicture(index, movie);
SetExtraField(index, eCategory, 'Stills');
end;
end;
end;
end.