Chris,
Did that produce any workable results ? I have seen other apps use
the environment variables to figure it out.
On 9 Jun 99 at 8:41, Chris Crowe wrote:
> Hi all
>
> Can anyone (more than one would be great) create a new app and put the code
> below in and tell me what version gets returned.
>
> I would like to see what version's get returned for Windows 95, 98, NT 3.51,
> NT 4.0, NT SBS 4.0
>
> procedure TForm1.Button1Click(Sender: TObject);
> Var
> VersionInfo : OSVERSIONINFO;
> Begin
> VersionInfo.dwOSVersionInfoSize := sizeof(OSVERSIONINFO);
> GetVersionEx(VersionInfo);
> ShowMessage('OS version = '+Format('%d.%d', [VersionInfo.dwMajorVersion,
> VersionInfo.dwMinorVersion]));
> end;
>
> Please tell me the version numbers returned, and the OS you are using it on.
>
> Cheers Chris.
>
>
> ---------------------------------------------------------------------------
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> Website: http://www.delphi.org.nz
>
Rohit
======================================================================
CFL - Computer Fanatics Ltd. 21 Barry's Point Road, AKL, New Zealand
PH (649) 489-2280
FX (649) 489-2290
email [EMAIL PROTECTED] or [EMAIL PROTECTED]
======================================================================
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
