Micono RBmovieUtil v1.5.0

Update: 2001/7/8

[Download]


About Micono RBmovieUtil

A extension plugin of Movie Class, MoviePlayer Class of REALbasic.

Update

(1.2.1 b1 -> 1.5.0 b1)

  • [New] Max OS XëŒâû
  • [New] (All) Four methods of movie volume relation were added to mvoie class.
  • [New] (All) 14 methods of movie track relation were added to mvoie class.
  • [New] (All) 8 methods of media handler relation were added to mvoie class.

(1.2.0 b1 -> 1.2.1 b1)

  • Fixed bug GetMovieCurrentPicture, GetMoviePicture of Windows.

(0.5 b2 -> 1.2.0 b1)

  • Changed plugin name. Delete Micono RBmovieUtil (R2) used formerly from Plugins folder.
  • [New] Win32 support.
  • [New] mic_REALenterMovies as Integer (Global method)
  • [New] mic_SaveAsMovie( m As Movie ) as Integer (FolderItem extension method)
  • [New] mic_UpdateMovieResource( m As Movie ) as Integer (FolderItem extension method)
  • [New] mic_FlattenMovieData( m As Movie ) as Integer (FolderItem extension method)


New addition method list (a manual -- incomplete)
//Movie (Movie Class)
"GetMoviePreferredVolume As Integer"
"SetMoviePreferredVolume( volume As Integer)"
"GetMovieVolume As Integer"
"SetMovieVolume( volume As Integer)"

//Track (Movie Class)
"GetMovieTrackCount As Integer"
"GetTrackVolume(trackNum As Integer) As Integer"
"SetTrackVolume( trackNum As Integer, volume As Integer)"
"GetTrackCreationTime(trackNum As Integer) As Integer"
"GetTrackModificationTime(trackNum As Integer) As Integer"
"GetTrackEnabled(trackNum As Integer) As Boolean"
"SetTrackEnabled( trackNum As Integer, b As Boolean)"
"GetTrackEnabled(trackNum As Integer) As Integer"
"SetTrackUsage( trackNum As Integer, Usage As Integer)"
"GetTrackDuration(trackNum As Integer) As Integer"
"GetTrackOffset(trackNum As Integer) As Integer"
"SetTrackOffset( trackNum As Integer, Offset As Integer)"
"GetTrackLayer(trackNum As Integer) As Integer"
"SetTrackLayer( trackNum As Integer, Layer As Integer)"

//Media Handler
"MediaGetEffectiveVolume(trackNum As Integer) As Integer"
"MediaGSetVolume( trackNum As Integer, volume As Integer)"
"MediaGetSoundBass(trackNum As Integer) As Integer"
"MediaSetSoundBass( trackNum As Integer, bass As Integer)"
"MediaGetSoundTreble(trackNum As Integer) As Integer"
"MediaSetSoundTreble( trackNum As Integer, bass As Integer)"
"MediaGetSoundBalance(trackNum As Integer) As Integer"
"MediaSetSoundBalance( trackNum As Integer, balance As Integer)"


Methods

* mp as MoviePlayer / m as Movie

Global Methods

Initializing the Movie Toolbox

result = mic_REALenterMovies

result = 0

FolderItem extension class

Update movie resource

err = f.mic_UpdateMovieResource( mp.movie )

if err = 0, error.

Save as movie

err = f.mic_SaveAsMovie( mp.movie )

if err = 0, no error.

Save as movie

err = f.mic_FlattenMovieData( mp.movie )

if err = 0, no error.

Movie extension class

Current location (sec)

GET
SET

dim t as double
t = mp.movie.position

mp.movie.position = 2.5

* orignal propaty of REALbasic is read only

Length of movie (sec)

dim t as double
t = mp.movie.duration

* read only

Examine whether a movie comes to an end

dim b as boolean
b = mp.movie.eof

* read only

Move to a beginning of movie

Move to the last of movie

mp.movie.GoToBeginningOfMovie

mp.movie.GoToEndOfMovie

The postertime (sec)

GET
SET

dim t as double
t = mp.movie.GetMoviePosterTime

mp.movie.SetMoviePosterTime = 2.5

Current Replay speed. Set up speed, and Replay it.

GET
SET

dim r as double
r = mp.movie.GetMovieRate

mp.movie.SetMovieRate(-0.5)

Replay speed.

GET
SET

dim r as double
r = mp.movie.GetMoviePreferredRate

mp.movie.SetMoviePreferredRate(2)

Select repling time range. * action confirmation insufficiency.

dim s as double //start position (sec)
dim d as double //range (sec)
.........
mp.movie.SetMovieSelection(s, d)

* Utilize selection range setting of MoviePlayer class.

Set up size of movie

mp.movie.SetMovieBox(left,top,width,height)

Put a movie in clip board * action confirmation insufficiency.

mp.movie.PutMovieOnScrap(0)

1<<0: Don't do clear of a current clip.
1<<1: Put only a movie in clip board.

Obtain Picture (sec) * action confirmation insufficiency

dim p as Picture
........
p = mp.movie.GetMoviePict(2.5)

MoviePlayer extension class

Current location (sec)

GET
SET

dim t as double
t = mp.position

mp.position = 2.5

* orignal propaty of REALbasic is read only

Loop replay

GET
SET

dim b as boolean
b = mp.Looping

mp.Looping = true

* orignal propaty of REALbasic is read only

Reverse replay (palindrome)

GET
SET

dim b as boolean
b = mp.Palindrome

mp.mp.Palindrome = true

* orignal propaty of REALbasic is read only

Conte roller (a movie having changed)

mp.mcMovieChanged

Set to editable movie

mp.mcEnabledEditing(true)

Volume

GET
SET

dim v as integer
v = mp.mcGetVolume

mp.mcSetVolume(255)

Voluml: 0 - 256

Step

mp.mcStep(1)

Designate selection range

dim s as double //start position (sec)
dim d as double //range (sec)
.........
mp.mcSetSelectionRange(s, d)

Set up selection range replay

mp.mcSetPlaySelection(true)

Acquire selection range replay

dim b as Boolean
b = mp.mcGetPlaySelection

Cut it, and put it in clip board. * action confirmation insufficiency

mp.mcCut(0)

1<<0: Don't do clear of a current clip.
1<<1: Put only a movie in clip board.

Copy it, and put it in clip board.* action confirmation insufficiency

mp.mcCopy(0)

1<<0: Don't do clear of a current clip.
1<<1: Put only a movie in clip board.

Paste it, and put it in clip board. * action confirmation insufficiency

mp.mcPaste(0)

1<<0: Activate a movie.
1<<1: Don't solve data reference.
1<<2: When data reference isn't completed, don't ask a user it.
1<<3: Don't select a track automatically.

Clear* action confirmation insufficiency

mp.mcClear

Undo* action confirmation insufficiency

mp.mcUndo

Obtain conte roller information. * action confirmation insufficiency

dim info as integer
dim m as Movie
........
info = mp.mcGetControllerInfo

1<<0: Can undo it
1<<1: Can cut it
1<<2: Can copy it
1<<3: Can paste it
1<<4: Can clear it
1<<5: A sound exists
1<<6: Replaying now
1<<7: Loop replay
1<<8: Parindrome replay
1<<9: Editable movie

Obtain Picture of image shown * action confirmation insufficiency

dim p as Picture
........
p = mp.GetMovieCurrentPicture


Warranty and Copyright Information


Support


Copyright 1999-2000, Micono Utilities. All rights reserved.