begin process at 2008 08 22 01:06:14
1 229 731 membres
3 nouveaux aujourd'hui
14 267 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

TRAÇAGE DE CERCLE, RECTANGLE, TRAIT EN VB.NET


Information sur la source

Catégorie :Graphique Source .NET ( DotNet ) Niveau : Débutant Date de création : 18/04/2005 Date de mise à jour : 18/04/2005 20:05:28 Vu : 11 933

Note :
8,2 / 10 - par 5 personnes
8,20 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (8)
Ajouter un commentaire et/ou une note


Description

Source sans prétention mais qui servira pour beaucoup, il y a pleins de possibilité de traçage, les arc de cercles, cercles, rectangle, ellipse, triangle, traits, point, bref... voici un bout de code utile je pense.

Source

  • Dim ObjDessin As System.Drawing.Graphics = Me.CreateGraphics() 'Création de l'object graphique
  • Dim ObjGraph As New System.Drawing.Rectangle(100, 100, 200, 200) 'Définition d'un objet de taille de 200 x 200 à l'emplacement 100 x 100
  • ObjDessin.DrawEllipse(System.Drawing.Pens.Black, ObjGraph) 'Traçage d'une ellipse/Cercle en fonction de ObjGraph
  • ObjDessin.DrawRectangle(System.Drawing.Pens.Red, ObjGraph) 'Traçage d'un rectangle en fonction de ObjGraph
  • ObjDessin.DrawLine(System.Drawing.Pens.Blue, 100, 100, 200, 200) 'Traçage d'une ligne partant du point de coordonnées (100,100) vers le point de coordonnées (200,200)
        Dim ObjDessin As System.Drawing.Graphics = Me.CreateGraphics()   'Création de l'object graphique
        Dim ObjGraph As New System.Drawing.Rectangle(100, 100, 200, 200)   'Définition d'un objet de taille de 200 x 200 à l'emplacement 100 x 100
        ObjDessin.DrawEllipse(System.Drawing.Pens.Black, ObjGraph)  'Traçage d'une ellipse/Cercle en fonction de ObjGraph
        ObjDessin.DrawRectangle(System.Drawing.Pens.Red, ObjGraph)  'Traçage d'un rectangle en fonction de ObjGraph
        ObjDessin.DrawLine(System.Drawing.Pens.Blue, 100, 100, 200, 200) 'Traçage d'une ligne partant du point de coordonnées (100,100) vers le point de coordonnées (200,200)
18 avril 2005 20:05:28 :
.
  • signaler à un administrateur
    Commentaire de jrbleboss le 18/04/2005 20:10:27

    C'est bien mais c'est très connu. Mais ca peut quand meme en interresser....

    9/10

    JRB

  • signaler à un administrateur
    Commentaire de ankou22 le 26/10/2005 22:31:48

    Salut

    9/10

    Je prends, j'adore quand je trouve en 2 secondes...

    ANKOU22

  • signaler à un administrateur
    Commentaire de GG29 le 10/04/2006 21:23:36

    merci pour ta source. Au moins je vais pouvoir faire un rectangle ds mon prog, ce qui va être très pratique :D.
    bonne continuation.

  • signaler à un administrateur
    Commentaire de guyvdv le 23/04/2006 15:38:58

    Bonjour ,
    Comment avez vous fait pour trouver le zip ???

    Guy van der velden

  • signaler à un administrateur
    Commentaire de GG29 le 26/04/2006 14:44:01

    je crois qu'il n'y en a pas besoin vu que le code est marqué. il suffit de le copier et de le modifier comme on veut.

  • signaler à un administrateur
    Commentaire de FLO1978 le 22/06/2006 19:48:26

    Bonjour

    Un code aprfait pour mon appli
    Par contre comment faire pour que le rectangle dessiné soit plein ?

  • signaler à un administrateur
    Commentaire de FLO1978 le 22/06/2006 19:58:23

    Problème résolu :)

    Dim ObjGraph2 As New System.Drawing.Rectangle(220, 100, 100, 200)
    ObjDessin.FillRectangle(Brushes.White, ObjGraph2)

  • signaler à un administrateur
    Commentaire de logistel le 21/10/2007 16:13:52

    Qui possede du code en VB.Net 2005 pour tracer un cercle pardait avec méthode anti-crenelage.
    Je l'ai en VB6 mais n'arrive pas à l'exploiter sous VB.Net 2005

Ajouter un commentaire

Pub



Appels d'offres

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

Boutique

Boutique de goodies CodeS-SourceS