<br> User Registry; <br><br> Var <br> MyReg:TRegistry; dname:sting;<br><br> begin <br> MyReg:=TRegistry.Create; <br> MyReg.RootKey:=HKEY_LOCAL_MACHINE; <br> try <br> if MyReg.OpenKey('HKEY_LOCAL_MACHINE/System/CurrentControlSet/Services/Class/Display/0001',false); <br><br> then<br> dname:=MyReg.ReadString('DriverDesc'); {取得显卡信息}<br> except <br> ... <br> End; <br> MyReg.Close; <br> MyReg.Free; <br> end; <br><br>看看我的注册表,得到启示没?其他配置也同理,先打开你的注册表看看吧<br>[HKEY_LOCAL_MACHINE/System/CurrentControlSet/Services/Class/Display/0001]<br>"DriverDesc"="NVidia RIVA128 / RIVA128ZX"<br>"InfPath"="C://WINDOWS////INF//NV3DISP.inf"<br>"InfSection"="NV3"<br>"MatchingDeviceId"="PCI//VEN_12D2&DEV_0018"<br>"ProviderName"="NVidia"<br>"Ver"="4.0"<br>"DevLoader"="*vdd"<br>"DriverDate"="08-18-199<br>