VS:GetVersionEx/ja
.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix
Description
VectorWorksのバージョンとビルド番号とOSの種類を返します。
PROCEDURE GetVersionEx(
VAR major :INTEGER;
VAR minor :INTEGER;
VAR maintenance :INTEGER;
VAR platform :INTEGER;
VAR buildNum :LONGINT);
def vs.GetVersionEx(): return (major, minor, maintenance, platform, buildNum)
Parameters
major INTEGER メジャー minor INTEGER マイナー maintenance INTEGER 増値 platform INTEGER OSの種類 buildNum LONGINT ビルド番号
Example
PROCEDURE Example; VAR osMajor, osMinor, osIncr :LONGINT; appMajor, appMinor, appMaint, platform :INTEGER; buildNum :LONGINT; platformStr :STRING; BEGIN GetVersionEx(appMajor, appMinor, appMaint, platform, buildNum); GetOSVersion(osMajor, osMinor, osIncr); IF (platform = 1) THEN platformStr := 'MacOS' ELSE platformStr := 'Windows'; Message('Vectorworks ', appMajor, '.', appMinor, '.', appMaint, ' build ', buildNum, ' running on ', platformStr, ' ', osMajor, '.', osMinor, '.', osIncr); END; RUN(Example);
Version
利用可能バージョン: Vectorworks 2010