LiFan
2024-07-16 6a4764ee747fff45d89ef48f98873d6409e4f85e
jrj/project/business/BasicCode/AddUomGroup.cpp
@@ -1,23 +1,24 @@
use "win.vl"
use "treeview.vm"
use "dev:vm[xdwgrid.vm]"
use "dev:vm[xdwtable.vm]"
use "pref.vl"
use "dev:vm[xml.vm]"
use "dev:vm[xaserverarg.vm]"
use "dev:vm[xaserver.vm]"
use "dev:vm[xutil.vm]"
use "dev:vm[control.vm]"
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <wobject/xdouble.hpp>
#include <xcontrol/xlayersheet.hpp>
unit vbusiness.xpage
[
   AddUomGroup is extend win__;
   about AddUomGroup
   [
      control:
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
      
      method:
      [
using xml = KXMLDOMDocument;
class __declspec(dllexport) AddUomGroup : public xwin
{
public:
   AddUomGroup(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd) {}
public:
   static AddUomGroup* CreateInstance(void* implPtr, void* hWnd)
   {
      AddUomGroup* pWin = new AddUomGroup(implPtr, (HWND)hWnd);
      return pWin;
   }
         
         int SetAgent()
@@ -25,7 +26,7 @@
            return 1;
         }
         //焦点激活处理函数
         int OnSetFocus(ref TEvent evt,int p)
   int OnSetFocus(TEvent* evt, LPARAM p)
         {
            int SetAgent();
@@ -34,37 +35,38 @@
         }
         //命令发布函数
         int OnCmdDispatch(string comdid)
   int OnCmdDispatch(xstring comdid)
         {
            if (comdid=="cb_cancel")
      if (comdid == L"cb_cancel")
               CloseWindow();
            else if(comdid=="cb_ok")
      else if (comdid == L"cb_ok")
            {
               control__ xc = new control__;
               xc.setNativePointer(this.GetControl("Txt"));
               string name = xc.GetText();
               xaserverarg__ arg=new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg = GetParam();
               arg.AddArg("GroupName",name);
               arg.AddArg("return","ok");
         control xc = new control;
         xc.setNativePointer(GetControl(L"Txt"));
         xstring name = xc.GetText();
         xaserverarg arg;
         arg = GetArg();
         arg.AddArg(L"GroupName", name);
         arg.AddArg(L"return", L"ok");
               CloseWindow();            
            }
            return 0;
         }
         
         //命令处理事件
         int OnXCommand(ref TXCommandEvent evt,int p)
   int OnXCommand(TEvent* evt, LPARAM param)
         {
            return OnCmdDispatch(evt.pStrID);
      return OnCmdDispatch(evt->xcommand.pStrID);
         }
         
         int OnAttachEvent()
         {
            //绑定工具条点击事件
            AttachEvent("WM_XCOMMAND",OnXCommand);
      AttachEvent(L"WM_XCOMMAND", (FEvent)&AddUomGroup::OnXCommand);
            //获取焦点事件,用于重置工具条
            AttachEvent("WM_SETFOCUS",OnSetFocus);
      AttachEvent(L"WM_SETFOCUS", (FEvent)&AddUomGroup::OnSetFocus);
      return 1;
         }
         
         int OnInitial()
@@ -80,43 +82,40 @@
         
         int onload()
         {
      SetArg();
            OnInitial();
            
            if(this.GetParam())
            {
               if (GetParam())
         if (GetWinParam())
               {
                  xaserverarg__ arg=new xaserverarg__;
                  arg.setNativePointer(arg.CreateInstance());
                  arg = GetParam();
                  string note = arg.GetArgString("note");
                  if(note=="修改")
            xaserverarg arg;
            arg = GetArg();
            xstring note = arg.GetArgString(L"note");
            if (note == L"修改")
                  {   
                     string name = arg.GetArgString("GroupName");
                     control__ xc = new control__;
                     xc.setNativePointer(GetControl("Txt"));
               xstring name = arg.GetArgString(L"GroupName");
               control xc = new control;
               xc.setNativePointer(GetControl(L"Txt"));
                     xc.SetText(name);                     
                  }   
                  string id = arg.GetArgString("m_id");
                  if(id =="FND_UOM")
            xstring id = arg.GetArgString(L"m_id");
            if (id == L"FND_UOM")
                  {   
                     win__::SetWindowText(this.GetHWND(),"计量单位");
               SetWindowText(GetHWND(), L"计量单位");
                  }
                  else if(id =="FND_CustomerSource")
            else if (id == L"FND_CustomerSource")
                  {   
                     win__::SetWindowText(this.GetHWND(),"客户来源");
               SetWindowText(GetHWND(), L"客户来源");
                  }
                  else if(id =="FND_AuxiliaryAttribute")
            else if (id == L"FND_AuxiliaryAttribute")
                  {   
                     win__::SetWindowText(this.GetHWND(),"辅助属性");
               SetWindowText(GetHWND(), L"辅助属性");
                  }                  
               }
            }
            
            return 1;
         }
      ]
   ]
]
};