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