Ich bitte um euer aller Mithilfe (Pflege meiner Windows-Versionsliste)

[Codehunter]

Hallo!

Ich pflege ja schon lange eine Windows-Versionserkennung (siehe hier). Die entsprechenden Dokumentationen im MSDN enthalten ja immer nur die aktuell supporteten Systeme und bestenfalls noch ein paar alten Infos, die vergessen wurden zu entfernen (siehe hier, hier und hier).

Es war schon immer schwierig, das richtig mit zu pflegen, man muss immer dran bleiben bei jeder neuen Windows-Version fliegen ältere aus der Doku. In letzter Zeit wird es aber richtig schwierig, denn auf einmal tauchen in der Doku Windows-Editionen auf, die nie offiziell released wurden. Die N-Versionen kennt man ja, das sind die ohne Mediaplayer. Neuerdings gibts aber auch noch E-Versionen, die als "unsupported" gekennzeichnet sind. Sääähr verdächtig... ;-)

Man sieht es auch an den User-Kommentaren im MSDN, die Sache ist inzwischen ziemlich undurchsichtig geworden. Selbst die Code-Samples von Microsoft selbst decken nicht mehr alles ab.

Kurze Rede, langer Sinn: Ich habe ein kleines Programmchen gebastelt, dass die verschiedenen Versionsdaten auflistet. Ich bitte euch daher, das Programm auf den verschiedensten Windows-Versionen auszuführen und mir die Ergebnisse zu schicken (vorzugsweise per PN). Besonders wichtig wären dabei:

• Windows 7
• Windows 8
• Windows Server 2008
• Windows Server 2008 R2
• Windows Server 2011 (ja, den gibts laut Doku)
• Windows Server 2012

Schließlich habe ich hier nicht alle erdenklichen Varianten (bei den Servern z.B. Core-Installation usw.) verfügbar.

Für folgende Systeme habe ich inzwischen Rückmeldungen bekommen, sodass ihr darauf nicht weiter testen braucht:

• Microsoft Windows NT 3.51
• Microsoft Windows 95
• Microsoft Windows 98 Second Edition
• Microsoft Windows NT 4.0 Workstation
• Windows XP Professional Edition
• Windows Vista Home Premium Edition
• Windows Vista Ultimate N-Edition
• Microsoft Windows 7 Professional Edition
• Microsoft Windows 7 Professional x64 Edition
• Microsoft Windows 7 Enterprise x64 Edition
• Microsoft Windows 7 Ultimate x64 Edition
• Microsoft Windows 7 Ultimate x64 N-Edition
• Microsoft Windows 8 Standard Edition
• Microsoft Windows 8 Enterprise Edition
• Microsoft Windows Server 2003 x64
• Microsoft Windows Server 2008 Standard Edition
• Microsoft Windows Server 2008 R2 Standard Edition
• Microsoft Windows Server 2008 R2 Enterprise Edition
• Microsoft Windows Server 2012 Standard Edition (Evaluation Version)

Vielen Dank für eure Unterstützung!

Die angehängte Testanwendung ist immer die aktuellste. Daher nicht wundern wenn der Download-Zähler ab und zu auf 0 steht ;-) Dann hab ich eine neue Version hochgeladen.

[Daniel]

Ein schönes Projekt, das Du da pflegst und ich freue mich, wenn auch die neuen Erkenntnisse in die verlinkte Unit einfließen. :tumb:
Sei grad bitte so gut und passe den Themen Titel eine Idee an, ich befürchtete zuerst einen Kettenbrief oder gar Schlimmeres, als ich nur den Titel las. ;-)

[Codehunter]

Zitat:

Zitat von Daniel (Beitrag 1198382)

Sei grad bitte so gut und passe den Themen Titel eine Idee an, ich befürchtete zuerst einen Kettenbrief oder gar Schlimmeres, als ich nur den Titel las.

Jo, ich habe ne ganze Weile über der Frage gebrütet, wie ich das Thema nennen soll. Hab mich dann bewusst für einen allgemeinen Titel entschieden, weil ich ja wirklich in die Breite adressieren will. BBin aber auch für Vorschläge in der Hinsicht offen :-)

Um einen Endlos-Thread zu vermeiden bitte ich wirklich alle Unterstützer, die Antworten per PN zu schicken.

[Codehunter]

Es ergibt sich jetzt schon eine interessante Frage: Von Windows Vista, 7 und 8 sollte es in Europa eigentlich ausschließlich die N-Versionen geben (Auflage aus Brüssel).

Mich würde jetzt interessieren: Wenn man ein hierzulande gekauftes Vista, 7 oder 8 blanko installiert, gibt es sich als N-Version zu erkennen? Und mutiert es nach einer späteren Installation des Mediaplayer zu einer Non-N-Version?

[uligerhardt]

Kann sein, dass mein Windows 8 beim ersten Start des WMP nachgefragt hat, ob's was nachinstallieren soll, aber starten hat er sich lassen. Ist das dann eine N-Version?

