[Overview][Constants][Types][Procedures and functions][Variables][Index] | Reference for unit 'Dos' (#rtl)

# DosVersion

Current OS version

## Declaration

Source position: dosh.inc line 94

`function DosVersion: Word;`

## Description

DosVersion returns the operating system or kernel version. The low byte contains the major version number, while the high byte contains the minor version number.

Remark: | On systems where versions consists of more then two numbers, only the first two numbers will be returned. For example Linux version 2.1.76 will give you DosVersion 2.1. Some operating systems, such as FreeBSD, do not have system calls to return the kernel version, in that case a value of 0 will be returned.

## Errors

None.

## Example

    Program Example1;
    uses Dos;

    { Program to demonstrate the DosVersion function. }

    var
      OS      : string[32];
      Version : word;
    begin
    {$IFDEF LINUX}
      OS:='Linux';
    {$ENDIF}
    {$ifdef FreeBSD}
      OS:='FreeBSD';
    {$endif}
    {$ifdef NetBSD}
      OS:='NetBSD';
    {$endif}
    {$ifdef Solaris}
      OS:='Solaris';
    {$endif}
    {$ifdef QNX}
      OS:='QNX';
    {$endif}

    {$IFDEF DOS}
      OS:='Dos';
    {$ENDIF}
      Version:=DosVersion;
      WriteLn('Current ',OS,' version is ',Lo(Version),'.',Hi(Version));
    end.

Documentation generated on: Feb 26 2014