Bonsoir à tous Je dois vérifier que je suis bien sous Windows 200 et non XP. Existe-t-il une API, pour ça, ou bien dois-je passer par une fonction de Delphi ? J'ai bien un bout de code source, mais il date... de Win 3.x Merci
tu dois pouvoir faire un appel WMI http://laurent-dardenne.developpez [...] es/wmi-p2/
http://www.codeproject.com/KB/winsdk/osdetect.aspx tu as du code boiteux qui ne peux pas marcher sous xp ?
"ver" en ligne de commande.
Microsoft Windows XP [version 5.1.2600]
Ca marche depuis (au minimum, j'ai pas connu avant) MS-DOS 5.0
en même entre une api standard pour la famille d'os qui te ressors un structure et une chaine que tu dois parser
boarf
CPM, puis MSDOS 3.2 à mon grand soulagement !!
Merci, mais ce code-là est en C. Et il réclame une DLL de Microsoft (MFC40...) que je n'ai pas sous XP Pro. Etonannt, d'ailleurs : XP doit être livré avec une DLL version 5 au moins, non ?
http://msdn2.microsoft.com/en-us/l [...] S.85).aspx il faut que tu cherches a atteindre GetVersionEx() en delphi.
Merci Je vais tenter ça.
J'ai un pb de syntaxe avec le pointeur. Le code : // ----- DECLARATION DES VARIABLES ----- var Form1: TForm1; type Struct_OSversionInfo = record dwOSVersionInfoSize : dword; dwMajorVersion : dword; dwMinorVersion : dword; dwBuildNumber : dword; dwPlatformId : dword; Version : Array [0..128] of Char; // Cher szCSDVersion; end; Struct_Version_Os = Struct_OSversionInfo; Ptr_Struct_Version_OS = ^Struct_OsVersionInfo; // --------- FONCTION GetOsVersionEx() ----- procedure Lire_Version_OS; Var Retour : boolean; begin Retour := GetVersionEx( Ptr_Struct_Version_OS ); end; // ---------- Je suis certain qu'il s'agit d'un pur pb syntaxique. Les pointeurs, en C, j'en faisais ce que je voulais, mais en Pascal