Récupérer le style de Windows XP [Résolu]

Signaler
Messages postés
4
Date d'inscription
samedi 9 septembre 2006
Statut
Membre
Dernière intervention
9 septembre 2006
-
Messages postés
17
Date d'inscription
mercredi 2 juillet 2008
Statut
Membre
Dernière intervention
1 octobre 2014
-
Bonjour
Sous XP, on peut choisir l'apparence de l'affichage, le style de windows (Propriété de l'affichage, Apparence, Fenêtre et boutons) :Windows Classic ou Windows XP.
Et ca change la taille des fenêtres !
Comment peut on savoir quel est le style sélectionné ?
Il doit bien avoir une entrée dans la base de registre qui l'indique.
Le but est de corriger les coordonnées d'affichage.
Merci

7 réponses

Messages postés
21042
Date d'inscription
jeudi 23 janvier 2003
Statut
Modérateur
Dernière intervention
21 août 2019
20
Absolument NON, il ne faut jamais amener des DLLs d'un système sur un autre.
Tu regardes avec GetVersionEx:
If version < XP Then PASTHEME
Elseif Appel de IsThemeActive()

ciao...
BruNews, MVP VC++
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
20
Salut,
Il existe la fonction IsThemeActive de l'api Ux Theme.

Déclaration:
Private Declare Function IsThemeActive Lib "UxTheme.dll" () As Boolean

Exemple:
If IsThemeActive Then
   MsgBox "Style XP activé"
Else
   MsgBox "Style classique activé"
End If

Bon courage++
Messages postés
4
Date d'inscription
samedi 9 septembre 2006
Statut
Membre
Dernière intervention
9 septembre 2006

Merci de la réponse rapide.
Encore une précision. Si lelogiciel fonctionne sous windows 2000 et non sous XP que se passe-t-il ?
Merci
Messages postés
21042
Date d'inscription
jeudi 23 janvier 2003
Statut
Modérateur
Dernière intervention
21 août 2019
20
Tout simplement il ne faut pas appeler une API qui n'existe pas sur un système.

ciao...
BruNews, MVP VC++
Messages postés
4
Date d'inscription
samedi 9 septembre 2006
Statut
Membre
Dernière intervention
9 septembre 2006

Ok,


je vais inclure la dll dans l'install

Merci pour l'aide
Messages postés
4
Date d'inscription
samedi 9 septembre 2006
Statut
Membre
Dernière intervention
9 septembre 2006

Merci, ca marche même sous win 98
Encore grand merci
Messages postés
17
Date d'inscription
mercredi 2 juillet 2008
Statut
Membre
Dernière intervention
1 octobre 2014

Salut

Quel est le code en Delphi 7 qui permet de changer les propriétés d'affichage de bureau vers
« Style Windows XP » et « Par défaht (bleu) » dans les propriétés

- Fenêtre et button
- Modèle de couleurs

Et aussi la propriété :
« Laisser Windows choisir la meilleure configuration pour mon ordinateur »

Qui se trouve en :

Démarrer propriétés poste de travail avancés performances paramètres

J'ai vu toutes ces options Semblable dans le logiciel « TuneUp 2010 »

Aide moi
Merci