WIMRE erinnere, hat Brüssel auch nur verlangt, dass N-Versionen angeboten werden, aber nicht, dass es keine anderen gibt.

[Codehunter]

Zitat:

Zitat von uligerhardt (Beitrag 1198391)

Kann sein, dass mein Windows 8 beim ersten Start des WMP nachgefragt hat, ob's was nachinstallieren soll, aber starten hat er sich lassen. Ist das dann eine N-Version?

Ja genau, das ist eine. Das Icon ist vorhanden, ein Großteil des Programms auch. Aber beim ersten Start kommt eine Nachfrage. So ähnlich wie das beim XP mal war mit der Browserauswahl. Später ist die ja direkt in den IE integriert worden.

Zitat:

Zitat von uligerhardt (Beitrag 1198391)

WIMRE erinnere, hat Brüssel auch nur verlangt, dass N-Versionen angeboten werden, aber nicht, dass es keine anderen gibt.

Das Thema ist ein bisschen verzwickt und eigentlich hier auch OT. Aber soweit ich mich erinnere, betraf die Sowohl-als-Auch-Auflage das Windows Vista. Microsoft hatte es auch brav so umgesetzt. Dann als Win 7 rauskam hat man in Redmond die N-Version mal fix "vergessen". Daraufhin war Brüssel ein bisschen brummelig und hat aus der Kann-Auflage eine Pflicht gemacht. Also seither sollte es in Europa nur noch N-Versionen geben. So kenne ich zumindest die Geschichte.

[p80286]

Zitat:

Zitat von Daniel (Beitrag 1198382)

Sei grad bitte so gut und passe den Themen Titel eine Idee an, ich befürchtete zuerst einen Kettenbrief oder gar Schlimmeres, als ich nur den Titel las. ;-)

:thumb::thumb:

[Horst0815]

Code:

Identified Product: Microsoft Windows 8 Professional Edition
Identified Product ID:                 $00000030 (48)
64 Bit OS:                             YES
--------------------------------------------------
VersionInfoEx.dwOSVersionInfoSize:     $0000009C (156)
VersionInfoEx.dwMajorVersion:          $00000006 (6)
VersionInfoEx.dwMinorVersion:          $00000002 (2)
VersionInfoEx.dwBuildNumber:           $000023F0 (9200)
VersionInfoEx.dwPlatformId:            $00000002 (2)
VersionInfoEx.szCSDVersion:            
VersionInfoEx.wServicePackMajor:       $0000     (0)
VersionInfoEx.wServicePackMinor:       $0000     (0)
VersionInfoEx.wSuiteMask:              $0100     (256)
VersionInfoEx.wProductType:            $01       (1)
VersionInfoEx.wReserved:               $00       (0)
--------------------------------------------------
SystemInfo.dwOemId:                    $00000000 (0)
SystemInfo.wProcessorArchitecture:     $0000     (0)
SystemInfo.wReserved:                  $0000     (0)
SystemInfo.dwPageSize:                 $00001000 (4096)
SystemInfo.dwActiveProcessorMask:      $0000000F (15)
SystemInfo.dwNumberOfProcessors:       $00000004 (4)
SystemInfo.dwProcessorType:            $0000024A (586)
SystemInfo.dwAllocationGranularity:    $00010000 (65536)
SystemInfo.wProcessorLevel:            $00000006 (6)
SystemInfo.wProcessorRevision:         $00002A07 (10759)

[devidespe]

Sehr gut, und wenn Du irgendwann die Sources freigeben würdest, wäre das noch besser...

Delphi-Quellcode:

Identified Product: Microsoft Windows 7 Ultimate Edition
Identified Product ID:                 $00000001 (1)
64 Bit OS:                             NO
--------------------------------------------------
VersionInfoEx.dwOSVersionInfoSize:     $0000009C (156)
VersionInfoEx.dwMajorVersion:          $00000006 (6)
VersionInfoEx.dwMinorVersion:          $00000001 (1)
VersionInfoEx.dwBuildNumber:           $00001DB1 (7601)
VersionInfoEx.dwPlatformId:            $00000002 (2)
VersionInfoEx.szCSDVersion:            Service Pack 1
VersionInfoEx.wServicePackMajor:       $0001     (1)
VersionInfoEx.wServicePackMinor:       $0000     (0)
VersionInfoEx.wSuiteMask:              $0100     (256)
VersionInfoEx.wProductType:            $01       (1)
VersionInfoEx.wReserved:               $1E       (30)
--------------------------------------------------
SystemInfo.dwOemId:                    $00000000 (0)
SystemInfo.wProcessorArchitecture:     $0000     (0)
SystemInfo.wReserved:                  $0000     (0)
SystemInfo.dwPageSize:                 $00001000 (4096)
SystemInfo.dwActiveProcessorMask:      $000000FF (255)
SystemInfo.dwNumberOfProcessors:       $00000008 (8)
SystemInfo.dwProcessorType:            $0000024A (586)
SystemInfo.dwAllocationGranularity:    $00010000 (65536)
SystemInfo.wProcessorLevel:            $00000006 (6)
SystemInfo.wProcessorRevision:         $00001A04 (6660)

