Figure géoplan | Action sur le bouton | Rendu |
Figure Géoplan Numéro de version: 2 Position de Roxy: Xmin: -5, Xmax: 5, Ymax: 5 Objet dessinable Roxy, particularités: rouge A point libre Objet libre A, paramètres: -1.3, 0.3 xa abscisse de A (repère Roxy) ya ordonnée de A (repère Roxy) Commentaire Fin de la figure |
Sub
coord X=figure.ValeurScalaireDouble("xa") Y=figure.ValeurScalaireDouble("ya") Alert "A("&X&";"&Y&")" End Sub |
![]() Sub TestPointExiste a=figure1.TestParTexte("Teste existence d'un objet A de genre point") if a=0 Then Alert "Le point A existe" Else if a=51 then Alert "Il n'y a aucun objet A sur la figure" else Alert "A n'est pas un point" End If End If End Sub |