From Clomosy Docs

No edit summary
No edit summary
Line 5: Line 5:


<b>Example</b><br>
<b>Example</b><br>
<b>TRObject Syntax</b><br>
<pre>
<pre>
var
var
Line 21: Line 20:
   }
   }
}
}
</pre>
<b>Base Syntax</b><br>
<pre>
var
  platformStatus : Integer;
begin
  platformStatus := Clomosy.AppPlatform;
  case platformStatus of
    0 : ShowMessage('Windows');
    1 : ShowMessage('MacOS');
    2 : ShowMessage('IOS');
    3 : ShowMessage('Android');
    4 : ShowMessage('WinRT');
    5 : ShowMessage('Linux');
  end;
end;
</pre>
</pre>


<h2> See Also </h2>
<h2> See Also </h2>
* [[Clomosy_Class#System_Function | System Functions]]
* [[Clomosy_Class#System_Function | System Functions]]

Revision as of 10:32, 13 November 2024

The platform on which the project is opened is returned. A return value of 0 indicates Windows, 1 indicates MacOS, 2 indicates iOS, 3 indicates Android, 4 indicates WinRT, and 5 indicates Linux.

Example

var
  platformStatus : Integer;
{
  platformStatus = Clomosy.AppPlatform;
  case platformStatus of
  {
    0 : ShowMessage('Windows');
    1 : ShowMessage('MacOS');
    2 : ShowMessage('IOS');
    3 : ShowMessage('Android');
    4 : ShowMessage('WinRT');
    5 : ShowMessage('Linux');
  }
}

See Also