[uligerhardt]

Meine möglicherweise-N Windows 8 liefert das:

Zitat:

Identified Product: Unable to identify this Platform
Identified Product ID: $00000067 (103)
64 Bit OS: YES
--------------------------------------------------
VersionInfoEx.dwOSVersionInfoSize: $0000009C (156)
VersionInfoEx.dwMajorVersion: $00000006 (6)
VersionInfoEx.dwMinorVersion: $00000002 (2)
VersionInfoEx.dwBuildNumber: $000023F0 (9200)
VersionInfoEx.dwPlatformId: $00000002 (2)
VersionInfoEx.szCSDVersion:
VersionInfoEx.wServicePackMajor: $0000 (0)
VersionInfoEx.wServicePackMinor: $0000 (0)
VersionInfoEx.wSuiteMask: $0100 (256)
VersionInfoEx.wProductType: $01 (1)
VersionInfoEx.wReserved: $00 (0)
--------------------------------------------------
SystemInfo.dwOemId: $00000000 (0)
SystemInfo.wProcessorArchitecture: $0000 (0)
SystemInfo.wReserved: $0000 (0)
SystemInfo.dwPageSize: $00001000 (4096)
SystemInfo.dwActiveProcessorMask: $00000003 (3)
SystemInfo.dwNumberOfProcessors: $00000002 (2)
SystemInfo.dwProcessorType: $0000024A (586)
SystemInfo.dwAllocationGranularity: $00010000 (65536)
SystemInfo.wProcessorLevel: $0000000F (15)
SystemInfo.wProcessorRevision: $00006B02 (27394)

Selbst meint das System, es wäre "Windows 8 Pro with Media Center".

[Codehunter]

Ja, Win 8 Pro MediaCenter habe ich inzwischen nachgepflegt, bin nur noch nicht dazu gekommen, das aktuellere Testprogramm hochzuladen.

Aber bitte nochmal der Hinweis: Die Testprotokolle bitte per PN schicken, nicht hier rein stellen. Wird sonst zu unübersichtlich!

[kuba]

Hallo,

Windows Server 2011, ist doch der Windows Home Server 2011.
Hab ich auf meinem HP-MicroServer installiert.

Wenn ich etwas für dich testen kann, bitte PN.

kuba

[Codehunter]

Zitat:

Zitat von kuba (Beitrag 1198430)

Windows Server 2011, ist doch der Windows Home Server 2011.

Laut MSDN gibt es zwei: Den Home Server 2011 und einen Small Business Essentials 2011.

Siehe hier unter PRODUCT_SB_SOLUTION_SERVER.

[Jumpy]

Ich hab zuhause noch eine Windows 7 32 bit Professional MSDN-Schülerversion. Ist das wg. der MSDN-Geschichte noch interessant, oder ist das wie eine normale Win 7 die du ja schon hast?

[Angel4585]

Hab auch diverse msdnaa-Lizenzen zuhause, u.a. auch Windows Server 2012, ich schau mal ob ich heut Abend oder Morgen die Zeit finde das zu machen.

[Codehunter]

Zitat:

Zitat von Jumpy (Beitrag 1198446)

Ich hab zuhause noch eine Windows 7 32 bit Professional MSDN-Schülerversion. Ist das wg. der MSDN-Geschichte noch interessant, oder ist das wie eine normale Win 7 die du ja schon hast?

Win 7 Pro x86 ist schon erledigt.

Zitat:

Zitat von Angel4585 (Beitrag 1198448)

Hab auch diverse msdnaa-Lizenzen zuhause, u.a. auch Windows Server 2012, ich schau mal ob ich heut Abend oder Morgen die Zeit finde das zu machen.

Bitte immer ein Auge auf mein Eröffnungspost werfen, dort liste ich die erledigten Versionen auf. Man muss ja nicht doppelt arbeiten?

[Codehunter]

Wie soll ich eurer Meinung nach mit dem Thema Media Center umgehen? Bei Windows XP und Vista war das Media Center eine eigenständige Windows-Edition. Seit Windows 7 ist das Media Center nur noch eine separat zu installierende Software, die sich nicht als eigenständige Windows-Edition zu erkennen gibt. Ich kann aber mit GetSystemMetrics nachgucken, ob das WMC installiert ist. Was mich interessiert, da ich kein Media Center habe: Wenn man das installiert unter Windows 7, verändert sich dann der Name des Betriebssystems im Fenster der Systemeigenschaften?

[Codehunter]

Update: Eine aktualisierte Version des Testprogramms.

[terence14]

