none
Rectangle en Position X/Y RRS feed

  • Question

  • Bonjour,

    Je suis sur un projet de creation d'un Editeur de rapport. j'ai un Canvas qui est charger d'avoir l'integralité des elements qui seront dessiner.

    Lorsque je dessine une ligne, je dispose des property X1,Y1,X2,Y2. je peut donc le placer exactement comme je le souhaite,

    par contre pour le rectangle, je n'est que Width et Height, par defaut il est placer a 0,0 dans mon Canvas.

    Dans une autre conversation sur le forum, j'ai vue que Gilles TOURREAU precisais de placer le rectangle dans une canvas, j'ai donc ajouter un canvas et le rectangle dans ce canvas, puis ensuite je rajoute le canvas dans le canvas qui sert au dessin. Mais je n'arrive pas a positionnée le nouveau canvas ...

    Voici la fonction qui me dessine un rectange dans mon canvas parent.

    Désoler d'arrivé avec autant de question, mais le demarrage dans ce nouveau langage est assez difficile.

     Private Sub DrawRectangle(ByRef pCanvasParent As Canvas)
    
        Dim lRectangle As New Rectangle()
        Dim lCanvaRectangle As New Canvas
    
        lRectangle.Width = 150
        lRectangle.Height = 150
        
        Dim lBrush As New SolidColorBrush(Colors.Green)
        lRectangle.Stroke = Brushes.Red
        lRectangle.StrokeThickness = 4
        lRectangle.Fill = lBrush
    
        lCanvaRectangle.Children.Add(lRectangle)
    
        pCanvasParent.Children.Insert(0, lCanvaRectangle)
    
      End Sub
    
    

    Cordialement Sébastien DataBase2Code
    dimanche 30 janvier 2011 08:19

Réponses

  • Bonjour,

    C'est bon j'ai trouver, j'ai specifier les marges,

        lCanvaRectangle.Margin = New System.Windows.Thickness(_MousseDownPoint.X, _MousseDownPoint.Y, 0, 0)

    et maintenant il ce possitionne correctement.

    Merci, 


    Cordialement Sébastien DataBase2Code
    • Marqué comme réponse Aserf dimanche 30 janvier 2011 09:36
    dimanche 30 janvier 2011 09:36