BorderStyle = 2 Si form réduite. page 1 - Divers / Débutants, Visual Basic, VB6, VB.NET, VB 2005, VB

Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 05 20:59:36

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : CONVERTION DES REQUêTTES ACCES2007 VERS SQL par casy

RE : FUSIONNER 2 PROJETS ? COMMENT FAIRE ? par steeventide

FUSIONNER 2 PROJETS ? COMMENT FAIRE ? par steeventide

RE : FORMAT PERSONNEL DANS UN TEXTBOX. par PCPT

RE : FORMAT PERSONNEL DANS UN TEXTBOX. par sancho12345

+ de logiciels à télécharger

1 464 846 membres
338 nouveaux aujourd'hui
15 045 membres club

Trouver une ressource

Trouvez une ressource parmi 40 095 codes, 1 302 999 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Poser une question

Sujet : BorderStyle = 2 Si form réduite. [ Divers / Débutants ] (DarkFel)

Informations & options pour cette discussion

Vous êtes ici : Thèmes / Visual Basic 6 / Divers / Débutants / BorderStyle = 2 Si form réduite.
Ce sujet vous interesse ? Cliquez ici pour être averti quand il y a une nouvelle réponse

dimanche 4 mai 2008 à 10:20:02 | BorderStyle = 2 Si form réduite.

DarkFel

Bonjour voilà j'ai créé une forme : form1 sans BorderStyle. Donc j'ai dû utliser la propriété Me.WindowState = 1 pour réduire la form
Donc quand ma form est réduite je n'ai pas de menu quand je click doit sur mon icone dans la barre des tâches. Donc pour avoir un menu quand le programme est dans la barre des tâches je pensais activer Le BorderStyle = 2

donc j'ai mis ce code :

Private Sub Form_Resize()
If Me.WindowState = 1 Then
Me.BorderStyle = 2
Else: Me.BorderStyle = 0
End Sub

Mais ça marche pas, pourquoi ? Merci à vous

dimanche 4 mai 2008 à 10:20:47 | Re : BorderStyle = 2 Si form réduite.

DarkFel	Private Sub Form_Resize() If Me.WindowState = 1 Then Me.BorderStyle = 2 Else: Me.BorderStyle = 0 End If End Sub Désolé j'ai oublié le End If. Mais ça marche pas... Comment faire. Merci à vous
	Rép. MP 94 msg 96 msg CS

dimanche 4 mai 2008 à 15:08:44 | Re : BorderStyle = 2 Si form réduite.

jmfmarques	Bonjour, Mets donc tout simplement à True la propriété ShowInTaskBar de ta form, au lieu de te lancer dans ces "acrobaties" ...
	Rép. MP 7471 msg 7945 msg CS

dimanche 4 mai 2008 à 15:19:18 | Re : BorderStyle = 2 Si form réduite.

DarkFel	Merci de ta réponse... Mais je vois pas le rapport ! Ma form a un BorderStyle = 0 Donc quand je la réduit avec Me.windowState = 1 Et que je click droit sur l'icone de mon Programme dans LA BARRE DES TACHES. Ben il n'y a pas de menu. Et moi je voudrais qu'il y est un menu...
	Rép. MP 94 msg 96 msg CS

lundi 5 mai 2008 à 13:18:06 | Re : BorderStyle = 2 Si form réduite.

PCPT	salut tout le monde, me semble bien que cette propriété est en lecture seule en exécution utilise cette source, tu pourras ôter la barre de titre tout en conservant le bouton et le menu dans la barre des tâches ++ Prenez un instant pour répondre à ce sondage svp
	Rép. MP 9942 msg 10435 msg CS

lundi 5 mai 2008 à 18:19:07 | Re : BorderStyle = 2 Si form réduite.

DarkFel	Merci à toi, mais c'est pas de mon niveau, je laisse tombé. Merci
	Rép. MP 94 msg 96 msg CS

lundi 5 mai 2008 à 18:27:53 | Re : BorderStyle = 2 Si form réduite.

PCPT