Identified Product: Windows Vista Home Premium Edition
Identified Product ID: $00000003 (3)
64 Bit OS: NO
--------------------------------------------------
VersionInfoEx.dwOSVersionInfoSize: $0000009C (156)
VersionInfoEx.dwMajorVersion: $00000006 (6)
VersionInfoEx.dwMinorVersion: $00000000 (0)
VersionInfoEx.dwBuildNumber: $00001772 (6002)
VersionInfoEx.dwPlatformId: $00000002 (2)
VersionInfoEx.szCSDVersion: Service Pack 2
VersionInfoEx.wServicePackMajor: $0002 (2)
VersionInfoEx.wServicePackMinor: $0000 (0)
VersionInfoEx.wSuiteMask: $0300 (768)
VersionInfoEx.wProductType: $01 (1)
VersionInfoEx.wReserved: $1E (30)
--------------------------------------------------
SystemInfo.dwOemId: $00000000 (0)
SystemInfo.wProcessorArchitecture: $0000 (0)
SystemInfo.wReserved: $0000 (0)
SystemInfo.dwPageSize: $00001000 (4096)
SystemInfo.dwActiveProcessorMask: $00000003 (3)
SystemInfo.dwNumberOfProcessors: $00000002 (2)
SystemInfo.dwProcessorType: $0000024A (586)
SystemInfo.dwAllocationGranularity: $00010000 (65536)
SystemInfo.wProcessorLevel: $00000011 (17)
SystemInfo.wProcessorRevision: $00000301 (769)

MfG,
terence

[terence14]

