!=[uT+v 自定义表单的定义总是以命令 Custom form 开始。在最简单的情况下,表单的命令行在其之后,在至少以 3 个减号(“-”)开头的两行之间。 2H&{1f\Bf
\_oy$>; 以上命令行还可以放入单独的文本文件中,该文件的名称在命令中注定: 2ALj}
Custom form: form = "My input form.txt" $cK^23H/Fj
默认情况下,表单中编辑的输入值保存在与脚本文件名相同的文件中,但文件扩展名为“.fpj”。 0->/`/xm 可以通过附加选项对其更改: Bt>}LLBS2 vmKTF!; Custom form: )
YSh D form = "My input form.txt", |}qjqtZ data = "My inputs.fpj" =|y|P80w 自定义表单内容详细信息: -
8syjKTg (1)大多数文本行显示在表单中。但是以
“$开头的行包含某种命令,表单中的“#”符号表示输入或输出栏。通过使用一系列这些字符,可以使栏变长。对于命令行中出现的每个栏,需要在下一行以$input、 $output 或$button 开头定义栏的详细信息。(该行内容不能分散在多行上) 3kLOoL? (2)数字或字符串值的常规输入栏只需指定要编辑的变量的名称,跟随一个格式指令。 R}J-nJlb
示例: $input P_p_in:d6:"W" 表示变量为 P_p_in(此处:表示泵浦输入功率),其值最多显示 6 个有效数字和单位“W”(瓦特)。 4/L>&%8V
ZBj6KqfST% 此外,可以使用 min 和 max 选项指定允许的最小值和/或最大值。
+ x_wYv 例子:$input P_p_in:d6:"W", min = 0, max = 10 3c 28!3p 对于字符串值,最小值和最大值适用于字符串长度。 6=>7M
b$ 在某些情况下,需要编辑以某种方式缩放的值。例如,镜子反射率可能介于 0 和 1之间,但要编辑为百分比。
6H;kJHn 在这种情况下,可以缩放显示的值:
u[t>Tg2R $input R_mirror / 0.01:d6:"%", min = 0, max = 1
v_-ls"l (最小值和最大值应用于未缩放的变量。)
\r]('x3S 可以定义默认值,如果输入栏为空,则使用该值:
3#9M2O\T $input correction_factor:d6, default = 1
H!JWc'(<$ 另一种可能是定义文本颜色和背景颜色的表达式,这可能取决于栏的数值。例子:
#v qz{R~nM $input P:d6:"W", textcolor = (if P > 3 then red else black)
fI[dhd6 这里,如果值超过 3,则以红色显示。但是,如果输入的值超出了用 min 和 max 定义的范围,则背景色始终为淡红色。
$i&\\QNn 还可以使用 hint=“initial power”这样的选项定义提示文本。
70<K.T<b (3)下面的示例解释了用于选择某些值的所谓 combo box:
3Vu8F" $input (combobox: "value 1", "value 2” ) choice$
9}whWh 选择的结果将存储在给定的变量中。如果变量是字符串变量(在我们的示例中,用$符号表示),它将被分配给所选的字符串。对于实变量,如果选择第一项,则为 1,如果选择第二项,则为 2,等等。
zZYHc?Z 不必像上面所示的那样,列出所有可能的值,你可以在括号内提供单个字符串,括号内包含用逗号隔开的所有值:
P7 8uq $input (combobox: ("value 1,value 2” )) choice$
m9g^ -X (4) 用于 yes/no 选择的 checkbox 如下:
/$OIlu $input (checkbox) choice
^%zNa6BL 选择的依赖性,变量被设为 1 或 0.
Fhi5LhWe+. (5) 带有单选按钮的选择栏解释如下:
aa=b<Cd $input (radio: "value 1", "value 2") choice
Ij$)RSPtH 同样,给定的变量可以是实数或字符串变量。
l-=e62I{=| 单选按钮放在一个框中,该框可以配备标题:
t|".=3%G $input (radio: "value 1", "value 2") choice, caption = "Select:"
9<qx!-s2rr 通常,不同的选择以单独的行显示,但也可以有多个列的设计,高度降低:
-CElk[u $input (radio: "value 1", "value 2") choice, nocolumns = 2
_&mc8ftT (6) 对于可以包含多行的字符串值,可以使用一个多行文本栏:
Fs9W>*( $input (multiline) text$, height = 50
%jgg59 允许的选项包括 min 和 max(最小和最大长度)、 height(以
像素为单位的栏高度)、hint(如上)、 textcolor 和 bgcolor
N('3oy#8 (7) 也可以制作一个轨迹条(带有可沿刻度移动的把手):
7X:hIl $input (trackbar: 1 to 100) position, height = 25
(\q[gyR 这两个数字表示最小和最大整数值。可选的高度值以像素为单位定义轨迹条的高度。
1 ?]J;9p (8) 对于任何类型的输入栏,都可以使用选项 onchange = update outputs,这意味着在输入栏的值发生任何更改之后,都应该更新所有输出栏。(否则,只有在脚本执行之后才会发生这种情况。)此外,如果 onchange = execute,则可以在每次更改栏后触发脚本执行。最后,使用 onchange = (expr),在这种情况下可以调用数学表达式(例如,设置一些变量值)。
h~.V[o7= (9) 文本输出栏(用于单行)可以与文本输入栏类似,但可以有多个表达式:
W["HDR $output ["P1 = ", P1:d3:"W", "P2 = ", P2:d3:"W"]
T=yCN#cqQ` 表达式列表需要放在括号之间;如果只使用一个表达式,则可以省略括号。还可以添加一些选项,例如修改文本颜色或背景颜色:
0&o
WfTg $output ["P1 = ", P1:d3:"W"], textcolor = (if P1 > 3 then red else black), bgcolor = rgb(0.8,0.8, 1)
.6I%64m 默认情况下,背景色为浅灰色,因此输出栏可以与输入栏进行视觉区分。
U:Fpj~E_w 对于输入栏,可以定义一个提示(解释),当用户将光标移动到该栏时显示该提示:
u
dUXc6U a5I%RY $output ["P1 = ", P1:d3:"W"], hint = "Power at the input
*hl<Y,W( 如果在计算过程中发生错误,
软件将用错误消息替换该提示文本。
:9O|l)N)W= Q}ZBr^*]1e (10) 多行文本输出栏可以如下所示:
a~F u $output (multiline) [s$], height = 50
!z.^(Tj 允许的选项包括 height(以像素为单位的栏的高度)、 hint、 textcolor 和 bgcolor(如上所述)。
=~;zVP (11) 用于显示某些值的条(bar)可以制作如下:
mlmnkgl
] $output (bar) r3 / r1, color = red
2q$X>ImI$ 这里,使用一个红色条,其长度与值 r3/r1 成比例:如果该值为 1,则达到完整长度。
6z`8cI+LRw 颜色值可能取决于一些变量;例如,可以使用 color = (if r3 / r1 < 0.1 then blue else red)。
x6~Fb~aP 可以使用 height
参数设置条的高度(以像素为单位):
uyvs kz\ $output (bar) r3 / r1, color = red, height = 30
aEZJNWv (12) 可以创建按钮
_BCT.ual $button "Save data", exec = SaveDataToFile(FName$)
PKATw>zg< 其中,字符串是按钮的标题,定义为 exec 的值是一个数学表达式,按下按钮时将计算该表达式。其他允许的选项是 show inputs 和 show outputs;这意味着在计算表达式之后,所有输入栏或输出栏都应该刷新。例如,如果表达式更改了一些变量值,这将非常有用。
5\5~L (13) 默认情况下,文本使用
标准大小为 10 像素的字体“Courier New”。可以使用如下命令更改以下所有行:
hAYQ6g$A $Font: "Arial", bold, underline, italic, size = 20, color = red
s~#?9vW 建议使用固定宽度字体,如 Courier、 Courier New 或 Fixedsys。
9`E-dr9 Q)9369<A (14) 使用类似如下命令:
E'fX&[ $box "Input fields:"
r6<ArX$Yl 可以将以下内容放入一个带有边距和给定标题的框中。框的定义必须以如下命令行结尾
8*"rZh}' $box end
6pe4Ni7I2 也可以使用相对于表单左上角的 x 和 y 坐标(以像素为单位),将方框定位在页面上的某个位置,而不是遵循常规流程:
G+;g:_E= $box "Input fields:", position = (400, 0)
1gL8$.B? 其他选项是以像素为单位定义特定的高度或宽度:
WoJ]@Me8 $box "Input fields:", size = (300, 200)
[29$~.m$Y 如果宽度或高度设置为 0 或未定义,则表示此尺寸是自动确定的。
/}[zA@ 此外,还可以更改框的背景色:
M~#5/eRX $box "Input fields:", color = rgb(0.9, 0.8, 0.7)
`~sf}S
: (15) 用以下命令行
;Ce 2d+K $tabcontrol
>hh"IfIZ4 可以启动所谓的选项卡控件,然后使用如下命令定义各种带标签的选项卡
C[^a/P`i $tab "Fiber details"
Q9SPb6O2 最后,必须关闭选项卡控件:
`<bCq\+` $tabcontrol end
vBV"i9n 选项卡控件还可以获得以像素为单位的固定大小:
?m`R%>X" $tabcontrol, size = (400, 300)
d8 3+6d (16) 允许使用嵌套的框和选项卡控件。例如,选项卡控件可以放在一个框中,反之亦然
VK"[=l (17)用以下命令行
06Sqn3MB $bgcolor = rgb(0.9, 0.9, 1)可以修改自定义表单的背景色。(默认值为白色。)
>f3k3XWRT (18) 可以用如下命令行放置图象
%pQdq[J={ $image "graphics.png", position = (400, 0)
^$3w&$K* 可以从扩展名为.gif、 .png、 .bmp 或.jpg 的文件加载
图像。
%Td+J`|U+ x 和 y 方向上的位置与放置图像的框或选项卡控件相关,或者与表单的左上角有关(如果它不在此类元素中)。第二个参数(y 坐标)可以是 here,表示下一个文本行将出现的 y 位置,或者,例如, here+20 对应较低位置。
eo-XqiJ,] 也可以使用类似于 size = (300, 200)的选项来修改像素大小,或者使用 size = 1.5 来设置大小的比例因子。
Ykx&6M@t 如果指定了位置(以像素为单位),则图像将放置在该位置而不影响常规流;例如,可以将其用作背景图像。否则(没有指定位置),它将被放置在常规流中,即以下元素将在相应的较低位置显示。
:6qUSE
除了图像文件,还可以在圆括号中指定一个数学表达式,从中可以计算局部颜色值(取决于像素坐标 x 和 y)。例子:
`1DU b7< $image (color_I(1-y/200)), position = (400, 100), size = (20, 200)
qM+!f2t 使用 scale1 选项,可以将 x 和 y 坐标缩放到范围 0..1(而不是 0 到像素值减 1)。
9p!d Q x 使用 condition=(…)选项,可以定义一个条件,该条件必须成功计算为非零值,否则图像将被抑制。例如:这样可以防止在一些计算数据被采用之前尝试绘制图像。
*NKC\aV`0 另一个可能的选项是 update,这意味着每次更新输出栏时都会更新图像。这仅适用于基于数学表达式的图像,该表达式依赖于某些计算结果。例如,可以使用该
功能以图形方式说明某些输出值 。
">v_uq a (19)只包含一个美元符号(“$”)或以$remark 开头的行将被忽略。
t(Cq(.u`: (20)在$def 之后,可以定义一些变量或
函数。与脚本中的常规定义不同,在读取自定义表单时,已经读取了此类定义,因此,即使在执行脚本之前,也可以在表单中使用此类定义。例子:
bt.K<Y0 $def deg := pi / 180
ZzwZ,(
3RG/X $def sinc(x) := if x <> 0 then sin(x) / x else 1
*m2d#f (21) 命令$autosizeform 调整
程序表单的大小,使自定义表单正好适合其位置。
ant-\w>} .T[!!z#^ ]&; G\9$y
u^;sx/ C]{V%jU oQKcGUZ kY0g}o'<