如何在程序中得到AX系列专案名称?
内容
1.通过Library Manager确认是否有加入CmpApp Library以及SysTypes2 Interfaces Library,没有的话请加入。
2.通过CmpApp Library的AppGetCurrent,可以读取到Application的结构。再通过AppGetApplicationInfo读取到Application的信息,包含项目名称。
IF xGet THEN
pApp := AppGetCurrent(pResult := ADR(Result));
IF pApp <> 0 THEN
pAppInfo := AppGetApplicationInfo(pApp := pApp, pResult := ADR(Result));
END*IF
xGet := FALSE;
3. 依照程序内容编辑,编译正确后下载,将xGet设成True就可以通过pAppInfo^.pstProjectName读取到专案名称。
关键词:程序获得、工程名称
我们将利用一种称作Cookies之标准技术,搜集有关您如何使用我们的网页之讯息,以便提供您一个良好的体验环境并藉以评估我们网页上最受欢迎的版面,或当您再次拜访我们网页时,我们的网站能记得您。当您在浏览我们的网页时,我们没有任何故意或意图侵害您的隐私。大部分之浏览器将允许您从计算机硬盘中删除Cookies数据、阻断接受Cookies、或于Cookies数据被储存前接获警告通知。您可以选择自行设定浏览器在接获Cookies前通知您,并得以选择拒绝或接受该Cookies。更多信息可以查看 隐私政策 更多信息可以查看 隐私政策
内容
1.通过Library Manager确认是否有加入CmpApp Library以及SysTypes2 Interfaces Library,没有的话请加入。
2.通过CmpApp Library的AppGetCurrent,可以读取到Application的结构。再通过AppGetApplicationInfo读取到Application的信息,包含项目名称。
IF xGet THEN
pApp := AppGetCurrent(pResult := ADR(Result));
IF pApp <> 0 THEN
pAppInfo := AppGetApplicationInfo(pApp := pApp, pResult := ADR(Result));
END*IF
xGet := FALSE;
END*IF
3. 依照程序内容编辑,编译正确后下载,将xGet设成True就可以通过pAppInfo^.pstProjectName读取到专案名称。
关键词:程序获得、工程名称