小火龙果 |
2020-07-07 13:53 |
RP Fiber Power——自定义表单创建格式
[ a65VR~J 自定义表单的定义总是以命令 Custom form 开始。在最简单的情况下,表单的命令行在其之后,在至少以 3 个减号(“-”)开头的两行之间。 4YB7og%P [attachment=101843] CgPZvB[ 以上命令行还可以放入单独的文本文件中,该文件的名称在命令中注定: U3dR[* Custom form: form = "My input form.txt" (J?}eb;>n 默认情况下,表单中编辑的输入值保存在与脚本文件名相同的文件中,但文件扩展名为“.fpj”。 eUUD|U*b 可以通过附加选项对其更改: J.+?*hcw D aqy+: Custom form: {/[?YTDU form = "My input form.txt", #uDBF data = "My inputs.fpj" 6DiA2'{f 自定义表单内容详细信息: Rh-8//&vZ/ (1)大多数文本行显示在表单中。但是以“$开头的行包含某种命令,表单中的“#”符号表示输入或输出栏。通过使用一系列这些字符,可以使栏变长。对于命令行中出现的每个栏,需要在下一行以$input、 $output 或$button 开头定义栏的详细信息。(该行内容不能分散在多行上) QYCNO#* (2)数字或字符串值的常规输入栏只需指定要编辑的变量的名称,跟随一个格式指令。 hU)f(L 示例: $input P_p_in:d6:"W" 表示变量为 P_p_in(此处:表示泵浦输入功率),其值最多显示 6 个有效数字和单位“W”(瓦特)。 -EX3'
[*' 7l|> 此外,可以使用 min 和 max 选项指定允许的最小值和/或最大值。 W:N"O\`{m 例子:$input P_p_in:d6:"W", min = 0, max = 10 C`K9WJOD 对于字符串值,最小值和最大值适用于字符串长度。 /VjbyRwV 在某些情况下,需要编辑以某种方式缩放的值。例如,镜子反射率可能介于 0 和 1之间,但要编辑为百分比。 m6ZbYF-7W 在这种情况下,可以缩放显示的值: FlA$ G3 $input R_mirror / 0.01:d6:"%", min = 0, max = 1 5/eS1NJ@
(最小值和最大值应用于未缩放的变量。) 1Qc(<gM 可以定义默认值,如果输入栏为空,则使用该值: "x) pp $input correction_factor:d6, default = 1 S.)8& 另一种可能是定义文本颜色和背景颜色的表达式,这可能取决于栏的数值。例子: E'kQ $input P:d6:"W", textcolor = (if P > 3 then red else black) 3B_} : 这里,如果值超过 3,则以红色显示。但是,如果输入的值超出了用 min 和 max 定义的范围,则背景色始终为淡红色。 A?Hjz%EcW 还可以使用 hint=“initial power”这样的选项定义提示文本。 S:GUR6g8D (3)下面的示例解释了用于选择某些值的所谓 combo box: uB)6\fkTB $input (combobox: "value 1", "value 2” ) choice$ ?jM7C} 选择的结果将存储在给定的变量中。如果变量是字符串变量(在我们的示例中,用$符号表示),它将被分配给所选的字符串。对于实变量,如果选择第一项,则为 1,如果选择第二项,则为 2,等等。 o3[sF 不必像上面所示的那样,列出所有可能的值,你可以在括号内提供单个字符串,括号内包含用逗号隔开的所有值: !`S%l1[Z $input (combobox: ("value 1,value 2” )) choice$ DEeL48{R (4) 用于 yes/no 选择的 checkbox 如下: z E7ocul $input (checkbox) choice qt&"cw
选择的依赖性,变量被设为 1 或 0. QvQf@o (5) 带有单选按钮的选择栏解释如下: E*b[.vUp $input (radio: "value 1", "value 2") choice #$z -]i 同样,给定的变量可以是实数或字符串变量。 !JQ~r@j 单选按钮放在一个框中,该框可以配备标题: TD=/C| $input (radio: "value 1", "value 2") choice, caption = "Select:" Z
5YW L4s 通常,不同的选择以单独的行显示,但也可以有多个列的设计,高度降低: R*5;J`TW $input (radio: "value 1", "value 2") choice, nocolumns = 2 {q>4:lsS (6) 对于可以包含多行的字符串值,可以使用一个多行文本栏: OL9C#er $input (multiline) text$, height = 50 t 6IaRD 允许的选项包括 min 和 max(最小和最大长度)、 height(以像素为单位的栏高度)、hint(如上)、 textcolor 和 bgcolor F'_8pD7 (7) 也可以制作一个轨迹条(带有可沿刻度移动的把手): c(=O`%B{ $input (trackbar: 1 to 100) position, height = 25 gkn/E}K# 这两个数字表示最小和最大整数值。可选的高度值以像素为单位定义轨迹条的高度。 HG6{`i (8) 对于任何类型的输入栏,都可以使用选项 onchange = update outputs,这意味着在输入栏的值发生任何更改之后,都应该更新所有输出栏。(否则,只有在脚本执行之后才会发生这种情况。)此外,如果 onchange = execute,则可以在每次更改栏后触发脚本执行。最后,使用 onchange = (expr),在这种情况下可以调用数学表达式(例如,设置一些变量值)。 f*&JfP (9) 文本输出栏(用于单行)可以与文本输入栏类似,但可以有多个表达式: _ G*x:< $output ["P1 = ", P1:d3:"W", "P2 = ", P2:d3:"W"] g~["O!K3 表达式列表需要放在括号之间;如果只使用一个表达式,则可以省略括号。还可以添加一些选项,例如修改文本颜色或背景颜色: e/#&5ISk $output ["P1 = ", P1:d3:"W"], textcolor = (if P1 > 3 then red else black), bgcolor = rgb(0.8,0.8, 1) EG8R*Cm,} 默认情况下,背景色为浅灰色,因此输出栏可以与输入栏进行视觉区分。 Pds*M?&F 对于输入栏,可以定义一个提示(解释),当用户将光标移动到该栏时显示该提示: FG36,6N%2j cz~FWk $output ["P1 = ", P1:d3:"W"], hint = "Power at the input $aI MQ[( 如果在计算过程中发生错误,软件将用错误消息替换该提示文本。 "RX5] eJc\ F`}w0=-*( (10) 多行文本输出栏可以如下所示: i/EiUH/~ $output (multiline) [s$], height = 50 i|noYo_Ah\ 允许的选项包括 height(以像素为单位的栏的高度)、 hint、 textcolor 和 bgcolor(如上所述)。 +rw3.d (11) 用于显示某些值的条(bar)可以制作如下: MAo,PiYb $output (bar) r3 / r1, color = red |.8=gS5 这里,使用一个红色条,其长度与值 r3/r1 成比例:如果该值为 1,则达到完整长度。 |]3);^0 颜色值可能取决于一些变量;例如,可以使用 color = (if r3 / r1 < 0.1 then blue else red)。 F"TI9ib 可以使用 height 参数设置条的高度(以像素为单位): {:8[Mdf $output (bar) r3 / r1, color = red, height = 30 pXlBKJmW (12) 可以创建按钮 JNg5?V;.U $button "Save data", exec = SaveDataToFile(FName$) VCtiZ4 其中,字符串是按钮的标题,定义为 exec 的值是一个数学表达式,按下按钮时将计算该表达式。其他允许的选项是 show inputs 和 show outputs;这意味着在计算表达式之后,所有输入栏或输出栏都应该刷新。例如,如果表达式更改了一些变量值,这将非常有用。 M!DoR6 (13) 默认情况下,文本使用标准大小为 10 像素的字体“Courier New”。可以使用如下命令更改以下所有行: utS Mx( $Font: "Arial", bold, underline, italic, size = 20, color = red Ph_m'fbf 建议使用固定宽度字体,如 Courier、 Courier New 或 Fixedsys。 >-+X;0& ,#;ahwU~s (14) 使用类似如下命令: LVtQ^ 5>8 $box "Input fields:" }4MG114j 可以将以下内容放入一个带有边距和给定标题的框中。框的定义必须以如下命令行结尾 %4^/.) Q $box end x=+I8Q4: 也可以使用相对于表单左上角的 x 和 y 坐标(以像素为单位),将方框定位在页面上的某个位置,而不是遵循常规流程: ;mxT>|z $box "Input fields:", position = (400, 0) 5|t&qUV 其他选项是以像素为单位定义特定的高度或宽度: z2zp c^i $box "Input fields:", size = (300, 200) Lcb59Cs6e 如果宽度或高度设置为 0 或未定义,则表示此尺寸是自动确定的。 *,*5sV 此外,还可以更改框的背景色: xEWa<P#.u $box "Input fields:", color = rgb(0.9, 0.8, 0.7) LMzYsXG*[ (15) 用以下命令行 &4iIzw` $tabcontrol 6FFv+{2^@ 可以启动所谓的选项卡控件,然后使用如下命令定义各种带标签的选项卡 [B<{3*R_ $tab "Fiber details" bxHk0w 最后,必须关闭选项卡控件: \Rt $tabcontrol end Di=6.gm[< 选项卡控件还可以获得以像素为单位的固定大小: =#fvdj $tabcontrol, size = (400, 300) MT g Eq (16) 允许使用嵌套的框和选项卡控件。例如,选项卡控件可以放在一个框中,反之亦然 u[qtuM?& (17)用以下命令行 b#^D8_9h $bgcolor = rgb(0.9, 0.9, 1)可以修改自定义表单的背景色。(默认值为白色。) m_f^#: (18) 可以用如下命令行放置图象 9K(b Z{ $image "graphics.png", position = (400, 0) m&8_i`%< 可以从扩展名为.gif、 .png、 .bmp 或.jpg 的文件加载图像。
>S/>2e: x 和 y 方向上的位置与放置图像的框或选项卡控件相关,或者与表单的左上角有关(如果它不在此类元素中)。第二个参数(y 坐标)可以是 here,表示下一个文本行将出现的 y 位置,或者,例如, here+20 对应较低位置。 _{);n$ ` 也可以使用类似于 size = (300, 200)的选项来修改像素大小,或者使用 size = 1.5 来设置大小的比例因子。 Z28@yD+ 如果指定了位置(以像素为单位),则图像将放置在该位置而不影响常规流;例如,可以将其用作背景图像。否则(没有指定位置),它将被放置在常规流中,即以下元素将在相应的较低位置显示。 8Qy |;T} 除了图像文件,还可以在圆括号中指定一个数学表达式,从中可以计算局部颜色值(取决于像素坐标 x 和 y)。例子: <[~M|OL9q, $image (color_I(1-y/200)), position = (400, 100), size = (20, 200) <O&s 'A[ 使用 scale1 选项,可以将 x 和 y 坐标缩放到范围 0..1(而不是 0 到像素值减 1)。 nTlrG6 使用 condition=(…)选项,可以定义一个条件,该条件必须成功计算为非零值,否则图像将被抑制。例如:这样可以防止在一些计算数据被采用之前尝试绘制图像。 PrxXL/6 另一个可能的选项是 update,这意味着每次更新输出栏时都会更新图像。这仅适用于基于数学表达式的图像,该表达式依赖于某些计算结果。例如,可以使用该功能以图形方式说明某些输出值 。 %LmB`DqZ (19)只包含一个美元符号(“$”)或以$remark 开头的行将被忽略。 `8Ix&d3F (20)在$def 之后,可以定义一些变量或函数。与脚本中的常规定义不同,在读取自定义表单时,已经读取了此类定义,因此,即使在执行脚本之前,也可以在表单中使用此类定义。例子: oLRio.u* $def deg := pi / 180 2O>iAzc h|Qh/jCX $def sinc(x) := if x <> 0 then sin(x) / x else 1 >8-
` (21) 命令$autosizeform 调整程序表单的大小,使自定义表单正好适合其位置。 pqX=l%{4ES
v4^VYi,.-
~C+T|
,)8Hl[y !;oBvE7Kh 2x
CGr>X
i ib-\j4d
|
|