IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Flash Pascal Discussion :

Le point sur les matrices [Flash Pascal]


Sujet :

Flash Pascal

Mode arborescent

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Rédacteur/Modérateur

    Avatar de Roland Chastain
    Homme Profil pro
    Enseignant
    Inscrit en
    Décembre 2011
    Messages
    4 160
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Décembre 2011
    Messages : 4 160
    Billets dans le blog
    9
    Par défaut Le point sur les matrices
    Bonjour !

    Qu'est-ce qu'une matrice ? J'ai vu plusieurs exemples sans jamais vraiment comprendre. Pourrait-on faire un point là-dessus ?

    Pour ne pas venir les mains vides j'ai fait un extrait du Démineur, où la matrice sert à produire un effet "bombé".

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
     
    program matrice01;
     
    {$FRAME_WIDTH 400}
    {$FRAME_HEIGHT 400}
     
    uses
      Flash8;
     
    type
      tImage = class(movieClip)
        constructor Create(name: string; x, y: integer);
        procedure Carre(taille: integer);
        procedure Remplissage(couleur: integer);
      end;
     
      tMatrice = class
        matrixType: string;
        x,y,w,h   : double;
        r         : double;
        constructor Create;
      end;
     
    constructor tImage.Create(name: string; x, y: integer);
    begin
      inherited Create(nil, name, _root.GetNextHighestDepth());
      _x := x;
      _y := y;
    end;
     
    procedure tImage.Carre(taille: integer);
    begin
      taille := taille div 2;
      MoveTo(-taille, +taille);
      LineTo(-taille, -taille);
      LineTo(+taille, -taille);
      LineTo(+taille, +taille);
      LineTo(-taille, +taille);
    end;
     
    var
      matrice: tMatrice;
     
    procedure tImage.Remplissage(couleur: integer);
    begin
      Clear;
      LineStyle(0, couleur);
      BeginGradientFill('radial', [$ffffff,couleur], [100,100], [0,255], matrice);
      Carre(300);
      EndFill;
    end;
     
    constructor tMatrice.Create;
    begin
      matrixType := 'box';
      x := -75;
      y := -75;
      w := 150;
      h := 150;
      r := 0;
    end;
     
    var
      i: tImage;
     
    begin
      matrice := tMatrice.Create;
      i := tImage.Create('', 200, 200);
      i.Remplissage($6600FF); { PersianBlue }
    end.
    J'ai remplacé TMatrix par TMatrice : ça fonctionne toujours. Mais j'ai constaté que je ne pouvais pas remplacer matrixType.

    Et pour la procédure BeginGradientFill, je ne vois pas trop non plus comment ça marche. Peut-être qu'il faudrait que je me décide à consulter la documentation ActionScript, comme Paul me l'avait conseillé dès le départ.
    Images attachées Images attachées  
    Fichiers attachés Fichiers attachés

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 7
    Dernier message: 29/12/2005, 11h27
  2. Opérations sur les matrices...
    Par aokiseiichiro dans le forum C
    Réponses: 32
    Dernier message: 28/07/2005, 17h10

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo