eHc.#OA& 自定义表单的定义总是以命令 Custom form 开始。在最简单的情况下,表单的命令行在其之后,在至少以 3 个减号(“-”)开头的两行之间。 _Rk>yJD7s PnJA'@x 以上命令行还可以放入单独的文本文件中,该文件的名称在命令中注定: Ij?Qs{V
Custom form: form = "My input form.txt" TeHxqWx
默认情况下,表单中编辑的输入值保存在与脚本文件名相同的文件中,但文件扩展名为“.fpj”。 c?}{>ig/) 可以通过附加选项对其更改: 7e:7RAX $]~|W3\G Custom form: :Tdl84 form = "My input form.txt", 6Tg'9|g data = "My inputs.fpj" EASN#VG 自定义表单内容详细信息: 3A'9=h,lVK (1)大多数文本行显示在表单中。但是以
“$开头的行包含某种命令,表单中的“#”符号表示输入或输出栏。通过使用一系列这些字符,可以使栏变长。对于命令行中出现的每个栏,需要在下一行以$input、 $output 或$button 开头定义栏的详细信息。(该行内容不能分散在多行上) ch)#NHZ9F (2)数字或字符串值的常规输入栏只需指定要编辑的变量的名称,跟随一个格式指令。 ]D@y""{--s
示例: $input P_p_in:d6:"W" 表示变量为 P_p_in(此处:表示泵浦输入功率),其值最多显示 6 个有效数字和单位“W”(瓦特)。 "9OOyeKu%
{W%/?d9m 此外,可以使用 min 和 max 选项指定允许的最小值和/或最大值。
jTN!\RH9NF 例子:$input P_p_in:d6:"W", min = 0, max = 10 l-q.VY2 对于字符串值,最小值和最大值适用于字符串长度。 v;:. k,E0 在某些情况下,需要编辑以某种方式缩放的值。例如,镜子反射率可能介于 0 和 1之间,但要编辑为百分比。
vJg^uf) 在这种情况下,可以缩放显示的值:
RQCKH]&! $input R_mirror / 0.01:d6:"%", min = 0, max = 1
eXQzCm (最小值和最大值应用于未缩放的变量。)
q&@q/9kz 可以定义默认值,如果输入栏为空,则使用该值:
j12khp? $input correction_factor:d6, default = 1
RQW<Sp~ 另一种可能是定义文本颜色和背景颜色的表达式,这可能取决于栏的数值。例子:
=aRE
$input P:d6:"W", textcolor = (if P > 3 then red else black)
0[!38 这里,如果值超过 3,则以红色显示。但是,如果输入的值超出了用 min 和 max 定义的范围,则背景色始终为淡红色。
AjMx \'(C 还可以使用 hint=“initial power”这样的选项定义提示文本。
?q hme (3)下面的示例解释了用于选择某些值的所谓 combo box:
J}s)#va9R $input (combobox: "value 1", "value 2” ) choice$
r&D&xsbQ 选择的结果将存储在给定的变量中。如果变量是字符串变量(在我们的示例中,用$符号表示),它将被分配给所选的字符串。对于实变量,如果选择第一项,则为 1,如果选择第二项,则为 2,等等。
BCw0kq@ 不必像上面所示的那样,列出所有可能的值,你可以在括号内提供单个字符串,括号内包含用逗号隔开的所有值:
Z{
b($po $input (combobox: ("value 1,value 2” )) choice$
j~`rc2n% (4) 用于 yes/no 选择的 checkbox 如下:
ns9a+QQ $input (checkbox) choice
-,}ppTG 选择的依赖性,变量被设为 1 或 0.
5Y(f7,JX (5) 带有单选按钮的选择栏解释如下:
ccJ!N $input (radio: "value 1", "value 2") choice
qy: 同样,给定的变量可以是实数或字符串变量。
($Y6hn+ 单选按钮放在一个框中,该框可以配备标题:
@M ]7',2" $input (radio: "value 1", "value 2") choice, caption = "Select:"
%SD=3UK6 通常,不同的选择以单独的行显示,但也可以有多个列的设计,高度降低:
U#1,]a\ $input (radio: "value 1", "value 2") choice, nocolumns = 2
x@480r (6) 对于可以包含多行的字符串值,可以使用一个多行文本栏:
:{KoZd $input (multiline) text$, height = 50
#F!'B|n 允许的选项包括 min 和 max(最小和最大长度)、 height(以
像素为单位的栏高度)、hint(如上)、 textcolor 和 bgcolor
Z}4
`y"By (7) 也可以制作一个轨迹条(带有可沿刻度移动的把手):
y}!}*Qj+/ $input (trackbar: 1 to 100) position, height = 25
'}$$o1R 这两个数字表示最小和最大整数值。可选的高度值以像素为单位定义轨迹条的高度。
9?#L/ (8) 对于任何类型的输入栏,都可以使用选项 onchange = update outputs,这意味着在输入栏的值发生任何更改之后,都应该更新所有输出栏。(否则,只有在脚本执行之后才会发生这种情况。)此外,如果 onchange = execute,则可以在每次更改栏后触发脚本执行。最后,使用 onchange = (expr),在这种情况下可以调用数学表达式(例如,设置一些变量值)。
*WpDavovyB (9) 文本输出栏(用于单行)可以与文本输入栏类似,但可以有多个表达式:
A?/(W_Gt^M $output ["P1 = ", P1:d3:"W", "P2 = ", P2:d3:"W"]
pt+[BF 6P 表达式列表需要放在括号之间;如果只使用一个表达式,则可以省略括号。还可以添加一些选项,例如修改文本颜色或背景颜色:
a5# B&|#q $output ["P1 = ", P1:d3:"W"], textcolor = (if P1 > 3 then red else black), bgcolor = rgb(0.8,0.8, 1)
::A]p@ 默认情况下,背景色为浅灰色,因此输出栏可以与输入栏进行视觉区分。
o$_,2$>mn 对于输入栏,可以定义一个提示(解释),当用户将光标移动到该栏时显示该提示:
$C8nPl' 7 J)leRR& $output ["P1 = ", P1:d3:"W"], hint = "Power at the input
9WhZ=
Xk 如果在计算过程中发生错误,
软件将用错误消息替换该提示文本。
#DFfySH)A ~kW[d1'c (10) 多行文本输出栏可以如下所示:
^E(:nxQ6s $output (multiline) [s$], height = 50
#0;ULZ99aH 允许的选项包括 height(以像素为单位的栏的高度)、 hint、 textcolor 和 bgcolor(如上所述)。
2RC|u?+@ (11) 用于显示某些值的条(bar)可以制作如下:
_r&,n\
T $output (bar) r3 / r1, color = red
y,QJy=? 这里,使用一个红色条,其长度与值 r3/r1 成比例:如果该值为 1,则达到完整长度。
`c~J&@| 颜色值可能取决于一些变量;例如,可以使用 color = (if r3 / r1 < 0.1 then blue else red)。
8Mf{6&F= 可以使用 height
参数设置条的高度(以像素为单位):
x[5uz)) $output (bar) r3 / r1, color = red, height = 30
K6l{wyMb| (12) 可以创建按钮
MF["-GvP/ $button "Save data", exec = SaveDataToFile(FName$)
Wy`ve~y 其中,字符串是按钮的标题,定义为 exec 的值是一个数学表达式,按下按钮时将计算该表达式。其他允许的选项是 show inputs 和 show outputs;这意味着在计算表达式之后,所有输入栏或输出栏都应该刷新。例如,如果表达式更改了一些变量值,这将非常有用。
j"c30AY (13) 默认情况下,文本使用
标准大小为 10 像素的字体“Courier New”。可以使用如下命令更改以下所有行:
=1'vXPv` $Font: "Arial", bold, underline, italic, size = 20, color = red
YXr" 建议使用固定宽度字体,如 Courier、 Courier New 或 Fixedsys。
^N\$oV$ n^2p jTkl (14) 使用类似如下命令:
08TeGUjJ $box "Input fields:"
#[C=LGi 可以将以下内容放入一个带有边距和给定标题的框中。框的定义必须以如下命令行结尾
_pS|bqF $box end
aX$Q}mgb 也可以使用相对于表单左上角的 x 和 y 坐标(以像素为单位),将方框定位在页面上的某个位置,而不是遵循常规流程:
MQ{.% $box "Input fields:", position = (400, 0)
wfXm(RYM 其他选项是以像素为单位定义特定的高度或宽度:
;9rS[$^$O $box "Input fields:", size = (300, 200)
byTTLs,}d 如果宽度或高度设置为 0 或未定义,则表示此尺寸是自动确定的。
`oq][| 此外,还可以更改框的背景色:
3pF7}P $box "Input fields:", color = rgb(0.9, 0.8, 0.7)
$|V@3`0 (15) 用以下命令行
86AZ)UP2D $tabcontrol
d^sm;f 可以启动所谓的选项卡控件,然后使用如下命令定义各种带标签的选项卡
H]x-s $tab "Fiber details"
OmR)W' 最后,必须关闭选项卡控件:
A3|hFk $tabcontrol end
GF=rGn@,)` 选项卡控件还可以获得以像素为单位的固定大小:
R]! [h $tabcontrol, size = (400, 300)
(6Tvu5*4U (16) 允许使用嵌套的框和选项卡控件。例如,选项卡控件可以放在一个框中,反之亦然
_sGmkJi] (17)用以下命令行
+xc1cki_{ $bgcolor = rgb(0.9, 0.9, 1)可以修改自定义表单的背景色。(默认值为白色。)
-FGQn
|h4 (18) 可以用如下命令行放置图象
:K)7_]y $image "graphics.png", position = (400, 0)
(Iz$_( 可以从扩展名为.gif、 .png、 .bmp 或.jpg 的文件加载
图像。
^f%hhpV@ x 和 y 方向上的位置与放置图像的框或选项卡控件相关,或者与表单的左上角有关(如果它不在此类元素中)。第二个参数(y 坐标)可以是 here,表示下一个文本行将出现的 y 位置,或者,例如, here+20 对应较低位置。
/Q nq,`z 也可以使用类似于 size = (300, 200)的选项来修改像素大小,或者使用 size = 1.5 来设置大小的比例因子。
>{HQ"{Q 如果指定了位置(以像素为单位),则图像将放置在该位置而不影响常规流;例如,可以将其用作背景图像。否则(没有指定位置),它将被放置在常规流中,即以下元素将在相应的较低位置显示。
^I CSs]}1 除了图像文件,还可以在圆括号中指定一个数学表达式,从中可以计算局部颜色值(取决于像素坐标 x 和 y)。例子:
j@HOU~x $image (color_I(1-y/200)), position = (400, 100), size = (20, 200)
!|#W,9 使用 scale1 选项,可以将 x 和 y 坐标缩放到范围 0..1(而不是 0 到像素值减 1)。
c&GVIrJ 使用 condition=(…)选项,可以定义一个条件,该条件必须成功计算为非零值,否则图像将被抑制。例如:这样可以防止在一些计算数据被采用之前尝试绘制图像。
0lm7'H*~ 另一个可能的选项是 update,这意味着每次更新输出栏时都会更新图像。这仅适用于基于数学表达式的图像,该表达式依赖于某些计算结果。例如,可以使用该
功能以图形方式说明某些输出值 。
W Y] (19)只包含一个美元符号(“$”)或以$remark 开头的行将被忽略。
6B=: P3Y (20)在$def 之后,可以定义一些变量或
函数。与脚本中的常规定义不同,在读取自定义表单时,已经读取了此类定义,因此,即使在执行脚本之前,也可以在表单中使用此类定义。例子:
-/'_XR@1 $def deg := pi / 180
L
HW\A8 nUy. gAb $def sinc(x) := if x <> 0 then sin(x) / x else 1
9k.5'# (21) 命令$autosizeform 调整
程序表单的大小,使自定义表单正好适合其位置。
' %&gER cM hBOm* bQlv b
Z)^1~!w0 "!w#E6gU Rl/5eE8 6Lb(oY}\3