Ec集成计算系统

代码中 param_seg 段用于建立参数输入界面；

int build_pane(int type)函数前部分用于建立整个计算界面，基本不需要改动；中间部分用于创建结果输出列表的各个列，可根据需要进行增减；

计算函数为 int calc()，点击参数输入界面的“计算”按钮时会调用该函数执行计算； 语句 double result=((g_x + 3) * 2.1) 就是计算公式；其中参数 g_x 的值从输入界面中第一个输入框中取得，g_y从第二个输入框取得（此处未用）；main_report.AddRow(-1,"","") 语句用于在输出列表中增加一行，并填写两个输出的字符串；修改此处的计算公式即可实现你的计算功能。

如下修改原演示代码，直接覆盖原来的代码即可，实现相同的基本计算，增加一个输入参数，却减少了约400字符存储空间。

#define MODULE_NAME "编程演示"
#pragma module_name "编程演示"
#pragma module_class "@road_func"

double g_x=9.96,g_y=0.1;
int pane_type=param_seg
{
DIALOG 0, 0, 166, 100;
FONT 10, "System";

LTEXT "参数",IDC_STATIC,6,6,46,8; EDITTEXT LINK_g_x,80,6,70,12;
LTEXT "参数1",IDC_STATIC,6,20,46,8; EDITTEXT LINK_g_y,80,20,70,12;
PUSHBUTTON "计算",LINK_calc,100,80,50,14;
};

int calc()
{
main_param_pane.UpdateData(1);

double result=((g_x + 3) * 2.1);

main_report.AddRow(-1,StrFormat("%.3f",g_x),StrFormat("%.3f",result));

if(StrLen(g_cur_seg_filename)>0)
{
g_has_data_change=1;
}
}

export int build_pane(int type)
{
SetStateModule();
main_param_pane.SetTypeFmt(1,"%.3f");
info_browser.BrowserCmd("clear history");
info_browser.Navigate(url:"html\\test.html");
right_pane.SetUIAttrs("show_border:0");
mainWnd.SetCellWindow(0,1,road_coordinate_pane);
main_param_pane.CreateParamItems(pane_type);

ExecModuleCode(1,"Set_Width");
main_report.DeleteAllColumns();
main_report.AddColumn("参数",100);
main_report.AddColumn("结果",100);

main_report.SetColumnAttrs(1,"read_only:1");
SetStateModule(0);
update_button_state();
}

export int update_button_state(string seg_name)
{
}

export int load()
{
}

export int save()
{
}

export int onexit()
{
}