<div dir="ltr"><div class="gmail_default" style="font-family:arial,helvetica,sans-serif">Hi,</div><div class="gmail_default" style="font-family:arial,helvetica,sans-serif">Could someone let me know what until WindowsVersion is in please?</div>

<div class="gmail_default" style="font-family:arial,helvetica,sans-serif">I am trying to write an app which detects which version of Windows the app is being run on, and have found the following example, but it won't compile because of the Str255 type and WindowsVersion:</div>

<div class="gmail_default" style="font-family:arial,helvetica,sans-serif"><br></div><div class="gmail_default" style="font-family:arial,helvetica,sans-serif">Thanks in advance</div><div class="gmail_default" style="font-family:arial,helvetica,sans-serif">

<br></div><div class="gmail_default" style="font-family:arial,helvetica,sans-serif"><span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">function OSVersion: Str255;</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)"> var</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  osErr: integer;</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  response: longint;</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">begin</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$IFDEF LCLcarbon}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  OSVersion := 'Mac OS X 10.';</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ELSE}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$IFDEF Linux}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  OSVersion := 'Linux Kernel ';</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ELSE}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$IFDEF UNIX}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  OSVersion := 'Unix ';</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ELSE}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$IFDEF WINDOWS}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  if WindowsVersion = wv95 then OSVersion := 'Windows 95 '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wvNT4 then OSVersion := 'Windows NT v.4 '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wv98 then OSVersion := 'Windows 98 '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wvMe then OSVersion := 'Windows ME '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wv2000 then OSVersion := 'Windows 2000 '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wvXP then OSVersion := 'Windows XP '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wvServer2003 then OSVersion := 'Windows Server 2003 '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wvVista then OSVersion := 'Windows Vista '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else if WindowsVersion = wv7 then OSVersion := 'Windows 7 '</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">   else OSVersion:= 'Windows ';</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ENDIF}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ENDIF}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ENDIF}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">  {$ENDIF}</span><br style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap">

<span style="color:rgb(0,0,0);font-family:'dejavu sans mono',monaco,'lucida console','courier new',monospace;font-size:x-small;line-height:15px;white-space:nowrap;background-color:rgb(238,238,255)">end;</span><br>

</div></div>