LiFan
10 天以前 63eebabbfee1bc84850b36967ecac5116a28b73f
jrj/project/business/BasicCode/ExpressList.cpp
@@ -1,34 +1,47 @@
use "system.vl"
use "win.vl"
use "list.vl"
unit vbusiness.entity
[
   ExpressList is extend list;
   about ExpressList
   [
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <wobject/xdouble.hpp>
#include <xcontrol/xlayersheet.hpp>
      method:
      [
         int onload()
         {
            list::onload();
            return -1;
         }
         int ViewUpdate(param pr,string updateItem,xaserverarg__   arg)
            {
               if(   updateItem=="del")
               {
                  int DelRow = this.dw_list.GetRow();
                  this.dw_list.DeleteRow(DelRow);
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
               }
using xml = KXMLDOMDocument;
class __declspec(dllexport) ExpressList : public listwin
{
public:
   xdwgrid   dw_list;
public:
   ExpressList(void* implPtr, HWND hWnd) : listwin(implPtr, hWnd) {}
public:
   static ExpressList* CreateInstance(void* implPtr, void* hWnd)
   {
      ExpressList* pWin = new ExpressList(implPtr, (HWND)hWnd);
      return pWin;
   }
   int onload()
   {
      listwin::onload();
      SetAgent();
      return -1;
   }
               return 1;
            }
      ]
   ]
]
   int onloaded()
   {
      return listwin::onloaded();
   }
   int ViewUpdate(LPARAM pr, xstring updateItem, xaserverarg   arg)
   {
      if (updateItem == L"del")
      {
         int DelRow = dw_list.GetRow();
         dw_list.DeleteRow(DelRow);
      }
      return 1;
   }
};