Info ( 2013_01_15__10_32_57__765 )
Prog Name = MZUsages
Prog Version = v0.91
Prog Path = C:\Program Files\MZ\MZUsages\\
Docu Path = C:\Users\87\Documents\MZUsages\
Use Path = C:\Users\87\Documents\MZUsages\
Open Explorer In Path #1 = C:\Users\87\Documents\MZUsages\
Open Explorer In Path #2 = C:\Users\87\Documents\Borland Studio-Projekte\P31\
Open Explorer In Path #3 = \
Open Explorer In Path #4 = \
Open Explorer In Path #5 = \
Open Explorer In Path #6 = \
Open Explorer In Path #7 = \
Open Explorer In Path #8 = \
WorkAreaLeft = 0
WorkAreaTop = 0
WorkAreaWidth = 1680
WorkAreaHeight = 915
MainWindowLeft = 738
MainWindowTop = 5
MainWindowWidth = 942
MainWindowHeight = 276
Allow Update Clock = Yes
Clock Offset Hours = 0
Clock Offset Minutes = 0
Clock Offset Seconds= 0
Allow Update Running = Yes
Update Timer Interval [ms] = 1.500
Wait To Read Interval [ms] = 1.500
Wait Before ScreenShot Interval [ms] = 1.000
Battery Number = 1
What Browser = 1
Processes Sort By #1 = NAME
Processes Sort Inc Dec #2 = DECREASE
Sound Volume Left [%] = 50
Sound Volume Right [%] = 50
HardDisk Allow Update = Yes
Dvd Allow Update = Yes
Dvd Allow AutoStop = Yes
Dvd AutoStop Update If Caption Found = Formatieren
Usb Allow Update = Yes
Server Allow Update = Yes
Mouse Radar = Yes
Stop Clock Is Go = Yes
Stop Clock Is Lap = No
Allow Hints = Yes
Allow Vertical = Yes
Allow Sounds = Yes
Allow Show Alternate Key = Yes
Allow Close After Execute = No
Allow Short Execute = Yes
Allow Run Go Clock = Yes
Allow AutoRun = Yes
Allow RunToTray = No
Screen Save As Jpg = Yes
Jpg Quality [%] = 70
Login Name = 87
Boot Mode = Normal Boot
Monitor Numbers = 1
Network Present = Yes
Processors Total = 2
Processors Active = 2
CPU Usage [%] = 11
CPU Frequency [MHz] = 2.094
Memory Ram Usage [%] = 38
Memory Pages Usage [%] = 4
Memory Virtual Usage [%] = 5
Memory Ram Total [MB] = 2.047
Memory Ram Avail [MB] = 1.275
Memory Pages Total [MB] = 4.095
Memory Pages Avail [MB] = 3.936
Memory Virtual Total [MB] = 2.047
Memory Virtual Avail [MB] = 1.935
RecycleBin Harddisk 1 Size [MB] =7.968
RecycleBin Harddisk 1 Files = 283
RecycleBin Harddisk 2 Size [MB] =2.626
RecycleBin Harddisk 2 Files = 69
RecycleBin Harddisk 3 Size [MB] =0
RecycleBin Harddisk 3 Files = 0
RecycleBin Size Total [MB] = 10.594
RecycleBin Files Total [MB] = 352
RecycleBin Usage [%] = 0
Battery Number = 1
Battery Present = Yes
Battery Capacity Avail [%] = 100
Battery Status = High Power
Battery Work = Not Charging
Battery LifeTime = Over 1 Year
Battery Full LifeTime = Over 1 Year
Battery Numbers = 1
Battery DevicePath 1 = \\?\acpi#pnp0c0a#1#{72631e54-78a4-11d0-bcf7-00aa00b7b32a}
Battery Number = 1
Battery ManufactureName: SONYCorp
Battery ManufactureDate: Unknown
Battery Chemistry: LION
Battery Technology: Rechargeable
Battery DeviceName: AS07B42
Battery SerialNumber: 21092
Battery Unique ID: 21092SONYCorpAS07B42
Battery PowerState: Power On Line.
Battery Capacity: 21312 mWh
Battery Voltage: 16437 mV
Battery Designed Capacity: 71040 mWh
Battery Fullcharge Capacity: 21312 mWh
Battery Cycle Count: Not supported
Battery Default Alert 1: 725 mWh
Battery Default Alert 2: 1036 mWh
Battery Critical Bias: 0 mWh
Battery Capabilities: System Battery
Battery Estimated Time: 4294967295
Battery Temperature: Unknown
Battery Rate: 0 mWh
Battery Granularity 1: 311 mWh
Battery Granularity 2: 20276 mWh
Battery Granularity 3: 0 mWh
Battery Granularity 4: 0 mWh
Battery Capacity 1: 725 mWh
Battery Capacity 2: 71040 mWh
Battery Capacity 3: 0 mWh
Battery Capacity 4: 0 mWh
Online Usage [%] = 100
Server 1 Usage [%] = 100
Server 2 Usage [%] = 100
Server 3 Usage [%] = 100
Online Name = mz-PC
Online Addr = 10 . 171 . 137 . 212
Online Prog = C:\Program Files\Mobile Partner2\Mobile Partner.exe
Online Prog Ok = Yes
Server 1 Name = www.google.de
Server 1 Addr = 173 . 194 . 35 . 151
Server 2 Name = www.youtube.com
Server 2 Addr = 173 . 194 . 35 . 133
Server 3 Name = www.delphipraxis.net
Server 3 Addr = 88 . 198 . 53 . 15
Clock Time [hh.mm.ss] = 10:32:57
Clock Message = Clock=System
Clock Time Hours [h] = 10
Clock Time Minutes [m] = 32
Clock Time Seconds [s] = 57
Stop Clock Time [hh.mm.ss] = 00:05:33
Stop Time Hours [h] = 0
Stop Time Minutes [m] = 5
Stop Time Seconds [s] = 33
Mouse Present = Yes
Mouse Wheel Present = Yes
Mouse Buttons Swapped = Yes
Mouse Cursor Pos [x,y] = 1634 , 528
Mouse Wheel Lines = 3
Mouse Speed Min = 0
Mouse Speed Max = 20
Mouse Speed Value = 10
Mouse Speed Usage [%] = 50
Mouse Dbl Click Min [ms] = 200
Mouse Dbl Click Max [ms] = 900
Mouse Dbl Click Value [ms] = 567
Mouse Dbl Click Usage [%] = 52
Color Depth [bit] = 32
Screen Usage [%] = 97
HardDisk Letters = CD
HardDisk 123 Total [MB] = 299.183.095
HardDisk 1 Label = [ ACER ]
HardDisk 1 Usage [%] = 70
HardDisk 1 Total [KB] = 149.579.772
HardDisk 1 Avail [KB] = 45.496.932
HardDisk 1 Sectors/Cluster [x] = 8
HardDisk 1 Bytes/Sector [B] = 512
HardDisk 1 Number Of Free Clusters [x] = 11.374.233
HardDisk 1 Number Of Total Clusters [x] = 37.394.943
HardDisk 1 ClusterSize [B] = 4.096
HardDisk 2 Label = [ DATA ]
HardDisk 2 Usage [%] = 88
HardDisk 2 Total [KB] = 149.603.324
HardDisk 2 Avail [KB] = 17.855.692
HardDisk 2 Sectors/Cluster [x] = 8
HardDisk 2 Bytes/Sector [B] = 512
HardDisk 2 Number Of Free Clusters [x] = 4.463.923
HardDisk 2 Number Of Total Clusters [x] = 37.400.831
HardDisk 2 ClusterSize [B] = 4.096
HardDisk 3 Label = []
HardDisk 3 Usage [%] = -1
HardDisk 3 Total [KB] = -1
HardDisk 3 Avail [KB] = 0
HardDisk 3 Sectors/Cluster [x] = 0
HardDisk 3 Bytes/Sector [B] = 0
HardDisk 3 Number Of Free Clusters [x] = 0
HardDisk 3 Number Of Total Clusters [x] = 0
HardDisk 3 ClusterSize [B] = 0
Dvd Letters = EG
Dvd 1 Label = []
Dvd 1 Usage [%] = -1
Dvd 1 Total [KB] = -1
Dvd 1 Avail [KB] = 0
Dvd 1 Sectors/Cluster [x] = 0
Dvd 1 Bytes/Sector [B] = 0
Dvd 1 Number Of Free Clusters [x] = 0
Dvd 1 Number Of Total Clusters [x] = 0
Dvd 1 ClusterSize [B] = 0
Dvd 2 Label = [ Mobile Partner ]
Dvd 2 Usage [%] = 100
Dvd 2 Total [KB] = 25.250
Dvd 2 Avail [KB] = 0
Dvd 2 Sectors/Cluster [x] = 1
Dvd 2 Bytes/Sector [B] = 2.048
Dvd 2 Number Of Free Clusters [x] = 0
Dvd 2 Number Of Total Clusters [x] = 12.625
Dvd 2 ClusterSize [B] = 2.048
Dvd 3 Label = []
Dvd 3 Usage [%] = -1
Dvd 3 Total [KB] = -1
Dvd 3 Avail [KB] = 0
Dvd 3 Sectors/Cluster [x] = 0
Dvd 3 Bytes/Sector [B] = 0
Dvd 3 Number Of Free Clusters [x] = 0
Dvd 3 Number Of Total Clusters [x] = 0
Dvd 3 ClusterSize [B] = 0
Usb Letters = H
Usb 1 Label = []
Usb 1 Usage [%] = -1
Usb 1 Total [KB] = -1
Usb 1 Avail [KB] = 0
Usb 1 Sectors/Cluster [x] = 0
Usb 1 Bytes/Sector [B] = 0
Usb 1 Number Of Free Clusters [x] = 0
Usb 1 Number Of Total Clusters [x] = 0
Usb 1 ClusterSize [B] = 0
Usb 2 Label = []
Usb 2 Usage [%] = -1
Usb 2 Total [KB] = -1
Usb 2 Avail [KB] = 0
Usb 2 Sectors/Cluster [x] = 0
Usb 2 Bytes/Sector [B] = 0
Usb 2 Number Of Free Clusters [x] = 0
Usb 2 Number Of Total Clusters [x] = 0
Usb 2 ClusterSize [B] = 0
Usb 3 Label = []
Usb 3 Usage [%] = -1
Usb 3 Total [KB] = -1
Usb 3 Avail [KB] = 0
Usb 3 Sectors/Cluster [x] = 0
Usb 3 Bytes/Sector [B] = 0
Usb 3 Number Of Free Clusters [x] = 0
Usb 3 Number Of Total Clusters [x] = 0
Usb 3 ClusterSize [B] = 0
Info End.

