[vb.net]afficher une image

Version imprimable

Voir 40 message(s) de cette discussion en une page

Bonjour, je voudrais pour l'instant just aller chercher une image et l'afficher dans une picture box, j'ai donc le code suivant:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 Private Sub UiButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UiButton1.Click
        If OpenFileDialog.ShowDialog() = DialogResult.OK Then
            Dim Fs As FileStream = New FileStream(OpenFileDialog.FileName, FileMode.Open, FileAccess.Read)
            Dim Value() As Byte = New Byte(Fs.Length) {}
            Fs.Read(Value, 0, Fs.Length)
            Fs.Close()
            UpdatePictureBox()
        End If
    End Sub
 
Private Sub UpdatePictureBox()
        PictureBox.Image = Nothing
        Dim Value As Object
        If Not Value Is DBNull.Value Then
            If Value.Length > 0 Then
                PictureBox.Image = Bitmap.FromStream(New MemoryStream(CType(Value, Byte())))
            End If
        End If
    End Sub

Malheureusement quand je lance le debug, je n'ai aucun message d'erreur, rien.
Le programme s'arrete juste... :cry:
Si quelqu'un pouvait me dire ce qui ne va pas...
Merci
Le

03/11/2005, 11h57
freddyboy

et avec Image.FromFile au lieu de Bitmap.FromStream tu as essayé ?

@+
03/11/2005, 12h17
Alex35

il me dit:

Citation:

une valeur de type 'System.IO.MemoryStream' ne peut pas etre converti en 'string'
03/11/2005, 12h54
Alex35

bah en fait c'est bon pour visualiser l'image c'est juste

Code:

picturebox.image = image.fromfile(openfiledialog.filename)

Par contre quelqu'un saurait pour redimensionner l'image automatiquement a la taille de la picturebox??
Merci
03/11/2005, 12h57
freddyboy

Citation:

Envoyé par Alex35

bah en fait c'est bon pour visualiser l'image c'est juste

Code:

picturebox.image = image.fromfile(openfiledialog.filename)

Par contre quelqu'un saurait pour redimensionner l'image automatiquement a la taille de la picturebox??
Merci

ben tu peux essyer de fixer les property Width et Heigth avec les valeurs de ton picturebox.

@+
03/11/2005, 12h59
Alex35

comment ca les property de mon image??
il faut que je leur donne les memes que ma picture box??
c'est quoi la syntaxe...? :oops:
03/11/2005, 13h04
freddyboy
Citation:

Envoyé par Alex35

comment ca les property de mon image??
il faut que je leur donne les memes que ma picture box??
c'est quoi la syntaxe...? :oops:

oui tu essaye un truc comme ca:
Code:

1 2 3 tonimage.Heigth = tapicturebox.Heigth; tonimage.Width = tapicturebox.Width;
Apres fait voir le resultat, suivant les cas l'image va peut etre pas etre belle.

@+
03/11/2005, 13h06
Alex35

Parfait,
Merci beaucoup!!
Ensuite (j'en suis pas encore la, mais juste pour renseignement)
Pour l'enregistrer dans une base de données, il faut la convertir en byte, c'est ca?
puis la reconvertir en image pour la voir du programme??
03/11/2005, 13h08
freddyboy

Citation:

Envoyé par Alex35

Parfait,
Merci beaucoup!!
Ensuite (j'en suis pas encore la, mais juste pour renseignement)
Pour l'enregistrer dans une base de données, il faut la convertir en byte, c'est ca?
puis la reconvertir en image pour la voir du programme??

ca je ne sais pas trop. ca depend de la base de données que tu utilise car pour faire cela tu peux utiliser un blob mais toutes les bases ne le supportent pas.

@+
03/11/2005, 13h08
Alex35

Citation:

ca je ne sais pas trop. ca depend de la base de données que tu utilise car pour faire cela tu peux utiliser un blob mais toutes les bases ne le supportent pas.

c quoi un blob???
03/11/2005, 13h09
Alex35

et pour l'instant j'ustilise postgresql en local mais je vais passer sous sqlserver
03/11/2005, 13h12
freddyboy

Citation:

Envoyé par Alex35

et pour l'instant j'ustilise postgresql en local mais je vais passer sous sqlserver

les 2 doivent le faire me semble t il.

@+

par contre j'ai le code suivant :

Code:

1
2
3
4
5
6
7
8
9
Private Sub UiButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UiButton1.Click
        Dim img As Image
        If OpenFileDialog.ShowDialog() = DialogResult.OK Then
            img = Image.FromFile(OpenFileDialog.FileName)
            img.Width = PictureBox.Width
            img.Height = PictureBox.Height
            PictureBox.Image = img
        End If
    End Sub

et il me dit

la proprite width est ReadOnly
pareil pour height....

Ca veut dire koi???
Desole pour ces questions surement connes et MERCI de me consacrer du temps!!

03/11/2005, 13h18
neguib

cela veut dire que ces propriétés sont en lecture seule et ne peuvent être modifier
donc utilise un Bitmap intermediaire que tu redefinit à la taille du picturebox puis ensuite utilises la méthode Graphics.DrawImage
03/11/2005, 13h19
freddyboy

aie c'est que ces properrty sont en lectures seules. Donc tu peux les consulter mais pas leur donner la valeur que tu veux. Meme chose pour la bitmap.

@+
03/11/2005, 13h21
Alex35

ca signifie que je ne peux pas visuliser l'image comme je veux?
il n'ya pas moyen de bidouiller??
03/11/2005, 13h23
freddyboy

ben pas a ma connaissance mais ca veux pas dire que tu peux pas bidouiller. juste que je sais pas comment faire.

@+
03/11/2005, 13h27
Alex35

oki merci de ton aide c'est deja cool!
Sinon neguib dit qu'il faut passer par un bitmap intermediare comment faire cela??

non tu peux faire plus directe j'ai testé

Code:

1
2
3
Dim img As Image = Image.FromFile("filePath")
Dim g As Graphics = Graphics.FromHwnd(Me.PictureBox1.Handle)
g.DrawImage(img, Me.PictureBox1.ClientRectangle)

03/11/2005, 13h33
freddyboy

oui en effet j'avais pas penser à faire cela.
Bien vu.

@+

Voir 40 message(s) de cette discussion en une page