angelus314
Messages postés11Date d'inscriptionvendredi 5 octobre 2007StatutMembreDernière intervention 5 décembre 2007
-
5 déc. 2007 à 12:12
swan94
Messages postés254Date d'inscriptionjeudi 29 juillet 2004StatutMembreDernière intervention 2 avril 2010
-
5 déc. 2007 à 21:02
Bonjour à tous,
Voilà j'aimerai démarrer mon form VB express edition 2005 directement sur mon écran secondaire en plein écran.
Pour le plein écran c'est fait y a pas de souci mais pour le faire démarrer sur l'écran secondaire y a bien un petit truc non. Acheter ultramon rien que pour cette fonction ca serait un peu dommage.
swan94
Messages postés254Date d'inscriptionjeudi 29 juillet 2004StatutMembreDernière intervention 2 avril 2010 5 déc. 2007 à 12:23
non il existe une fonction sur vb2005 pour identifier les moniteurs :
<li>Première étape : détecter le nb d'écrans connectés au PC</li><li>=> SystemInformation.MonitorCount
</li><li>
</li><li>Deuxième étape : détecter la résolution de chaque écran
</li><li>=> Screen.AllScreens(0).Bounds (où 0 est l'ID de l'écran. 0 pour le premier, 1 pour le second, etc.)</li><li>
</li><li>Troisième étape : stocker dans plusieurs variables les abscisses de chaque écran
</li><li>=> la variable appelée
</li><li>[LEcran1] = 0,
</li><li>[LEcran2] = 1280 (si la résolution de l'écran 1 est 1280), etc.</li><li>
</li><li>Quatrième étape : il suffit de redéfinir la position de la form
</li><li>=> me.location = New Point (LEcran2,0)
</li><li>J'indique que la form doit se positionner sur le deuxième écran</li>(prit sur une source du site de YoYoGoTT)
Swan94
===============Si la réponse vous convient, merci de l'accepter=================
angelus314
Messages postés11Date d'inscriptionvendredi 5 octobre 2007StatutMembreDernière intervention 5 décembre 2007 5 déc. 2007 à 15:19
Merci pour votre réponse,
Toutefois j'ai de petit souci car si je met le code que vous m'avez fourni VB express 2005 me met deux erreurs !!
La premier en ce qui concerne SystemInformation.MonitorCount :
- Un accès à la propriété doit assigner la propriété ou utiliser sa valeur
La seconde pour Screen.AllScreens(1).Bounds :
- Un accès à la propriété doit assigner la propriété ou utiliser sa valeur (la même)
Voilà en mettant pour le systeminfo par exemple : value = SystemInformation.MonitorCount le nombre de moniteur est bien répérer (en ayant déclarer value en integer et avec un msgbox il me retourne 2) et je n'ai plus d'erreur. Par contre pour Screen.AllScreen(0).Bounds la je séche un peu.
Pourriez vous me donner un peu plus de précision ?
swan94
Messages postés254Date d'inscriptionjeudi 29 juillet 2004StatutMembreDernière intervention 2 avril 2010 5 déc. 2007 à 21:02
salut,
là ce que je t'ai filé sont des extraits à adapter.
Bon, pour récupérer la largeur de l'écran fait :
Dim LargEcran As Integer
LargEcran = Screen.AllScreens(0).Bounds.Width 'obtient la largeur du 1er écran
MessageBox.Show(LargEcran)
N'hésite pas si tu as besoin d'autres informations
Swan94
===============Si la réponse vous convient, merci de l'accepter=================