MfG,
terence

[Codehunter]

@Terence: Danke für die Mithilfe, aber wie schon im Eröffnungspost geschrieben: Die Protokolle bitte ausschließlich per PN an mich, nicht hier in den Thread. Wird sonst einfach zu unübersichtlich.

[Codehunter]

Aufgrund der vielen Nachfragen zum Source habe ich mich entschlossen, DelphiWorks 1.5 freizugeben. Eigentlich war das Projekt 2004 eingeschlafen. Genauer gesagt habe ich damals das letzte Release (1.4) freigegeben. Für mich intern habe ich die letzten 9 Jahre die Version 1.5 weiter gepflegt.

Einige Anmerkungen dazu: DelphiWorks ist ursprünglich auf Delphi 5 Pro entstanden und dann auf D7 Pro migriert. Ich habe es nie auf neueren Delphis getestet. Man sollte auch wissen, dass einige Units zu einer Zeit entstanden sind, als ich grade mal ein halbes Jahr Delphi programmiert habe. Das merkt man an verschiedenen Stellen.

Den Quellcode zu DelphiWorks 1.5 findet man auf der Projektseite bei SourceForge.

Die Quellen der Testanwendung habe ich hier angehängt.

[DeddyH]

[OT] DelphiWorks kenne ich noch aus Spotlight-Zeiten, hätte nie gedacht, dass daran noch weitergearbeitet wird :) [/OT]

[Codehunter]

Zitat:

Zitat von DeddyH (Beitrag 1199117)

DelphiWorks kenne ich noch aus Spotlight-Zeiten, hätte nie gedacht, dass daran noch weitergearbeitet wird :)

Sagen wir mal, in gewisser Weise ist es zusammen mit Spotlight "offiziell" eingeschlafen.

Ich kam irgendwann an den Punkt, wo ich mit weiten Teilen der Sourcen selbst nicht mehr zufrieden war, rein qualitativ gesehen. Allerdings war DelphiWorks zu dem Zeitpunkt schon so komplex, dass ich nicht mehr die Zeit fand, alles zu bereinigen.

So habe ich die Bibliothek nur noch für meine eigenen Zwecke immer mal wieder erweitert (wie jetzt hier die Windows-Erkennung).

Es hat auch nie jemand danach gefragt.

[Codehunter]

So, es wurde mal wieder Zeit in der Sache was zu aktualisieren. immerhin gibts ja seit Gestern "Windows 10" :-D

