Otevřít hlavní menu

DosVersion

Verze z 2. 10. 2012, 15:08, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (Založena nová stránka: Vrací čísllo verze DOSu. ;Deklarace function DosVersion: Word; ;Režim :Windows, Reálný, Chráněný ;Poznámky :V nižším bajtu výsledku je hlavní číslo…)
(rozdíl) ← Starší verze | zobrazit aktuální verzi (rozdíl) | Novější verze → (rozdíl)

Vrací čísllo verze DOSu.

Deklarace
 function DosVersion: Word;
Režim
Windows, Reálný, Chráněný
Poznámky
V nižším bajtu výsledku je hlavní číslo verze, ve vyšším bajtu vedlejší číslo.


Vzorový příklad

{ DOSVrsn.PAS }
{ Vzorový příklad pro funkci DOSVersion. }
{ Pro Windows: }
{ uses WinDos, WinCrt; }
uses Dos;
var
  Ver: Word;
begin
  Ver := DosVersion;
  Writeln('Toto je DOS verze ', Lo(Ver), '.', Hi(Ver));
end.