LNtBYdB`pK 自定义表单的定义总是以命令 Custom form 开始。在最简单的情况下,表单的命令行在其之后,在至少以 3 个减号(“-”)开头的两行之间。 Ov h[qm?Z
TN4gGky! 以上命令行还可以放入单独的文本文件中,该文件的名称在命令中注定: -b8Vz}Y
Custom form: form = "My input form.txt" 6Gwk*%sb
默认情况下,表单中编辑的输入值保存在与脚本文件名相同的文件中,但文件扩展名为“.fpj”。 DR;rK[f 可以通过附加选项对其更改: hIE$u t + pri=;I(2A Custom form: eNR>W>;' form = "My input form.txt", *Mgl X< data = "My inputs.fpj" 7']n_-fu 自定义表单内容详细信息: ^fa+3`> (1)大多数文本行显示在表单中。但是以
“$开头的行包含某种命令,表单中的“#”符号表示输入或输出栏。通过使用一系列这些字符,可以使栏变长。对于命令行中出现的每个栏,需要在下一行以$input、 $output 或$button 开头定义栏的详细信息。(该行内容不能分散在多行上) P;C3{>G9 (2)数字或字符串值的常规输入栏只需指定要编辑的变量的名称,跟随一个格式指令。 $C#G8Ck,
示例: $input P_p_in:d6:"W" 表示变量为 P_p_in(此处:表示泵浦输入功率),其值最多显示 6 个有效数字和单位“W”(瓦特)。 _SY4Qs`d
8c3Qd 此外,可以使用 min 和 max 选项指定允许的最小值和/或最大值。
[> Q+=(l 例子:$input P_p_in:d6:"W", min = 0, max = 10 x\T 9V~8a 对于字符串值,最小值和最大值适用于字符串长度。 OrNi<TY> 在某些情况下,需要编辑以某种方式缩放的值。例如,镜子反射率可能介于 0 和 1之间,但要编辑为百分比。
n=qN@u;Fi# 在这种情况下,可以缩放显示的值:
3 -Nwg9U $input R_mirror / 0.01:d6:"%", min = 0, max = 1
.5Sw (最小值和最大值应用于未缩放的变量。)
0Z$=2c?xT 可以定义默认值,如果输入栏为空,则使用该值:
?RNm8,M $input correction_factor:d6, default = 1
qbrY5;U 另一种可能是定义文本颜色和背景颜色的表达式,这可能取决于栏的数值。例子:
$dIu${lu $input P:d6:"W", textcolor = (if P > 3 then red else black)
&@NTedg! 这里,如果值超过 3,则以红色显示。但是,如果输入的值超出了用 min 和 max 定义的范围,则背景色始终为淡红色。
%5Q5xw]w3 还可以使用 hint=“initial power”这样的选项定义提示文本。
VC$,Y (3)下面的示例解释了用于选择某些值的所谓 combo box:
hH_&42E6 $input (combobox: "value 1", "value 2” ) choice$
=:Ahg
9 选择的结果将存储在给定的变量中。如果变量是字符串变量(在我们的示例中,用$符号表示),它将被分配给所选的字符串。对于实变量,如果选择第一项,则为 1,如果选择第二项,则为 2,等等。
GG<{n$h 不必像上面所示的那样,列出所有可能的值,你可以在括号内提供单个字符串,括号内包含用逗号隔开的所有值:
X: PB
} $input (combobox: ("value 1,value 2” )) choice$
84 5a%A$ (4) 用于 yes/no 选择的 checkbox 如下:
QhR.8iS $input (checkbox) choice
2[-@
.gH 选择的依赖性,变量被设为 1 或 0.
o}O" (5) 带有单选按钮的选择栏解释如下:
<+o*"z\mI $input (radio: "value 1", "value 2") choice
YW9r'{(D(I 同样,给定的变量可以是实数或字符串变量。
S{wR Z|8U 单选按钮放在一个框中,该框可以配备标题:
ZFYv|2l $input (radio: "value 1", "value 2") choice, caption = "Select:"
dp;;20z 通常,不同的选择以单独的行显示,但也可以有多个列的设计,高度降低:
}81eef4$S $input (radio: "value 1", "value 2") choice, nocolumns = 2
HGIPz{/5U (6) 对于可以包含多行的字符串值,可以使用一个多行文本栏:
])Rs.Y{Q5 $input (multiline) text$, height = 50
Z1Y/2MVSb 允许的选项包括 min 和 max(最小和最大长度)、 height(以
像素为单位的栏高度)、hint(如上)、 textcolor 和 bgcolor
4
JC*c (7) 也可以制作一个轨迹条(带有可沿刻度移动的把手):
;r<(n3"F $input (trackbar: 1 to 100) position, height = 25
EC#4"bU`'2 这两个数字表示最小和最大整数值。可选的高度值以像素为单位定义轨迹条的高度。
\A
"_|Yg (8) 对于任何类型的输入栏,都可以使用选项 onchange = update outputs,这意味着在输入栏的值发生任何更改之后,都应该更新所有输出栏。(否则,只有在脚本执行之后才会发生这种情况。)此外,如果 onchange = execute,则可以在每次更改栏后触发脚本执行。最后,使用 onchange = (expr),在这种情况下可以调用数学表达式(例如,设置一些变量值)。
z 3((L (9) 文本输出栏(用于单行)可以与文本输入栏类似,但可以有多个表达式:
+pMa-{ $output ["P1 = ", P1:d3:"W", "P2 = ", P2:d3:"W"]
}Rl^7h<! 表达式列表需要放在括号之间;如果只使用一个表达式,则可以省略括号。还可以添加一些选项,例如修改文本颜色或背景颜色:
S\wh
*'Y $output ["P1 = ", P1:d3:"W"], textcolor = (if P1 > 3 then red else black), bgcolor = rgb(0.8,0.8, 1)
q+<<Ku(20 默认情况下,背景色为浅灰色,因此输出栏可以与输入栏进行视觉区分。
DNTkv_S 对于输入栏,可以定义一个提示(解释),当用户将光标移动到该栏时显示该提示:
xwvg@ PH!^ww6
$output ["P1 = ", P1:d3:"W"], hint = "Power at the input
kD"BsL*6! 如果在计算过程中发生错误,
软件将用错误消息替换该提示文本。
"^gV. !W\Zq+^^J3 (10) 多行文本输出栏可以如下所示:
%3SBs*? $output (multiline) [s$], height = 50
'2LK(uaU 允许的选项包括 height(以像素为单位的栏的高度)、 hint、 textcolor 和 bgcolor(如上所述)。
ahJ-T@ (11) 用于显示某些值的条(bar)可以制作如下:
4DLp+6zP $output (bar) r3 / r1, color = red
v$n J$M&k 这里,使用一个红色条,其长度与值 r3/r1 成比例:如果该值为 1,则达到完整长度。
?so=k&I-M 颜色值可能取决于一些变量;例如,可以使用 color = (if r3 / r1 < 0.1 then blue else red)。
C6<*'5T 可以使用 height
参数设置条的高度(以像素为单位):
vH[G#A~4 $output (bar) r3 / r1, color = red, height = 30
Uw`YlUT\ (12) 可以创建按钮
c
qWX*&2_ $button "Save data", exec = SaveDataToFile(FName$)
,?k0~fuG6 其中,字符串是按钮的标题,定义为 exec 的值是一个数学表达式,按下按钮时将计算该表达式。其他允许的选项是 show inputs 和 show outputs;这意味着在计算表达式之后,所有输入栏或输出栏都应该刷新。例如,如果表达式更改了一些变量值,这将非常有用。
cpY'::5.% (13) 默认情况下,文本使用
标准大小为 10 像素的字体“Courier New”。可以使用如下命令更改以下所有行:
;7/
;4Z $Font: "Arial", bold, underline, italic, size = 20, color = red
"K Or)QD/ 建议使用固定宽度字体,如 Courier、 Courier New 或 Fixedsys。
322)r$!" yW@0Q: (14) 使用类似如下命令:
fS@V`"O6 $box "Input fields:"
uDe%M 可以将以下内容放入一个带有边距和给定标题的框中。框的定义必须以如下命令行结尾
.@5RoD[o $box end
W'98ues% 也可以使用相对于表单左上角的 x 和 y 坐标(以像素为单位),将方框定位在页面上的某个位置,而不是遵循常规流程:
'
\8|`Zb $box "Input fields:", position = (400, 0)
76'@}wNnw 其他选项是以像素为单位定义特定的高度或宽度:
s8O.yL $box "Input fields:", size = (300, 200)
E:7R>.g 如果宽度或高度设置为 0 或未定义,则表示此尺寸是自动确定的。
k_,wa]ws$ 此外,还可以更改框的背景色:
bY@ S[ $box "Input fields:", color = rgb(0.9, 0.8, 0.7)
A vh"(j (15) 用以下命令行
[\_#n5 $tabcontrol
JXhHitUD 可以启动所谓的选项卡控件,然后使用如下命令定义各种带标签的选项卡
[c`u $tab "Fiber details"
'c[|\M!u 最后,必须关闭选项卡控件:
?^X
e^1( $tabcontrol end
E\_Wpk 选项卡控件还可以获得以像素为单位的固定大小:
O>vbAIu $tabcontrol, size = (400, 300)
M= ]]kJ:I (16) 允许使用嵌套的框和选项卡控件。例如,选项卡控件可以放在一个框中,反之亦然
7>@g)%", (17)用以下命令行
0`H)c)
pP $bgcolor = rgb(0.9, 0.9, 1)可以修改自定义表单的背景色。(默认值为白色。)
>du _/*8: (18) 可以用如下命令行放置图象
iHYvH
$image "graphics.png", position = (400, 0)
Id(wY$C&> 可以从扩展名为.gif、 .png、 .bmp 或.jpg 的文件加载
图像。
vG2&qjY1 x 和 y 方向上的位置与放置图像的框或选项卡控件相关,或者与表单的左上角有关(如果它不在此类元素中)。第二个参数(y 坐标)可以是 here,表示下一个文本行将出现的 y 位置,或者,例如, here+20 对应较低位置。
4tGP-
L 也可以使用类似于 size = (300, 200)的选项来修改像素大小,或者使用 size = 1.5 来设置大小的比例因子。
bdxmJ9a:R 如果指定了位置(以像素为单位),则图像将放置在该位置而不影响常规流;例如,可以将其用作背景图像。否则(没有指定位置),它将被放置在常规流中,即以下元素将在相应的较低位置显示。
3Yb2p!o 除了图像文件,还可以在圆括号中指定一个数学表达式,从中可以计算局部颜色值(取决于像素坐标 x 和 y)。例子:
R3dt-v $image (color_I(1-y/200)), position = (400, 100), size = (20, 200)
I
k[{,p 使用 scale1 选项,可以将 x 和 y 坐标缩放到范围 0..1(而不是 0 到像素值减 1)。
s/+k[9l2 使用 condition=(…)选项,可以定义一个条件,该条件必须成功计算为非零值,否则图像将被抑制。例如:这样可以防止在一些计算数据被采用之前尝试绘制图像。
Fv!KLw@
另一个可能的选项是 update,这意味着每次更新输出栏时都会更新图像。这仅适用于基于数学表达式的图像,该表达式依赖于某些计算结果。例如,可以使用该
功能以图形方式说明某些输出值 。
H)@f_pfj( (19)只包含一个美元符号(“$”)或以$remark 开头的行将被忽略。
_yH=w'8. (20)在$def 之后,可以定义一些变量或
函数。与脚本中的常规定义不同,在读取自定义表单时,已经读取了此类定义,因此,即使在执行脚本之前,也可以在表单中使用此类定义。例子:
>Nho`m( $def deg := pi / 180
rn8#nQ>QZ% =QG0:z)K<v $def sinc(x) := if x <> 0 then sin(x) / x else 1
"d3qUk (21) 命令$autosizeform 调整
程序表单的大小,使自定义表单正好适合其位置。
|to|kU 6@X j %~{G*%:
OS{j5o $LXz
Q>w9 l,w$!FnmR bdBFDg