• Open Menu Close Menu
  • Apple
  • Shopping Bag
  • Apple
  • Mac
  • iPad
  • iPhone
  • Watch
  • TV
  • Music
  • Support
  • Search apple.com
  • Shopping Bag

Lists

Open Menu Close Menu
  • Terms and Conditions
  • Lists hosted on this site
  • Email the Postmaster
  • Tips for posting to public mailing lists
Re: QuickTime Scripts
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: QuickTime Scripts


  • Subject: Re: QuickTime Scripts
  • From: Michelle Steiner <email@hidden>
  • Date: Fri, 5 Jan 2001 12:54:23 -0800

On 1/5/01 11:42 AM, Rich Fortnum <email@hidden> wrote

>Hi there. I need to extract certain things from QuickTime movies, then park
>them into a FileMaker database. The grabbing is what I need to do.
>
>I need the filename, the file size (Megabytes to 0.1 Mb), the X and the Y
>dimensions (without controller, as I can add this by adding another field
>for 16 pixels for corrected Y with controller), and the duration of the QT
>movie.
>
>Can anybody help? I want to have a drop folder that can do this, then move
>to a 'processed folder' beside that folder.

Try this.

tell application "Finder"
set theMovie to the selection as alias
end tell

(*
Replace the above with code to read a folder or a droplet.
The above code assumes that a movie is selected in the finder.
*)

set thesize to the size of (info for theMovie)

--returns the size in bytes; divide appropriately for megabytes.

tell application "QuickTime Player"
set thismovie to open theMovie
tell thismovie to set movieInfo to {name, natural dimensions, duration}
end tell
set movieInfo to thesize & movieInfo

--This returns a list with the desired information.
--I don't know what unit duration is in. 9798 equates to 16.09 seconds.

--Michelle

----------------------------------------------------------------------
| Michelle Steiner | Hard as it may be to believe, my |
| email@hidden | life has been based on a true story. |
----------------------------------------------------------------------


  • Prev by Date: mount volume crashing the machine when there is no network.
  • Next by Date: Re: if, idle, stay open - PROVE IT
  • Previous by thread: QuickTime Scripts
  • Next by thread: mount volume crashing the machine when there is no network.
  • Index(es):
    • Date
    • Thread