Discussion :

[noftal]

Bonjour,

C'est con, mais je n'arrive pas à paramétrer un form destiné à servir de AboutBox de façon à ce qu'il s'affiche sans barre de titre mais en relief (un peu comme l'apparence d'un bouton de base).
Dans les propriétés, la propriété permettant de s'affranchir de la barre de titre impose un affichage Flat.
Ya-t-il une astuce ou bien faut-il sortir la grosse artillerie (dériver une classe) ?

[callo]

Bonjour,
Il faut mettre la propriété FormBorderStyle à None.
Ensuite, essayes de créer une image avec les bords un peu arrondi et de l'utiliser comme Backgroundimage pour ton formulaire. Tu peux t'inspirer de cette discussion.

[noftal]

Apparemment cela permet de créer des bords arrondis mais ce que je veux faire c'est avoir une bordure 3D.
A moins que je n'aie lu trop vite.

[callo]

Ah, je n'avais pas compris que tu souhaitais avoir un effet 3D. Regardes peut-être du côté de ControlPaint.DrawBorder3D et aussi ceci pour les styles de bordure tridimensionnelle à utiliser.

Dans tous les les cas, il me semble que tu devrais quand même redessiner la bordure dans l'event Paint de ton formulaire.

[noftal]

J'ai essayé de rajouter la procédure suivante (en m'inspirant de MSDN)

Code :

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

1
2
3
4
5
6
7
    Private Sub AboutBox_Paint(ByVal sender As Object, ByVal e As PaintEventArgs) Handles MyBase.Paint
        ' affiche une bordure de formulaire en 3D
        Dim borderRectangle As Rectangle = Me.ClientRectangle
        borderRectangle.Inflate(-10, -10)
        ControlPaint.DrawBorder3D(e.Graphics, borderRectangle, _
            Border3DStyle.Raised)
    End Sub

Mais le programme ne rentre jamais dans cette procédure lors de l'exécution. Il doit manquer un truc pour l'obliger à passer par cette procédure.