Changement de résolution au lancement d'une appli
Soyez le premier à donner votre avis sur cette source.
Vue 7 870 fois - Téléchargée 906 fois
Description
Il m'a été demandé dans le cadre de mon travail de pouvoir lancer une application particulière dans la résolution 1024*768 et de revenir ensuite à l'ancienne résolution lorsque l'appli est quittée.
Modifier config.ini pour le chemin de l'application
Axe d'amélioration : mettre la résolution ds le fichier ini.
Toujours par rapport à cette appli, on me demande, de changer la taille des polices employées (96 dpi au lieu de 120), mais je rame et ne trouve pas...
vous avez une idée ?
Modifier config.ini pour le chemin de l'application
Source / Exemple :
Voir le zip
Conclusion :
Axe d'amélioration : mettre la résolution ds le fichier ini.
Toujours par rapport à cette appli, on me demande, de changer la taille des polices employées (96 dpi au lieu de 120), mais je rame et ne trouve pas...
vous avez une idée ?
Codes Sources
A voir également
- Changement de résolution au lancement d'une appli
- Changement de résolution et l'appli ? ✓ - Forum - Delphi / Pascal
- Lancement d'une appli a partir d'un prog ✓ - Forum - C++ & C++ .NET
- Eviter que Delphi soit bloqué après le lancement d'une appli... ✓ - Forum - Delphi / Pascal
- Visual Basic / VB.NET : Changer la resolution de windows - CodeS SourceS - Guide
- Changer la resolution affichage windows (+ couleur + frequence) - Codes sources - Visual Basic / VB.NET (Système)
Commentaires
Merci!
Je ne vois pas pourquoi le fait que l'appli soit sur un serveur impacte le changement de résolution, sauf si tu as des coupures réseau (peut être ?).
Essaie de mettre le chemin UNC (\\serveur\chemin\nomAppli.exe)
Je me suis mal exprimé, c'est aussi ce que je désire mais comme l'application que je lance est sur un disque en réseau (je suppose), la résolution change pendant 2 à 3 secondes (comme je le souhaite) et ensuite et elle revient instantanément... avant que je quitte l'appli.
Heu c'est normal, la demande qui m'a été faite, était le changement de résolution uniquement le temps de l'exécution du programme...
si tu veux juste un changement de résolution, il faut supprimer toute cette partie :
T = Timer
' Lancement de l'appli
RetVal = Shell(Appli, vbMinimizedFocus) ' tant que l'appli est ouverte
While InstanceToWnd(RetVal) <> 0
DoEvents
Wend
DevM.dmPelsWidth = OldX
DevM.dmPelsHeight = OldY
'change the display settings back to the old settings
Call ChangeDisplaySettingsEx(ByVal 0&, DevM, ByVal 0&, CDS_TEST, ByVal 0&)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.