Dialogの大きさ取得

【ご質問】
Dialogの大きさを取得する方法について教えてください。

【回答】
Dialogを表示させた後、Dialogのwidthおよびheightを取得することで可能です。

詳細は以下のサンプルをご参照ください。

{curl 8.0 applet}
{curl-file-attributes character-encoding = “shift-jis”}

{let size:VBox = {VBox}}
{let d:Dialog = {Dialog
                          width = 5cm,
                          height = 5cm,
                          {CommandButton
                              label = “get-size”,
                              {on Action do
                                  {size.clear}
                                  {size.add “幅  : ”&d.width}
                                  {size.add “高さ : ”&d.height}
                              }
                          }
                      }
}

{VBox
    {CommandButton
        label = “show”,
        {on Action do
            {d.show}
        }
    },
    {Fill height = 0.1cm},
    size
}