summaryrefslogtreecommitdiff
path: root/fpcsrc/packages/winunits-base/tests/testver.pp
blob: 14c0371548625a96f4038f3eeeb799e921d68194 (plain)
1
2
3
4
5
6
7
8
9
10
11
program testver;

uses winver;

begin
  Writeln('Platform      : ',Win32Platform);
  Writeln('Major version : ',Win32MajorVersion);
  Writeln('Minor version : ',Win32MinorVersion);
  Writeln('Build number  : ',Win32BuildNumber);
  Writeln('CSD version   : ',Win32CSDVersion);
end.