<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-boun...@delphi.org.nz [mailto:delphi-boun...@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@delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject:
unsubscribe
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi@delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject:
unsubscribe
