![]() |
alle Windows Versionen von 95 bis Vista auslesen
Hallo
hier ist der Code, mit dem wird die Windows Version angezeigt aber bis Windows XP ![]() Nun haben wir auch Windows Vista. Wer hat einen Code bis Windows Vista? Oder Wer kann den Code oben erweitern, indem er Windows Vista mit dem Code auch angezeigt wird? Gruß |
Re: alle Windows Versionen von 95 bis Vista auslesen
Da fällt mir spontan Jedi Code Library oder jede halbs größere Komponentensammlung ein. Ich denke in der CodeLib wird auch was Rumfliegen und wenn die neuesten Beiträge dir anzeigen läst bekommst du was hyperaktuelles unter dem Titel " [Kompo] TWIndowsVersionsInfo - Kompo zur Windowserkennung"
|
Re: alle Windows Versionen von 95 bis Vista auslesen
aktueller thread hier in der dp :-)
![]() [edit=Matze]"www." hinzugefügt (und deine sid entfernt), da ohne "www" keine Cookies gesetzt/ausgelesen werden und man somit nicht eingeloggt ist. Mfg, Matze[/edit] |
Re: alle Windows Versionen von 95 bis Vista auslesen
Zitat:
[edit=Matze]Gleiche Änderungen wie im vorigen Beitrag durchgeführt. Mfg, Matze[/edit] |
Re: alle Windows Versionen von 95 bis Vista auslesen
Zitat:
MfG, Bug |
Re: alle Windows Versionen von 95 bis Vista auslesen
gerade in den letzten tagen habe ich ein paar themen dazu gesehen.
bediene dich bitte einmal der forensuche. |
Re: alle Windows Versionen von 95 bis Vista auslesen
Zitat:
|
Re: alle Windows Versionen von 95 bis Vista auslesen
Zitat:
aber es fehlt der Demo oder Delphi-Project (.dpr) ![]() Gruß |
Re: alle Windows Versionen von 95 bis Vista auslesen
du musst da überhaupt nichts installieren. Binde die unit einfach in dein Projekt ein, erzeuge eine Instanz der Klasse und frage die Properties und funktionen der Instanz ab.
|
DP-Maintenance
Dieses Thema wurde von "Matze" von "Programmieren allgemein" nach "Windows API / MS.NET Framework API" verschoben.
Delphi-Frage |
Re: alle Windows Versionen von 95 bis Vista auslesen
Ich hatte kürzlich das gleiche Problem.
Einfach den Code von ![]()
Delphi-Quellcode:
In der Funktion GetOperatingSystem den Codeabschnitt bei VER_PLATFORM_WIN32_NT: erweitern:
{operating system (OS)constants }
const cOsUnknown = -1; cOsWin95 = 0; cOsWin98 = 1; cOsWin98SE = 2; cOsWinME = 3; cOsWinNT = 4; cOsWin2000 = 5; cOsXP = 6; cOsVista = 7;
Delphi-Quellcode:
Abhängig vom Betriebssystem wird dann von der Funktion eine Zahl geliefert, die man beliebig weiter auswerten kann. Für Windows 95-Me den Code so lassen.
VER_PLATFORM_WIN32_NT: { Windows NT/2000 }
begin if majorVer <= 4 then Result := cOsWinNT else if (majorVer = 5) and (minorVer = 0) then Result := cOsWin2000 else if (majorVer = 5) and (minorVer = 1) then Result := cOsXP else if (majorVer = 6) then Result := cOsVista else Result := cOsUnknown; end; Die abzufragenden Werte für majorVer und minorVer kann man der msdn entnehmen: ![]() |
Re: alle Windows Versionen von 95 bis Vista auslesen
ähm ja. Wofür mache ich mir die Mühe alle Versionen bis ins Detail zu unterscheiden. Schau dir meine Version doch an, da ist ALLES drin. mehr findest du nirgends im Web!
|
Re: alle Windows Versionen von 95 bis Vista auslesen
Was ist mit Win3.09 Beta Release ?
finde ich nicht in deinem Source ;( Gruß Hagen |
Re: alle Windows Versionen von 95 bis Vista auslesen
och menno, alle Betas hab ich nicht drin. Und Win3.1 ist einfach zu alt :tongue:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:04 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz