[VB.NET] PictureBox et Compact Framework

Version imprimable

09/03/2005, 16h23
WriteLN

[VB.NET] PictureBox et Compact Framework

Salut,

Sous VB.net framework, ca fonctionne à merveille mais sous VB.net COMPACT Framework, ca ne fonctionne pas:

Code:

PictureBox.Image = Image.FromFile ("c:\directory\monimage.bmp")

Pour le compact framework, il me dit que la méthode fromfile n'existe pas pour l'objet image....

J'ai essayé ceci mais également sans succès:

Code:

PictureBox.Image = new Bitmap("c:\directory\monimage.bmp")

Quelqu'un peut m'expliquer comment changer mon image au runtime?

D'avance merci
09/03/2005, 16h48
freddyboy
oui la fonction Image.FromFile n'est pas supporte par le compact framework.
par contre :
Code:

1 2 PictureBox.Image = new Bitmap("c:\directory\monimage.bmp")
cela doit fonctionné si le fichier est sur ton pda (donc ton chemin n'est pas bon la).

@+
09/03/2005, 16h52
freddyboy

par contre tu utilise peut etre un emulateur. alors voici la methode de chez msdn pour utiliser un fichier de ton disque depuis l'emulateur.

Citation:

How do I copy files to the emulator?
One approach would be to create a file share on your development PC, and then connect to that share via File Explorer in the emulator. You may then copy and paste the files from the share to the emulator's local file system. Another approach would be to add the file(s) to a smart device project and set their Build Action(s) property to "Content". See the Visual Studio .NET online documentation for more information on File Properties.

Step by step instructions for adding a "Content" file to a smart device project:

Open or create a smart device project,

On the View menu, click Solution Explorer,

In Solution Explorer, right-click on your project, point to Add, and click Add Existing Item. Browse to and add the desired file to the project.

Right-click on the file that you added, in solution explorer, and click Properties,

Set the Build Action property to "Content", if it is not already set.

@+
09/03/2005, 21h16
Thomas Lebrun

A l'occasion, faudrait rajouter cette astuce dans la FAQ freddyboy :wink:
09/03/2005, 22h47
WriteLN

Oui dans la F.A.Q. !!!! :roll:

Ca fonctionne à partir du moment ou l'on connait le chemin correct...
Pour cela, j'ai une utiliser une méthode que je posterai demain (équivalent de ap.path non supporté par ce compact framework)

A présent j'affiche une image différente selon que mon pocket PC est connecté à un réseau, connecté via le craddle ou tout simplement déconnecté.

Encore merci pour les infos !
10/03/2005, 10h28
freddyboy

Ok Morpheus, je prends note pour la FAQ. En ce moment je suis pas tres actif because beaucoup de taf. Mais j'ai encore 2/3 Q/R sous le coude. Je m'occupe de ca dès que j'ai 2 minutes.

@+

Je te donne le code que j'ai finalement utilise pour faire mon indicateur de status pour la connection reseau.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub Timer_connected_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer_connected.Tick
        If thread Then 'varaible globale pour eviter la superposition de timers (multithreading)
            thread = False
            Dim localEndPoint As New IPEndPoint(Dns.Resolve(Dns.GetHostName()).AddressList(0), 0)
            Dim img_status As System.Drawing.Bitmap
            Select Case localEndPoint.Address.ToString
                Case "127.0.0.1"
                    Lbl_status.Text = "OffLine"
                    img_status = New Bitmap(GetAppPath() & "/disconnected.bmp")
                    Picture_status.Image = CType(img_status, Image)
                Case "192.168.55.101"
                    Lbl_status.Text = "Craddled"
                    img_status = New Bitmap(GetAppPath() & "/craddled.bmp")
                    Picture_status.Image = CType(img_status, Image)
                Case Else
                    Lbl_status.Text = "OnLine"
                    img_status = New Bitmap(GetAppPath() & "/connected.bmp")
                    Picture_status.Image = CType(img_status, Image)
            End Select
            thread = True
        End If
    End Sub

Et dans un module:

Code:

1
2
3
4
Public Function GetAppPath() As String
        Return System.IO.Path.GetDirectoryName( _
            System.Reflection.Assembly.GetExecutingAssembly().GetName().CodeBase)
    End Function

Voila, j'espere que ca aidera quelqu'un... Si vous avez des remarques pour ameliorer ou preciser cette methode, n'hesitez pas.
En fait, pour aller plus loin dans ce projet, est-ce que quelqu'un sait s'il serait possible de determiner la puissance du reseau wireless a un moment donne?
Comme cela, je pourrais par exemple passer en mode deconnecte des que le reseau est a moins de xx Db par exemple.

Encore merci pour vos infos.