placement Bitmap pictureBox

Version imprimable

Bonjour,

je dessine sur deux bitmaps differents , le soucis c'est que je n'arrive pas à bien placer le deuxieme pictureBox.

http://julien.cavey.free.fr/placement.JPG

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Dim BM As Bitmap
    Dim BM1 As Bitmap
    Dim fond As Color = Color.LightGray
    Dim X, Y, X1, Y1 As Integer
    Dim dessine As Boolean = False
    Dim couleur As Color = Color.Black
 
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BM = New Bitmap(signatureclient.Width, signatureclient.Height)
        BM1 = New Bitmap(signatureintervenant.Width, signatureintervenant.Height)
        Dim g As Graphics = Graphics.FromImage(BM)
        Dim g1 As Graphics = Graphics.FromImage(BM1)
        g.Clear(fond)
        g1.Clear(fond)
 
   Private Sub Form1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
        e.Graphics.DrawImage(BM, 0, 0)
        e.Graphics.DrawImage(BM1, 0, 100)
    End Sub

quand je change les coordonnées de mon DrawImage , je ne peux plus dessiner
Merci

19/05/2007, 18h13
Pol63

pas très explicite ton histoire
et je trouve ca étrange d'utiliser e dans l'évènement onpaint
moi j'aurais fait
objet_sur_lequel_tu_veux_dessiner.CreateGraphics.DrawImage

de plus tes bitmaps sont vide avec ce code
ca doit etre bitmap.fromimage pour les remplir

enfin sinon quel est ton problème exactement ?
19/05/2007, 18h27
Invité

Citation:

Envoyé par sperot51

pas très explicite ton histoire
et je trouve ca étrange d'utiliser e dans l'évènement onpaint
moi j'aurais fait
objet_sur_lequel_tu_veux_dessiner.CreateGraphics.DrawImage

de plus tes bitmaps sont vide avec ce code
ca doit etre bitmap.fromimage pour les remplir

enfin sinon quel est ton problème exactement ?

je vais reprendre en essayant d'être plus clair. L'objectif est de créer deux zones distincts pour pouvoir dessiner. J'ai donc créer deux pictureBox. Après mon problème c'est au niveau de cette méthode: e.Graphics.DrawImage(BM, 0,0). je veux déplacer ma zone de dessin dans ma fenêtre.
si je change les coordonnées: e.Graphics.DrawImage(BM, 100, 100) , mon bitmap se déplace bien mais quand je veux dessiner à l'intérieur: plus rien !! ou alors si je réduis les coordonnées je peux dessiner mais pas à tout endroit de mon pictureBox.

PS: je débute encore ... Je met ma source pour éviter d'encombré le post http://julien.cavey.free.fr/Form.cs
19/05/2007, 19h09
Pol63

mouais bon
en forcant un peu sur mon cerveau j'ai compris ce que tu voulais faire

donc je te propose de poser un picturebox sur ta fenetre
comme ca c'est lui que tu déplaceras et ton drawimage restera à 0,0 de ce picturebox

et qu'est-ce que imageeditor que tu importes ?
et comment tu fais pour sauvegarder dans un fichier ce que l'utilisateur dessine ? enfin ca marche ?
19/05/2007, 19h31
Invité
Citation:

Envoyé par sperot51

mouais bon
en forcant un peu sur mon cerveau j'ai compris ce que tu voulais faire

donc je te propose de poser un picturebox sur ta fenetre
comme ca c'est lui que tu déplaceras et ton drawimage restera à 0,0 de ce picturebox

et qu'est-ce que imageeditor que tu importes ?
et comment tu fais pour sauvegarder dans un fichier ce que l'utilisateur dessine ? enfin ca marche ?

imageeditor est une sorte d'addon pour le .NET compact framework qui permet de faire la même chose que la méthode Save. sinon la sauvegarde marche niquel.

Ok pour la PictureBox... mais pourtant:
Code:

1 2 3 4 5 Private Sub PictureBox1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint e.Graphics.DrawImage(BM, 0, 0) End Sub
je dessine bien dans PictureBox1 , et je place mon Bitmap à 0,0 . Mais après je dois déplacer la pictureBox sans déplacer le Bitmap ... est ce juste? :?
19/05/2007, 20h50
Pol63

oui le graphics est sur l'objet, si l'objet bouge alors le graphics bouge aussi
il a garde les meme coordonnées par rapport à son parent

j'ai réussi enfin !! , sa marche bien sur windows en revanche quand je passe sur le pocketPC sa se lance pas ... j'ai une exception non gérée System.Windows.Form

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    Private Sub Form1_Load(ByVal sender As Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
        signatureclient.Image = New Bitmap(signatureclient.Width, signatureclient.Height)
        signatureintervenant.Image = New Bitmap(signatureclient.Width, signatureclient.Height)
    End Sub

  Private Sub signatureclient_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
signatureclient.CreateGraphics.DrawImage(signatureclient.Image, 0, 0) <-Erreur!!! 
    End Sub

    Private Sub signatureclient_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles signatureclient.MouseMove

   signatureclient.CreateGraphics.DrawLine(New Pen(c), X, Y, e.X, e.Y) <-Erreur !!! 
End Sub