Ce forum est en partie financé par l’affichage de publicités. Merci de désactiver votre bloqueur de publicités pour nous permettre de continuer à fournir ce service.

récupérer la taille d'un movie avec applescript ?

Discussion dans 'Développement Mac' créé par titojean, 11 Juin 2005.

  1. titojean

    titojean Membre confirmé

    Inscrit:
    9 Avril 2001
    Messages:
    260
    J'aime reçus:
    4
    Bonjour,

    Est-il possible de récupérer la taille original (largeur & hauteur) d'un fichier ".mov" dans un script applescript sans avoir à lancer QT ? (au besoin en utilisant "un peu" de cocoa)

    merci par avance de votre aide :)
     
  2. Didier Guillion

    Didier Guillion Membre d’élite
    Club MacG

    Inscrit:
    20 Juillet 2001
    Messages:
    3 244
    J'aime reçus:
    164
    En C:
    Code (Text):

    /*****************************************************************************************************************************************
                    QuicktimeGetMovie
    Lit une movie
    ***************************************************************************************************************************************/
    static OSErr QuicktimeGetMovie(char * name,Movie *theMovie)
    {
    OSErr           err = noErr;
    short           resFile = 0;
    short           resID = 0;
    Str255          movieName;
    Boolean         wasChanged;
    FSSpec          theFSSpec;

    EnterMovies();
    err=CreateFSSpecFromPathName(name,false,&theFSSpec);
    if(err==noErr)
        {
        err= OpenMovieFile(&theFSSpec, &resFile, fsRdPerm);
        if(err == noErr)
            {
            err= NewMovieFromFile(theMovie, resFile, &resID, movieName, newMovieActive, &wasChanged);
            if(err==noErr)
                CloseMovieFile(resFile);
            else
               printf("NewMovieFromFile(%s) err %d\n",name,err);
            }
        else
            printf("OpenMovieFile(%s) err %d\n",name,err);

        }
    else
        printf("CreateFSSpecFromPathName(%s) err %d\n",name,err);
    return(err);
    }

    /*****************************************************************************************************************************************
                   Extrai la taille d'une movie
    ***************************************************************************************************************************************/
    - (void)ExtractMovieSize
    {
    OSErr err;
    Rect aire;
    Movie movie=NULL;

    QTVRxSize=0;
    QTVRySize=0;
    err=QuicktimeGetMovie(SourceFile,&movie);
     if(err==noErr && movie)
        {
        GetMovieBox(movie,&aire);
        OffsetRect(&aire,-aire.left,-aire.top);
        // Fichier MIDI pas de preview
        QTVRxSize=aire.right-aire.left;
        QTVRySize=aire.bottom-aire.top;
        DisposeMovie(movie);
        }
    return;
    }
     
    QTVRxSize et QTVRySize sont les tailles x et y, tu en fait ce que tu veut.

    Cordialement
     
  3. titojean

    titojean Membre confirmé

    Inscrit:
    9 Avril 2001
    Messages:
    260
    J'aime reçus:
    4
    Ok, super, merci
    ...je vais tenter d'utiliser ces lignes...
    (si j'arrive à les comprendre...)
     
Chargement...