Tja und dabei gab es gleich den ersten *PLONK*: Zwar meldet sich die Win 10 Tech Preview in der DOS-Box mit Version 6.4.9841, GetVersionEx dagegen liefert ein 6.2.9200. Wer das Win10-ISO schon laufen hat möge doch bitte mal so nett sein, die Version mit dem angehängten Tool auslesen und mal eine kurze Rückinfo zu geben.

Selbiges gilt auch für Windows 8.1 und Server 2012 R2, die ich in der Versionstabelle noch nachgepflegt habe.

Danke!

Grüße
Cody

PS: Nebenbei ist zumindest dieser Teil von DelphiWorks jetzt kompatibel zu XE4 und x64.

[jensw_2000]

Identified Product: Microsoft Windows Server 2012 Standard Edition
Identified Product ID: $00000007 (7)
64 Bit OS: NO
--------------------------------------------------
VersionInfoEx.dwOSVersionInfoSize: $0000009C (156)
VersionInfoEx.dwMajorVersion: $00000006 (6)
VersionInfoEx.dwMinorVersion: $00000002 (2)
VersionInfoEx.dwBuildNumber: $000023F0 (9200)
VersionInfoEx.dwPlatformId: $00000002 (2)
VersionInfoEx.szCSDVersion:
VersionInfoEx.wServicePackMajor: $0000 (0)
VersionInfoEx.wServicePackMinor: $0000 (0)
VersionInfoEx.wSuiteMask: $0110 (272)
VersionInfoEx.wProductType: $02 (2)
VersionInfoEx.wReserved: $00 (0)
--------------------------------------------------
SystemInfo.dwOemId: $00000009 (9)
SystemInfo.wProcessorArchitecture: $0009 (9)
SystemInfo.wReserved: $0000 (0)
SystemInfo.dwPageSize: $00001000 (4096)
SystemInfo.dwActiveProcessorMask: $000000FF (255)
SystemInfo.dwNumberOfProcessors: $00000008 (8)
SystemInfo.dwProcessorType: $000021D8 (8664)
SystemInfo.dwAllocationGranularity: $00010000 (65536)
SystemInfo.wProcessorLevel: $00000006 (6)
SystemInfo.wProcessorRevision: $00003E04 (15876)

[jensw_2000]

Identified Product: Microsoft Windows 8 Enterprise Edition
Identified Product ID: $00000004 (4)
64 Bit OS: NO
--------------------------------------------------
VersionInfoEx.dwOSVersionInfoSize: $0000009C (156)
VersionInfoEx.dwMajorVersion: $00000006 (6)
VersionInfoEx.dwMinorVersion: $00000002 (2)
VersionInfoEx.dwBuildNumber: $000023F0 (9200)
VersionInfoEx.dwPlatformId: $00000002 (2)
VersionInfoEx.szCSDVersion:
VersionInfoEx.wServicePackMajor: $0000 (0)
VersionInfoEx.wServicePackMinor: $0000 (0)
VersionInfoEx.wSuiteMask: $0100 (256)
VersionInfoEx.wProductType: $01 (1)
VersionInfoEx.wReserved: $00 (0)
--------------------------------------------------
SystemInfo.dwOemId: $00000009 (9)
SystemInfo.wProcessorArchitecture: $0009 (9)
SystemInfo.wReserved: $0000 (0)
SystemInfo.dwPageSize: $00001000 (4096)
SystemInfo.dwActiveProcessorMask: $00000FFF (4095)
SystemInfo.dwNumberOfProcessors: $0000000C (12)
SystemInfo.dwProcessorType: $000021D8 (8664)
SystemInfo.dwAllocationGranularity: $00010000 (65536)
SystemInfo.wProcessorLevel: $00000006 (6)
SystemInfo.wProcessorRevision: $00002C02 (11266)

[jensw_2000]

Ähm.. 64BitOS - NO ??? Stimmt bei beiden nicht

[hathor]

Laut MS gibt es WINDOWS 8.0-Versionen, die NICHT UMSONST upgrade-fähig auf WIN 8.1 sind.
Es wäre sinnvoll, einen Hinweis einzufügen, ob die vorliegende Version upgrade-fähig ist.
Weiss jemand mehr darüber?

Ausserdem:
Welchen KEY hat die vorliegende Version?
Ist sie z.B. eine Volume licensing edition?

Das Programm sollte "etwas" mehr anzeigen als z.B. WINVER.exe...

[Bernhard Geyer]

Zitat:

Zitat von hathor (Beitrag 1274550)

Laut MS gibt es WINDOWS 8.0-Versionen, die NICHT upgrade-fähig auf WIN 8.1 sind.
Es wäre sinnvoll, einen Hinweis einzufügen, ob die vorliegende Version upgrade-fähig ist.
Weiss jemand mehr darüber?

Quelle?

Wenn dürfte das über den Lizenzschlüssel geregelt sein.

[jensw_2000]

Zitat:

Laut MS gibt es WINDOWS 8.0-Versionen, die NICHT upgrade-fähig auf WIN 8.1 sind.

