Discussion :

[Lung]

Dans un projet, je dois modifier la résolution de l'écran (taille, fréquence, nb de couleurs) : Pas de problème avec ChangeDisplaySettings.

Par contre, pour pouvoir remettre le mode graphique de départ, il faudrait déjà le récupérer. Et c'est là que je coince.
Je récupère l'ancienne taille d'acran avec GetSystemMetrics :

Code :

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

1
2
      _ModeGraphiqueOld.nLargeur := GetSystemMetrics(SM_CXSCREEN);
      _ModeGraphiqueOld.nHauteur := GetSystemMetrics(SM_CYSCREEN);

Je récupère le nombre de couleur avec GetDeviceCaps :

Code :

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

AncienneResolutionCouleur:=GetDeviceCaps(Form1.Canvas.Handle, BITSPIXEL)*GetDeviceCaps(Form1.Canvas.Handle, PLANES);

Mais, pour la fréquence, je n'ai pas trouvé comment faire.
Quelqu'un aurait-il une idée ?
Merci.

[EssaiEncore]

je c pas si cela peut t'aider

• http://www.phidels.com/php/index.php3?page=../php/pagetelechargementzip.php3&id=220

[Lung]

je c pas si cela peut t'aider

• http://www.phidels.com/php/index.php3?page=../php/pagetelechargementzip.php3&id=220

Merci, mais je connaissais déjà.
C'est grâce à cet exemple que j'ai su comment récupérer le nombre de couleurs.
Mais, il ne parle pas de la fréquence.

[EssaiEncore]

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
function ChangeFrequence(Frequence:integer):integer;
var
  Retour:Longint;
  DevMode:TDeviceMode;
begin
  DevMode.dmSize:=SizeOf(DevMode);
  DevMode.dmDisplayFrequency:=Frequence;
  DevMode.dmFields:=DM_DISPLAYFREQUENCY; //indique ce que l'on veut modifier.
  Retour := ChangeDisplaySettings(DevMode, CDS_TEST); //CDS_TEST car ce que l'on veut en premier, c'est voir si c'est possible
  if Retour=DISP_CHANGE_RESTART then ShowMessage('ne peut modifier la résolution car nécessiterait un redémarrage de Windows');
  if Retour=DISP_CHANGE_SUCCESSFUL then ChangeDisplaySettings(DevMode, CDS_UPDATEREGISTRY);// là, c'est bon, on le fait pour de bon.
  if Retour=DISP_CHANGE_FAILED	then ShowMessage('erreur');
  if Retour=DISP_CHANGE_BADMODE then ShowMessage('Mode Graphique non supporté');
  Result:=Retour;
end;

C bien la frequence ca ?? Peut etre c tu deja le faire !!!

[bjl]

Salut Lung,

tu as essayer avec l'API EnumDisplaySettings ?

http://msdn.microsoft.com/library/de...vcons_84oj.asp

il y a aussi DEVMODE à lire (EnumDisplaySettings peut retourner 0 ou 1 si l'écran est en mode défaut)

http://msdn.microsoft.com/library/de...tspol_8nle.asp

[Lung]

tu as essayer avec l'API EnumDisplaySettings ?

http://msdn.microsoft.com/library/de...vcons_84oj.asp

iModeNum
[in] Specifies the type of information to retrieve. This value can be a graphics mode index or one of the following values. Value Meaning
ENUM_CURRENT_SETTINGS Retrieve the current settings for the display device.
ENUM_REGISTRY_SETTINGS Retrieve the settings for the display device that are currently stored in the registry.

Ces 2 paramètres n'existe pas.
Comment les utiliser ?
Ils n'existent pas dans l'aide Delphi.

[bjl]

il semblerait que la valeur soit -1 pour ENUM_CURRENT_SETTINGS


http://66.102.9.104/search?q=cache:M...ETTINGS+&hl=fr

[portu]

Code :

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

1
2
3
4
5
6
7
8
9
 
Var
Frequency : Integer;
DC : THandle;
Begin
DC := GetDC(Handle);
Frequency := GetDeviceCaps(DC, VREFRESH);
ShowMessage(Format('%d Hrz', [Frequency ]));
end;

Est ce ce que tu veux ?

[Lung]

il semblerait que la valeur soit -1 pour ENUM_CURRENT_SETTINGS


http://66.102.9.104/search?q=cache:M...ETTINGS+&hl=fr

L'ennui, c'est que le paramètre est un cardinal : donc pas de nombre négatif possible.

[Lung]

Code :

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

1
2
3
4
5
6
7
8
9
 
Var
Frequency : Integer;
DC : THandle;
Begin
DC := GetDC(Handle);
Frequency := GetDeviceCaps(DC, VREFRESH);
ShowMessage(Format('%d Hrz', [Frequency ]));
end;

Est ce que tu veux ?

Ca m'en a tout l'air ...
Et en plus, ca marche.

Je teste ...

[frantzgac]

L'ennui, c'est que le paramètre est un cardinal : donc pas de nombre négatif possible.

Bien que ce message soit ancien j'indique comment contourner le problème consistant à donner la valeur -1 à un cardinal. Il suffit de passer high(cardinal) et le tour est joué. Cardinal est rempli de 1, ce qui est bien sa valeur max mais en binaire signé cela donne -1.