用Racket做一个拼图游戏——22 创建窗口布局

22 创建窗口布局

先看代码。再作解释：

;创建布局：

(define (create-layout)

(let ([hp (new horizontal-pane%

[parent main-frame])])

(create-left-layout hp)

(create-right-layout hp)))

上边create-left-layout和create-right-layout分别创建左右两块布局。左右两块布局是并列的。

22.1 窗格构件

horizontal-pane%是水平窗格类，它可以将其子窗口格式化排列成水平一排。这样左右布局就呈现为左右并排布置的状态，而不是上下。horizontal-pane%是由pane%派生出来的。

horizontal-pane%的属性有：parent、vert-margin、horiz-margin、border、spacing、alignment、min-width、min-height、stretchable-width、stretchable-height。

alignment设置容器的对齐规范，这决定了当容器有剩余空间时（当一个子构件在某个特定维度上不能伸展时），如何定位其子构件。其值为如下水平对齐及竖直对齐的符号值的组合列表：