Probably not too helpful, but for *nix users, this is what I do:
for I in *.pdf ; do exiftool -Title=`basename $I .pdf` $I ; done
exiftool is a perl script, so it probably will work across platforms if you're savvy.
http://www.sno.phy.queensu.ca/~phil/exiftool/