VS:CreateWallStyle/ja

From Vectorworks Developer
Revision as of 14:26, 12 August 2013 by Root (talk | contribs) (1 revision)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix

Description

新しい壁スタイルを指定した名前で作成します。指定した名前の壁スタイルが存在する場合は、指定した名前に文字を追加し、利用できる名前で作成します。

FUNCTION CreateWallStyle(
wallStyleName :STRING) : HANDLE;
def vs.CreateWallStyle(wallStyleName):
    return HANDLE

Parameters

wallStyleName STRING 壁スタイルの名前

Return Value

新しい壁スタイルのハンドルを返します。

Example

PROCEDURE Example;
CONST
   wallStyleName = 'Example Wall Style';
VAR
   wallStyleHandle :HANDLE;
   wdth :REAL;
   fill :LONGINT;
   pwLeft, pwRight, psLeft, psRight :INTEGER;
   boo :BOOLEAN;
BEGIN
   wallStyleHandle := CreateWallStyle(wallStyleName);
   wdth    := 1";
   fill    :=  1; {solid white}
   pwLeft  := 14; {in mils}
   pwRight := 14; {in mils}
   psLeft  :=  2; {solid black}
   psRight :=  2; {solid black}
   boo := InsertNewComponent(wallStyleHandle, 1, wdth, fill, pwLeft, pwRight, psLeft, psRight);
   SetName(wallStyleHandle, wallStyleName); {Reset the wall style name.}
END;
RUN(Example);

Version

利用可能バージョン: VectorWorks12.5