Win95 или WinNT для Delphi1

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Win95 или WinNT для Delphi1

Автор: Peter Below

Билл Гейтс получил Нобелевскую премию за то, что первый научился продавать гемморой за деньги. На следующий год Линус Торвальдс так же получил Нобелевскую премию за то, был первым, у которого бесплатно забирали гемморой.

Я не могу понять каким образом моя 16-битная программа может различить Win95 и WinNT.

Const WF_WINNT = $4000;
IsNT := (GetWinFlags and WF_WINNT) <> 0;