VB.NET MDI BACKGROUND IMAGERésolu

Question

Bonjour a tous 
Je suis au prise avec un probl&#232;me je suis d&#233;butant et j'essaie &#224; l'aide
d'un open file dialog de permettre a l'utilisateur d'Aller chercher une image pour lui permettre de modifier le fond d'&#233;cran mais je ne suis pas capable d'affecter la valeur 
retourn&#233; a mon background image. Si vous avez des questions n'h&#233;sitez pas a me le demand&#233; 

Merci a l'avance en passant votre site est tr&#232;s utile 
Bonne journ&#233;e

Voici le bout de mon code qui me permet de faire afficher le dialog box



Dim str1 
As 
String



Dim img 
As System.Drawing.Image


cmd1.InitialDirectory = "D:\Clinique2\Clinique_Dentaire_Cegep_TR\bin\Images"'R&#233;pertoire initiale 


cmd1.Title = ("S&#233;lectionner une image comme fond d'&#233;cran")


cmd1.Multiselect = 
False


cmd1.ShowDialog()


str1 = cmd1.FileName


Permet de cr&#233;er un System.drawing image a partir de l'emplacement de l'image 


img = FrmMdi.ActiveForm.BackgroundImage.FromFile(str1)


FrmMdi.ActiveForm.BackgroundImage = img
 C'est a cette ligne que ca plante

Pym Corp · Accepted Answer

Bonjour,

En fait ton probl&#232;me c'est plut&#244;t cette ligne :
img = FrmMdi.ActiveForm.BackgroundImage.FromFile(str1)

Qu'il faut remplacer par :
img = Image.FromFile(str1)

Mais ensuite img devient obsol&#232;te, donc en remplace en fait :
img = Image.FromFile(str1)

FrmMdi.ActiveForm.BackgroundImage = img

par :
FrmMdi.ActiveForm.BackgroundImage = 
Image.FromFile(str1)

Voci un bout de code qui marche nickel :

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim frmTest As New Form
        frmTest.MdiParent = FrmMdi
        frmTest.Show()

        cmd1.InitialDirectory = "D:\Clinique2\Clinique_Dentaire_Cegep_TR\bin\Images" 'R&#233;pertoire initiale
        cmd1.Title = ("S&#233;lectionner une image comme fond d'&#233;cran")
        cmd1.Multiselect = False
        cmd1.ShowDialog()
    End Sub

    Private Sub cmd1_FileOk(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles cmd1.FileOk
        FrmMdi.ActiveMdiChild.BackgroundImage = Image.FromFile(cmd1.FileName)
    End Sub

<hr>http://pym-corp.com/blog/index.php?progs_meteo_fusion

http://ww%3C/body

kevin_prec · Answer

Voila j'ai essay&#233; ce que tu a mis mais je suis au prises avec un autre probleme je ne sais aps pourquoi mais quand je 
viens pour me connecter &#224; la base de donn&#233;e il me cr&#233;er une erreur me disant qu'elle n'est pas dans le dossier images mais je ne lui demande pas d'aller la chercher a cette endroit 
De plus, si c possible de m'expliquer commetn fonctionne une MDI et MdiParent child je vous en serais tres reconnaissant 
merci

VB.NET MDI BACKGROUND IMAGE

2 réponses

Discussions similaires