Discussion :

[Polyvar]

Bonjour,

Je veux réécrire un programme VB6 en VB.NET (VisualStudio 2013) sous WPF.
Mon programme est basé sur l'utilisation du sélecteur de couleurs (colorDialog) qui n'existe pas en WPF .
Comment faire pour réutiliser ce contrôle ou le remplacer par son équivalent en WPF .

Bien cordialement.

[Polyvar]

Re Bonjour,

En cherchant sur le web, j'ai trouvé ce qui pourrait être une piste à mon problème.
Il serait en effet possible d' "héberger" un Windows Forms dans WPF...
http://msdn.microsoft.com/en-us/libr...(v=vs.90).aspx
http://searchwindevelopment.techtarg...rDialog-in-WPF

Je lis notamment ceci :

Avant que je peux (puisse) utiliser la boîte de dialogue Windows Form dans mon projet, je dois ajouter une référence à l'assembly correct. Depuis ColorDialog est une classe. NET, il est facile d'ajouter une référence à son assemblage (System.Windows.Forms.dll) dans un projet WPF. Je dois également ajouter une référence à System.Drawing.dll Pour accéder la structure System.Drawing.Color.
(Traduction automatique)
Tout ceci étant du chinois pour moi, quelqu'un peut-il m'expliquer la marche à suivre?

Merci d'avance.

[tomlev]

Dans l'explorateur de solution, tu fais un clic droit sur le projet, et tu choisis "Ajouter une référence". Dans le dialogue qui s'affiche, tu choisis les assemblies System.Windows.Forms et System.Drawing.
Dans ton code, tu importes les namespaces correspondants :

Code :

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

1
2
Imports System.Windows.Forms
Imports System.Drawing

Ensuite tu peux utiliser le ColorDialog normalement.

Par contre la couleur renvoyée sera une couleur Windows Forms (GDI), pas une couleur WPF, donc il faudra convertir, en utilisant cette méthode par exemple :

Code :

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

1
2
3
Function GdiColorToWpfColor(ByVal gdiColor As System.Drawing.Color) As System.Windows.Media.Color
    Return System.Windows.Media.Color.FromArgb(gdiColor.A, gdiColor.R, gdiColor.G, gdiColor.B)
End Function

[Polyvar]

Bonsoir tomnev,

Et un grand merci pour ta réponse.

J'y vois nettement plus clair sur la façon d' ajouter les références et çà a marché !
Maintenant quant à utiliser le ColorDialog "normalement", il va falloir que je recherche comment je faisais précédemment.
Je savais qu'il fallait convertir le codage des couleurs, mais je ne savais pas comment.

Je reprendrais la conversation un peu plus trad car j'ai effacé certains fichiers et plus rien ne fonctionne.
Je recommence mes essais à zéro, cela me fait réviser. (C'est passionnant, mais quand même assez compliqué pour mes petits neurones...)

Bien cordialement.

[Polyvar]

Bonjour tomlev,tous,

Je me suis enfin remis à la tâche...

J'utilise donc ta fonction :

Code :

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

1
2
3
Function ConvertCouleur(ByVal gdiColor As System.Drawing.Color) As System.Windows.Media.Color
    Return System.Windows.Media.Color.FromArgb(gdiColor.A, gdiColor.R, gdiColor.G, gdiColor.B)
End Function

Code :

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

1
2
3
4
5
6
7
8
9
10
 Private Sub Boite_Click(sender As Object, e As RoutedEventArgs) Handles Boite.Click 'Bouton Affiche la Boite
        Dim Selecteur As New System.Windows.Forms.ColorDialog 
        Selecteur.ShowDialog() 
        Dim COULEUR As System.Drawing.Color
        COULEUR = Selecteur.Color
        Label_1.Content = COULEUR  'OK !!! Par exemple 70,153,34
        Label_2.Content = ConvertCouleur(COULEUR) 'OK !!! Par exemple #FF469922
         Cercle.Fill = ConvertCouleur(COULEUR)
        "Impossible de convertir une valeur de type "System.Windows.Media.Color" en "`System.Windows.Media.Brush"
    End Sub

Voilà donc un bouton qui affiche le sélecteur Windows.Forms et la fonction qui convertit les couleurs d'un système à l'autre...
Dans Label-1 j'affiche bien la valeur de la couleur retournée par le Sélecteur de couleurs Par exemple : 70,153,34
Dans Label-2, j'affiche bien la valeur convertie . Par exemple : #0000FF
Maintenant quand je veux faire un Fill sur une ellipse appelée "Cercle", j'ai toujours une erreur : "Impossible de convertir une valeur de type "System.Windows.Media.Color" en "`System.Windows.Media.Brush"

Je ne trouve pas quelle solution adopter pour remplir mon cercle avec la couleur choisie...
Je ne doute pas qu'il existe une réponse, mais je cherche depuis pas mal de temps et je n'ai pas trouvé...

Merci par avance.

[tomlev]

En WPF, les propriétés Fill, Stroke, Background, BorderBrush etc ne sont pas des couleurs mais des Brush (pinceaux), parce que ce n'est pas forcément des couleurs unies mais ça peut aussi être des dégradés, des motifs, etc. Si tu veux une couleur unie, utilise SolidColorBrush :

Code :

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

Cercle.Fill = New SolidColorBrush(ConvertCouleur(COULEUR))

[Polyvar]

Merveilleux,

Ça marche !!

Après des heures et des heures de réflexion, c'est un grand bonheur de voir un programme qui fonctionne comme on voudrait, grâce à l'aide d'un membre d'un forum que l'on ne connait même pas ...
Merci à Développez.com, aux membres qui m'ont aiguillés vers la solution, et tout particulièrement à tomlev d'une efficacité redoutable et d'une excellente pédagogie !!!

Amitiés.

[doubleface2]

pour importer colorDialog sur un window form, vous devez instancier l'objet

par ex sur contrôle click, placer ce code :

dim xy as new colordialog
xy.show