VS:GetColorChoice/ja

From Vectorworks Developer
Jump to navigation Jump to search
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.

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

Description

選択されているカラーポップアップコントロールを返します。

PROCEDURE GetColorChoice(
dialogID :LONGINT;
itemID :LONGINT;
VAR colorIndex :INTEGER);
def vs.GetColorChoice(dialogID, itemID):
    return colorIndex

Parameters

dialogID LONGINT
itemID LONGINT
colorIndex INTEGER

Return Value

カラーパレット番号

Example

PROCEDURE Example;
VAR
   dialog1 :INTEGER;
   result  :INTEGER;
PROCEDURE Dialog_Handler(VAR item :LONGINT; data :LONGINT);
BEGIN
   CASE item OF
      SetupDialogC:
         BEGIN
            SetColorChoice(dialog1, 4, 1242);
         END;
      1:
         BEGIN
            GetColorChoice(dialog1, 4, result);
            AlrtDialog(Concat('color index: ', result));
         END;
   END;
END;
BEGIN
   dialog1 := CreateLayout('Example Dialog', FALSE, 'OK', 'Cancel');
   CreateColorPopup(dialog1, 4, 24);
   SetFirstLayoutItem(dialog1, 4);
   result := RunLayoutDialog(dialog1, Dialog_Handler);
END;
RUN(Example);

Version

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