Wo hast Du das gelesen? Alle offiziellen Upgradepfade müss(t)en funktionieren.
Was nicht geht ist auch offiziell dokumentiert.
z.B. Editionswechsel "none Enterprise <> Enterprise" und Upgrade mit Architekturwechsel (x86/x64).

In der Praxis hatte ich ein paar Fälle, bei denen unterstützte Upgradeszenarien nicht funktionierten. Das waren aber keine "Einschränkungen" sondern Setup-Bugs. Das Inplace Upgrade funktioniert bei 8.1 nicht wirklich gut bei Systemen mit spezielleren Storage Controllern oder utopischer Hardware.

[Codehunter]

Zitat:

Zitat von jensw_2000 (Beitrag 1274544)

Ähm.. 64BitOS - NO ??? Stimmt bei beiden nicht

Gefahr erkannt, Gefahr gebannt :-D

Mit dem hier sollte das jetzt stimmen. Was mich mit deinen Infodumps wundert: Win8 (nicht 8.1) und Server 2012 (nicht R2) melden sich auch schon mit Version 6.2.9200? Kannst du bitte mal schauen was die DOS-Box bei dir zu dem Thema sagt?

[jensw_2000]

2012 R2 STD und 8.1 EE geben beide "Microsoft Windows [Version 6.3.9600]" in der Commandline aus

[Luckie]

Mit der x86 Version zeigt mir das Programm bei mein 64-Bit Windows 7 an dass es kein 64-Bit wäre.

[holliesoft]

Zitat:

Zitat von Codehunter (Beitrag 1274539)

So, es wurde mal wieder Zeit in der Sache was zu aktualisieren. immerhin gibts ja seit Gestern "Windows 10" :-D

Tja und dabei gab es gleich den ersten *PLONK*: Zwar meldet sich die Win 10 Tech Preview in der DOS-Box mit Version 6.4.9841, GetVersionEx dagegen liefert ein 6.2.9200. Wer das Win10-ISO schon laufen hat möge doch bitte mal so nett sein, die Version mit dem angehängten Tool auslesen und mal eine kurze Rückinfo zu geben.

GetVersionEx ist deprecated seit Windows 8.1:
GetVersionEx function

[hathor]

Irgendwo ist bei meiner WIN8.0-Version (6.2-9200) der "Wurm" drin.
Es ist eine Version, die mir auf meinem ASUS-Notebook mitgeliefert wurde.

Aber seit Monaten sehe ich immer das Gleiche - siehe Anhang.
WSreset.exe habe ich ausgeführt, alle Updates sind installiert.

Wer kennt eine Lösung?

[Bernhard Geyer]

Zitat:

Zitat von Codehunter (Beitrag 1274539)

... Zwar meldet sich die Win 10 Tech Preview in der DOS-Box ...

Seit wann hat Windows wieder eine DOS-Box? Dieses gibt es doch schon seit NT nicht mehr. Die letzte Version war AFAIK Windows ME.

[Bernhard Geyer]

Ich weiß jetzt nicht ob das für den Store auch gilt, aber für Update über WSUS musste man Zeitweise händisch Updates einspielen weil es MS mit der kompatiblität nicht so richtig hinbekommen hat.

[Codehunter]

Zitat:

Zitat von jensw_2000 (Beitrag 1274559)

2012 R2 STD und 8.1 EE geben beide "Microsoft Windows [Version 6.3.9600]" in der Commandline aus

Das waren die beiden die du vorhin gepostet hast? Dann solltest du das dazu schreiben. Ich kann ja nicht hellsehen :-D

Wie ich grade gesehen habe liefert GetVersionEx seit Win8 keine "neutrale Meinung" mehr sondern verhält sich in Abhängigkeit von Manifesten so als wäre es ein Windows 8. Damit wird die Versionserkennung auch nicht einfacher :-(

[Bernhard Geyer]

Zitat:

Zitat von holliesoft (Beitrag 1274563)

Zitat:

Zitat von Codehunter (Beitrag 1274539)

So, es wurde mal wieder Zeit in der Sache was zu aktualisieren. immerhin gibts ja seit Gestern "Windows 10" :-D

Tja und dabei gab es gleich den ersten *PLONK*: Zwar meldet sich die Win 10 Tech Preview in der DOS-Box mit Version 6.4.9841, GetVersionEx dagegen liefert ein 6.2.9200. Wer das Win10-ISO schon laufen hat möge doch bitte mal so nett sein, die Version mit dem angehängten Tool auslesen und mal eine kurze Rückinfo zu geben.

GetVersionEx ist deprecated seit Windows 8.1:
GetVersionEx function

Wir benutzen immer noch diese API. Diese liefert aber alte Versionnummern wenn in Anwendungsmanifest nicht steht die Kompatiblität mit der entsprechenden Version bestätigt wird. Und dies Info muss für Vista, Win7, Win8, Win8.1 und jetzt Win10 jeweils über eine entsprechende GUI drin stehen.