练习 - 使用逻辑表达式和关系表达式

8 分钟

您是 CRONUS International Ltd. 的一名开发人员，想要测试最近学到的有关逻辑运算符的知识。此外，您还想创建一个页面，向其中添加多个控件和一个操作，然后写入通过关系表达式计算布尔变量的代码。

任务

创建新页面。
定义三个全局变量、两个输入值和一个结果。
创建字段并使用变量作为源。
创建操作并检查输入 1 是否大于输入 2。

步骤

选择文件 > 新建文件，然后通过选择文件 > 保存立即保存此文件。将本文件命名为 ExpressionsCard.Page.al。
使用代码片段在此文件中创建一个新页面。输入 tpage，然后按 Tab 键。
将 ID 更改为 50111，然后将 name 更改为 Expressions Card。
将 PageType 属性设置为 Card，将 UsageCategory 属性设置为 Documents。
删除 SourceTable 属性并将 Caption 属性设置为表达式卡。
创建以下全局变量，并删除默认的 myInt 变量。
- Value1 Integer
- Value2 Integer
- Result Boolean
验证是否在布局部分中创建了内容区域。如果没有，请创建一个内容区域。
将第一个组的名称更改为输入。将组的 Caption 属性设置为输入。
再创建一个名为输出的组并设置该组的 Caption 属性。
在输入组中添加 Value1 和 Value2 字段。在输出组中添加结果字段。您可以使用 tpagefield 代码片段。
验证页面上所有字段的 ApplicationArea 属性是否设置为 All。
为页面中的每一列添加工具提示。
为每个字段设置一个标题。将结果字段的 Editable 属性设置为 false。
验证是否在处理区域中创建了操作。如果没有，请新建一个操作。
将操作的名称更改为执行，然后对该操作设置以下属性：
- Caption：Execute
- Image：ExecuteBatch
- ApplicationArea：All
- 工具提示：单击以计算结果。
在 OnAction 触发器中，输入以下代码：
```
 Result := Value1 > Value2;
```

该代码现在应如下所示：

	page 50111 "Expressions Card"
	{
	    PageType = Card;
	    ApplicationArea = All;
	    UsageCategory = Documents;
	    Caption = 'Expressions Card';

	    layout
	    {
	        area(Content)
	        {
	            group(Input)
	            {
	                Caption = 'Input';
	                field(Value1;Value1)
	                {
	                    ApplicationArea = All;
	                    ToolTip = 'Enter a value for Value1.';
	                    Caption = 'Value1';
	                }
	                field(Value2;Value2)
	                {
	                    ApplicationArea = All;
	                    ToolTip = 'Enter a value for Value2.';
	                    Caption = 'Value2';
	                }
	            }
	            group(Output)
	            {
	                Caption = 'Output';
	                field(Result;Result)
	                {
	                    ApplicationArea = All;
	                    ToolTip = 'The result of the operation.';
	                    Caption = 'Result';
	                    Editable = false;
	                }

	            }
	        }
	    }

	    actions
	    {
	        area(Processing)
	        {
	            action(Execute)
	            {
	                ApplicationArea = All;
	                Caption = 'Execute';
	                ToolTip = 'Click to calculate the result.';
	                Image = ExecuteBatch;

	                trigger OnAction()
	                begin
	                    Result := Value1 > Value2;
	                end;
	            }
	        }
	    }

	    var
	        Value1 : Integer;
	        Value2 : Integer;
	        Result : Boolean;
	}

打开 .vscode 文件夹中的 launch.json 文件，然后将 startupObjectId 设置为 50111，将 startupObjectType 设置为 Page。
将扩展发布到沙盒。选择视图 > 命令面板...。
在搜索框中输入 AL: Publish（或者按 F5 键），然后从列表中选择命令。
验证 Dynamics 365 Business Central 应用程序是否启动以及表达式卡页面是否显示。在值 1 字段中输入 10，在值 2 字段中输入 2。选择“操作”菜单上的执行按钮，然后验证是否已选择结果选项。

练习 - 使用逻辑表达式和关系表达式

任务

步骤

反馈