[DUG] Help Detecting Windows Version

Jolyon Smith jsmith at deltics.co.nz
Mon Dec 13 13:22:53 NZDT 2010


<facetious>

After your current: 

   Version := <current code>;

Just add:

   if Version = <unknown> then
     Version := Windows2008_64Bit;

</facetious>

:D

(sorry, couldn't resist - I'm guessing there are other versions that escape
detection too however :) )



-----Original Message-----
From: delphi-bounces at delphi.org.nz [mailto:delphi-bounces at delphi.org.nz] On
Behalf Of Alan Rose
Sent: Monday, 13 December 2010 12:50
To: NZ Borland Developers Group - Delphi List
Subject: [DUG] Help Detecting Windows Version

Hi, has anyone got a function they can share that will detect all
current versions of Windows out there?
F.i. My old routine cant detect Windows Server 2008 64 bit
Tried googling but can only find outdated code like mine.


_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi at delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-request at delphi.org.nz with Subject:
unsubscribe



More information about the Delphi mailing list