All pastes #987412 Raw Edit

Miscellany

public text v1 · immutable
·published 2008-04-16 14:38 UTC
rendered paste body
prise d'une carte
MaCarte = MonJeu.retirercarte
        MaMain.ajoutercarte(MaCarte, 2)
        coul2 = MaMain.retirecarte(2).get_coul()
        val2 = MaMain.retirecarte(2).get_val
        img1 = MonJeu.img_carte(val2, coul2)
affichage des cartes
 nom_img = chemin & "\images_epti2\" & img & ".gif"
        Me.PictureBox1.Image = System.Drawing.Image.FromFile(nom_img)
        nom_img1 = chemin & "\images_epti2\" & img1 & ".gif"
        Me.PictureBox2.Image = System.Drawing.Image.FromFile(nom_img1)
        nom_img2 = chemin & "\images_epti2\" & img2 & ".gif"
        Me.PictureBox3.Image = System.Drawing.Image.FromFile(nom_img2)
        nom_img3 = chemin & "\images_epti2\" & img3 & ".gif"
        Me.PictureBox4.Image = System.Drawing.Image.FromFile(nom_img3)
        nom_img4 = chemin & "\images_epti2\" & img4 & ".gif"
        Me.PictureBox5.Image = System.Drawing.Image.FromFile(nom_img4)