Discussion :

[Ehjoe]

Bonjour,

Je ne sais pas adapter une image (tout format) venant du Net via le webBrowser à la taille de l'écran de celui-ci (qui peut varier) ?

Voici 4 hyperliens afin de pouvoir tester :

Code :

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

1
2
3
4
5
 
WebBrowser1.Navigate("http://mesromans.free.fr/petit.jpg")
WebBrowser1.Navigate("http://mesromans.free.fr/grand.jpg")
WebBrowser1.Navigate("http://mesromans.free.fr/maxi.jpg")
WebBrowser1.Navigate("http://mesromans.free.fr/large.jpg")

Et voici la procédure après chargement où je présume qu'il faudrait faire l'adaptation :

Code :

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

1
2
3
4
 
Sub WebBrowser1_DocumentCompleted_1(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
  ' COMMENT ADAPTER L'IMAGE A L'ECRAN DU WEBBROWSER1 ???
End Sub

Nota bene, je crois connaître le principe mais je ne connais pas les directives permettant de le faire, exemple :

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
 
if webbrowser1.image = vide alors sort
si imageXY = webborserXY alors sort ' ok
'
si imageX <> webbrowserX alors 
  imageX = webbrowserX
  si imageY <> webbrowserY alors imlageY = webbrowserY
fin de si
'
si imageY <> webbrowserY alors 
  imageY = webbrowserY
  si imageX <> webbrowserX alors imageX = webbrowserX
fin de si
'
' S'il s'avérait que l'image soit floue, je réglerais manuellement
' le zoom à l'aide des boutons prévus à cet effet ...

Ben si vous arrivez à m'aider je vous remercie beaucoup, très cordialement.

[tomlev]

Pourquoi utiliser un WebBrowser ? Un PictureBox serait plus adapté...

Code :

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

1
2
3
4
5
6
7
8
9
10
Function DownloadImage(ByVal url As String) As Image
    Dim client As New WebClient()
    Using str As Stream = client.OpenRead(url)
        Return Image.FromStream(str)
    End Using
End Function
 
...
 
pictureBox1.Image = DownloadImage("http://mesromans.free.fr/petit.jpg")

Ensuite tu peux jouer sur la propriété SizeMode de la PictureBox pour agrandir ou réduire l'image automatiquement

[Arnard]

+1 pour la pictureBox, et ce que tu désires n'est pas possible tel quel, un webbrowser affiche une page web, que cette dernière soit du html ou une image, il faut raisonner en terme de web.

Si tu souhaites persister, dans l'idée, il faudrait voir avec l'objet WebBrowser.Document qui retourne un html document (et donc checker si la prise en charge d'une simple image est ok sans être dans une page web) ou à défaut de WebBrowser.DocumentStream (avec opération de récupération de l'image pour en mesurer la taille) pour faire ce que tu veux !