Réponse acceptée !
tu as juste à ajouter la classe à ton projet, à la déclarer (exemple fourni), attacher ta fenêtre et changer la propriété...

çà donne :

Option Explicit
Private AfFrm As New AfCls_FormButtons
'
Private Sub Form_Load()
    Set AfFrm.Form = Me
    AfFrm.Flat3D = True 'supprimer cette ligne si tu veux pouvoir redimensionner
    AfFrm.ShowTitleBar = False
End Sub
Private Sub Form_Unload(Cancel As Integer)
    Set AfFrm = Nothing
End Sub

Prenez un instant pour répondre à ce sondage svp

lundi 5 mai 2008 à 19:02:17 | Re : BorderStyle = 2 Si form réduite.

DarkFel	Merci à toi de te donner la peine de m'aider. Seulement il me dit erreur débogage. à cette ligne : Set AfFrm.Form = Me Juste pour ne pas recopier ce code bêtement... j'aurais pu mettre autre chose que AfFrm ? Merci.
	Rép. MP 94 msg 96 msg CS

lundi 5 mai 2008 à 19:20:50 | Re : BorderStyle = 2 Si form réduite.

PCPT	à partir du moment ou tu utilises une classe toute faite çà change plus grand chose de "recopier bêtement" sourtout quand on demande une réponse sur un forum.... c'est quoi l'erreur indiquée? s'il bloque là, fort probable que çà soir le type Form par reconnu, donc VBA ?!!!!! çà va beaucoup moins m'amuser si je ne me trompe pas
	Rép. MP 9942 msg 10435 msg CS

lundi 5 mai 2008 à 19:27:46 | Re : BorderStyle = 2 Si form réduite.

DarkFel	Non c'est VB6. Et ça fonctionne pourtant pas...
	Rép. MP 94 msg 96 msg CS

Cette discussion est classé dans : menu, form, borderstyle, réduite, windowstate

Répondre à ce message

Sujets en rapport avec ce message

Problème menu [ par druggedsephiroth ] Voilà j'aimerais mettre un menu sur ma form qui a le borderstyle sur none. J'aimerais que le menu soit juste un menu popup (popupmenu nomdumenu) mais taskbar avec form borderstyle = 0 none [ par tanaka13 ] bonjourMon probleme est le suivant:ma form est en borderstyle = 0 none et quant elle ai reduite je n'ai evidemment plus de menu (fermer,reduire,...) s task bar avec form borderstyle = 0 none [ par tanaka13 ] bonjourMon probleme est le suivant:ma form est en borderstyle = 0 none et quant elle ai reduite je n'ai evidemment plus de menu (fermer,reduire,...) s pb menu [ par samy56 ] salut à tousj'ai un petit souci, j'ai une appli qui contient une feuille MDI avec un menu et une autre form qui contient un menu mais pour un popupmen Problème de ListBox [ par deguelatore ] Alors voila mon problème: J'ai deux Form(Menu et Charger).Dans l'une j'entre des noms de fichiers grâce à une filelistbox(Form Cha menu systray sans borderstyle sur la forme. [ par Zelap ] Salut a tous.Alors voila mon souci, je developpe un petit programme de gestion de rendez-vous (Oui.... Je sais... y'en a déjà plein, mais moi j'ai du faire apparaitre une form dans une autre form a l'aide du menu [ par satan87 ] bonjouren vb6j'ai creer une form a laquelle g mis un menuil n'y a rien d'autre sur cette formet je voudrai que lorsque je clique sur une des option du probleme d'affichage en creant un menu api [ par rik023 ] bonjour voila j'ai deux souci, je cree un menu popup avec sous menu dynamiquement sur une form en utilisant les apiet mon probleme est que je veux changer le windowstate d'une form [ par edthefarmer ] Salut, j'ai un enormeee probleme, je m'explique :Je suis en train de coder un programme qui creer des form dynamiquement... Jusqu'ici pas de probleme Menu général et menu contextuel [ par vb_seb77 ] Bonjour, Je suis en VB6, W2000J'ai une From MDI (avec un menu général), qui permet d'appeler des Form (MDIChild).Dans une des mes Form j'ai un menu co