摘要: static void menuFunction(Args _args){ SalesTable m_salesTable; Args args = new Args(); ; args.record(m_salesTable); //访问Form new MenuFunction(menuItemDisplayStr("Unit"),MenuItemType::Display).run(); //访问Class new MenuFunction(menuItemActionStr("Calculator"),MenuItemType::Action). 阅读全文
posted @ 2012-04-18 14:37 K小子 阅读(269) 评论(0) 推荐(0)
摘要: 在MenuItem的属性Parameters里设置一个参数;然后在Form的Init里如下进行判断:if(element.args().parm() == "参数"){......}譬如:MenuItem1的Paramters设置first MenuItem2的Paramters设置second然后在Form里的init方法里进行如下判断if(element.args().parm() == "first"){ .........................}if (element.args().parm() == "second" 阅读全文
posted @ 2012-04-17 16:09 K小子 阅读(166) 评论(0) 推荐(0)
摘要: static void randomTest(Args _args){ Random myRand = new Random(); int i; ; for(i=0;i<=3;i++) { info(strfmt("%1",myRand.nextInt())); }} 阅读全文
posted @ 2012-04-17 14:48 K小子 阅读(198) 评论(0) 推荐(0)
摘要: 窗体desgin的属性:MaxMizeBox:No MinMizeBox:No 然后--------------------------------------------------------------------1、public void run(){ #winapi super(); winapi::ShowWindow(element.hWnd(),#SW_MAXIMIZE);}2、public void run(){#define.SC_MAXIMIZE (61488)#define.WM_SYSCOMMAND (0x0112)super();WinAPI::SendMessag 阅读全文
posted @ 2012-04-17 14:13 K小子 阅读(175) 评论(0) 推荐(0)
摘要: static void TestTableName(Args _args){ str tmpStr = "TableName"; ; if (TableName2Id(tmpStr)) { info("It is a table"); } else { info("Sorry,it is not a table"); }}// another methodstatic server boolean checkTableName(str 50 _str){ Dictionary dictionary ; int tableCnt ; i 阅读全文
posted @ 2012-04-17 10:07 K小子 阅读(187) 评论(0) 推荐(0)
摘要: 1:直接调用函数 str 24 ComName; ; ComName=appl.company().ext();//当前公司ID curUserid();//当前用户iD systemDateget();//当前时间 Time2Str(timenow(),1,2);//时间转换函数 curuserid()//当前用户2,使用Session对象 session xSession; ; xSession=new session(); print xsession.userId();pause; print xsession.interfaceLanguage();pause;3,使用XInfo对象 阅读全文
posted @ 2012-04-16 11:20 K小子 阅读(189) 评论(0) 推荐(0)
摘要: static void exporttoExcel(Args _args){ #Excel HWND HWND; SysExcelApplication excel; SysExcelWorkbooks books; SysExcelWorkbook book; SysExcelWorksheets sheets; SysExcelWorksheet sheet; SysExcelRange columns; SysExcelRange column; SysExcelCells cells; SysExcelCell cell; SysExcelStyle ExcelStyle; SysEx 阅读全文
posted @ 2012-04-13 10:15 K小子 阅读(857) 评论(0) 推荐(0)
摘要: int match(str pattern, str text)match('<:D+>', s);判断字符串是否全部为数值match('<:A+>', s);判断字符串是否全部为字符match('<:N+>', s);判断字符串是否全部为数字或字符CharacterDescription\A backslash causes a specific character to be matched. Remember to escape backslashes. For example:Copy Code mat 阅读全文
posted @ 2012-04-12 10:44 K小子 阅读(1452) 评论(0) 推荐(0)
摘要: Agrs Class这个类在很多代码中出现,在启动报表的时候也需要用到它. 简单来说这个类用于共享构造参数.在Axapta中之所以可以用Args的方式,是因为: 1.通常参数的数目比较少. 2.用的参数类型很类似. 3.有时候构造一个主要的对象,需要构造与之相关的对象,在构造这些对象时需要用到相 同的构造参数. 在传统的OO世界里,一个对象往往有多个重载的构造函数,通常情况下这没什么问题,但 当一个主要的对象需要通过特定构造器去构造相关的对象时,事情变得糟糕起来.有时候需要 通过逻辑判定到底该构造哪个构造函数,并且要在很多层之间传递这些信息.事实证明在 Axapta中,很多报表,窗体,Acti 阅读全文
posted @ 2012-04-12 10:27 K小子 阅读(216) 评论(0) 推荐(0)
摘要: ShowNum2Strstatic void ShowNum2Str(Args _args) { Real Num; ; Num = 2.001; info(Num2Str(Num,0,3,1,2)); //输出2.001 }ShowNum2Str参数介绍:ShowNum2Str(待转real,文本长度,小数位,小数点分隔符,千位分隔符)文本长度:意指转换后的文本长度,不足位将用空格填充;小数位:小数长度,不足位将用零填补;小数点分隔符:1表示点号“.”; 2表示逗号“,”千位分隔符:0表示无分隔;1表示点号;2表示逗号;3表示空格;4表示科学计数法Date2strstatic void Sh 阅读全文
posted @ 2012-04-12 09:54 K小子 阅读(344) 评论(0) 推荐(0)