Discussion :

[lolyest]

Bonjour !
Je cherche un moyen d'empêcher de sortir de l'écran mon application.
J'ai fait une application 500 x 86 px .
En gros, je voudrais que quand on veut sortir de l'écran l'application, elle se remette au bord de l'écran.
Je suis nouveau en VB.NET.
Merci

[tomlev]

tu peux gérer l'évènement Move pour contrôler que la nouvelle position est dans l'écran et redéplacer si besoin

[Faladin]

Pourquoi ne pas tout simplement empêcher le mouvement de cette fenêtre, et la faire apparaître toujours centré sur son parent ou sur l'écran?

[Danyel]

En utilisant la recherche, tu tomberas sur un post assez recent dont le sujet est strictement le meme

[lolyest]

Bonjour,
Merci de vos réponses
Petits problèmes : * Je ne trouve pas le sujet récent :S
* Je ne sait pas comment gérer l'événement Move
Et pour fixer la fenêtre, bonne idée, mais je ne peut pas le faire car trop gênant

[tomlev]

pour gérer l'évènement Move :
- sélectionne la form dans le designer
- va dans la fenêtre "Propriétés"
- clic sur le bouton "Evènements" (l'éclair jaune)
- double-clic sur Move
Ca va générer une méthode vide pour l'évènement Move. Tu n'as plus qu'à ajouter le code qui vérifie et ajuste la position

[lolyest]

Ok, j'ai fait ce que tu m'as dit, mais rien à changer :S
Je dois mettre un code en plus ou autre ?
Merci

[tomlev]

ben fais voir ce que tu as mis dans le code de l'évènement Move

[lolyest]

J'ai double cliquer comme tu m'as dit, et il a mit : MainFormMove

[tomlev]

J'ai double cliquer comme tu m'as dit, et il a mit : MainFormMove

ben oui mais ça suffit pas !
je t'ai dit plus haut:

Tu n'as plus qu'à ajouter le code qui vérifie et ajuste la position

Donc tu as quand même quelque chose à faire...

Puisque tu n'as visiblement aucune connaissance en développement VB.NET, je te suggère d'aller faire un tour ici :
http://plasserre.developpez.com/vsommair.htm

[Faladin]

Ben là faut mettre un code...

Tu peux essayer quelquechose du genre:

Code :

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

1
2
Form.Location.X = ValeurFixeX
Form.Location.Y = ValeurFixeY

Les valeurs fixes peuvent être des constantes ou variables. Par contre, j'ai l'impression que ta fenêtre va "scintiller" de cette façon, peut-être que TomLev à une meilleur idée...

En passant, dans ma signature j'Ai un bon lien pour les débutants en VB...Je te le conseille...

[lolyest]

Ok, merci
J'ai déjà regarder le guide, et je n'ai pas très bien compris enfaite par quoi commencer à apprendre :S
Et le :
Form.Location.X = ValeurFixeX
Form.Location.Y = ValeurFixeY

Je le met où ?

PS : Désoler pour mon incompétence en la matière

[Faladin]

Dans l'événement move

[tomlev]

Code :

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

1
2
Form.Location.X = ValeurFixeX
Form.Location.Y = ValeurFixeY

Non, ce code ne fonctionnera pas, pour la raison expliquée dans ce post:
http://www.developpez.net/forums/d59...e-width-label/
(Faladin, tu as la mémoire courte )

Il faut faire comme ça :

Code :

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

Form.Location = New Point(ValeurFixeX, ValeurFixeY)

Pour vérifier que la fenêtre est toujours dans l'écran, il faut tester la position (Me.Location) et la taille (Me.Size) de la fenêtre par rapport aux limites de l'écran (Screen.PrimaryScreen.WorkingArea)
Ce code est à placer dans l'évènement Move

[Faladin]

Non, ce code ne fonctionnera pas, pour la raison expliquée dans ce post:
http://www.developpez.net/forums/d59...e-width-label/
(Faladin, tu as la mémoire courte )

Ahaha, c'est la honte...

Effectivement, j'ai deux excuses pour ma défense:

1- J'ai appris VB en action et je n'ai pas des bases solides je crois, désolé...
2- J'habite au Québec et il est très tôt, je sirote mon premier café, donner moi la clémence du peuple

[lolyest]

Ok, merci
je vais déjà approfondir mes connaissances en VB.NET ( Il y a du boulot ... )
Mais c'est normal que ton code ne marche pas ? ( Form.Location = New Point(ValeurFixeX, ValeurFixeY) )

[tomlev]

Mais c'est normal que ton code ne marche pas ? ( Form.Location = New Point(ValeurFixeX, ValeurFixeY) )

En fait c'est Me.Location et non Form.Location
Et il faut avoir déclaré et initialisé ValeurFixeX et ValeurFixeY

2- J'habite au Québec et il est très tôt, je sirote mon premier café, donner moi la clémence du peuple

ah ok, ici c'est plutôt l'heure du 3e café (ou 4e, ou 5e, je perds le compte )

[lolyest]

Comment on déclare ces variables ? ( si c'est bien une variable ... )
Je veux dire qu'est-ce qu'il faut mettre à l'intérieur et placer le code ou ?

Hum et je pense que c'est l'heure du 3eme

[Faladin]

Au tout début du code de ton formulaire (entre les premières déclarations de SUb/Function et le "Public Class NomDeTonFormulaire") , tu peux les déclarer soit en variable ou en constante:

- en mode public (accessible de l'Extérieur donc tu pourrais les modifier)

Code :

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

1
2
Public VariableFixeX as integer = XXX
Public VariableFixeY as integer = YYY

- en mode private (local et non-accessible)

Code :

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

1
2
Private VariableFixeX as integer = XXX
Private VariableFixeY as integer = YYY

- en mode constante, donc "hard-coder" (en constante, VS ne fait que remplacer les endroits où ils retrouvent cette constante par la valeur voulu, c'est donc que pour rendre ton code plus clair!)

Code :

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

1
2
Const VariableFixeX as integer = XXX
Const VariableFixeY as integer = YYY

Par contre, en constante, je suis pas trop sûr de l'utilité ou non de Public ou Private, j'en connais pas assez en VB...

[lolyest]

Ok, mais marche pas :S
J'ai remplacer les XXX et YYY par les dimensions de mon form, et il me met sytax error lol

Voila le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
'
' Created by SharpDevelop.
' User: Alexandre
' Date: 26/07/2008
' Time: 19:27
' 
' To change this template use Tools | Options | Coding | Edit Standard Headers.
'
Public Partial Class MainForm
	Public Sub New()
		' The Me.InitializeComponent call is required for Windows Forms designer support.
		Me.InitializeComponent()
 
		'
		' TODO : Add constructor code after InitializeComponents
 
	End Sub
		Private VariableFixeX as integer = 500
		Public VariableFixeY as integer = 496
		Me.Location = New Point(ValeurFixeX, ValeurFixeY)	
End Class