Recherche:

Je pense que c'est plus compliqué que ça.

Cela dit, il faudra m'expliquer, je pense qu'il doit y avoir une raison, pourquoi l'utilisation de EdWidth.text :=InttoStr(Screen.Width) et...

Bonjour,

Oui mais as-tu vérifié qu'il s'agissait du bon DeviceID ? Sur mon poste Vista il s'agit bien de VideoController1 mais sur mon poste W10 c'était VideoController2
d'où ma remarque

...

Bonjour,

j'ai testé ceci sur une autre machine D7/Windows Vista cela fonctionne




interface

uses

Bonjour,

moi je dirais qu'il suffit de réduire le résultat à un seul élément, par exemple si j'utilise

Select CurrentHorizontalResolution, CurrentVerticalResolution from Win32_videocontroller...