Previous: Méthodes de référence, Up: Script Pharo [Index]
Un script, en plus de faire des calculs, peut modifier l’aspect d’un objet mathématique passé en argument, de lui même ou de tout autre objet d’une figure (i.e. canevas).
Précédemment, nous avons discuté des modèles d’objet géométrique, ils sont tous des instances de classe de la hiérarchie DrGMathItem ; leur représentant graphique à l’écran sont appelés costumes, instances de classe de la hiérarchie DrGMathItemCostume. Accéder au costume d’un modèle offre la possibilité d’éditer son aspect : couleurs, style de traits, etc. Quelques méthodes sont décrites dans la section suivante pour accéder aux costumes et aux styles. Le lecteur curieux explorera les hiérarchies des classes DrGMathItemCostume et DrGCostumeStyle pour en découvrir davantage.
⇒ costume du script lui-même. Il faut toujours tester l’existence du costume avant son utilisation (voir exemple)
compute self costume ifNotNil: [self costume style color: Color blue].
⇒ le costume du modèle passé en premier argument à ce script
paintBlue self costume1 style color: Color blue
⇒ le modèle passé en premier argument à ce script. Son type exact dépend des arguments avec lesquels l’instance du script a été créée.
isParallelogram "Test my polygon argument is a parallelogram" | points mid1 mid2| points := self arg1 points. mid1 := points first + points third / 2. mid2 := points second + points fourth / 2. ^ points size = 4 and: [mid1 = mid2]
Des paires de méthodes pour les arguments suivants sont disponibles : costume2/arg2, costume3/arg3 et costume4/arg4.
⇒ l’instance Dr.Geo où ce script existe. Entre autres choses, donne accès aux costumes de la figure.
polygonCostumes "Return the list of polygon costume in the canvas" ^ self app costumes select: [ :costume | costume mathItem isPolygonItem].
Previous: Méthodes de référence, Up: Script Pharo [Index]