Discussion :

[Alex35]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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...
Si quelqu'un pouvait me dire ce qui ne va pas...
Merci
Le

[freddyboy]

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

@+

[Alex35]

il me dit:

une valeur de type 'System.IO.MemoryStream' ne peut pas etre converti en 'string'

[Alex35]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

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

[freddyboy]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

@+

[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...?

[freddyboy]

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

oui tu essaye un truc comme ca:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

@+

[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??

[freddyboy]

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.

@+

[Alex35]

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???

[Alex35]

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

[freddyboy]

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

les 2 doivent le faire me semble t il.

@+

[Alex35]

par contre j'ai le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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!!

[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

[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.

@+

[Alex35]

ca signifie que je ne peux pas visuliser l'image comme je veux?
il n'ya pas moyen de bidouiller??

[freddyboy]

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

@+

[Alex35]

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

[neguib]

non tu peux faire plus directe j'ai testé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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)

[freddyboy]

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

@+