| | |
| | | #include <xcontrol/ximageview.hpp> |
| | | #include <xcontrol/xhtml.hpp> |
| | | #include <xcontrol/xexcel.hpp> |
| | | #include "vbusiness/util/publiccode.vutil.vbusiness.hpp " |
| | | #include <vbusiness/vutil/publiccode.vutil.vbusiness.hpp> |
| | | |
| | | using xml = KXMLDOMDocument; |
| | | class __declspec(dllexport) DataVanalysisWin : public xwin |
| | | { |
| | | public: |
| | | DataVanalysisWin(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd) {} |
| | | DataVanalysisWin(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd),dw_data(0){} |
| | | static DataVanalysisWin* CreateInstance(void* implPtr, void* hWnd) |
| | | { |
| | | return new DataVanalysisWin(implPtr, (HWND)hWnd); |
| | | } |
| | | public: |
| | | xhtml ole_html; |
| | | xdwgrid dw_data; |
| | | xdwgrid* dw_data; |
| | | xnode m_agentNode; //Agent Condition |
| | | xstring htmlStr; |
| | | xexcel excel; |
| | |
| | | HCURSOR hCursor = xutil::SetCursorWait(); |
| | | if (comdid == L"xmConfig") |
| | | { |
| | | xstring str = dw_data.DataAnalysis(L""); |
| | | xstring str = dw_data->DataAnalysis(L""); |
| | | if (str != L"") |
| | | { |
| | | ole_html.LoadHtml(str); |
| | |
| | | |
| | | xaserver::CreateDirectory(L"C:\\Temp"); |
| | | xstring gid = publiccode::GetGuid(); |
| | | xutil::SaveToFile(L"C:\\Temp\\" + gid + L".html", htmlStr, L"", L"", L""); |
| | | xutil::SaveToFile(L"C:\\Temp\\" + gid + L".html", htmlStr, L"", L""); |
| | | excel.OpenDocument(L"C:\\Temp\\" + gid + L".html"); |
| | | excel.put_Visible(true); |
| | | return 1; |
| | |
| | | AttachEvent(L"WM_XCOMMAND", (FEvent)&DataVanalysisWin::OnXCommand); |
| | | //获取焦点事件,用于重置工具条 |
| | | AttachEvent(L"WM_SETFOCUS", (FEvent)&DataVanalysisWin::OnSetFocus); |
| | | |
| | | return 1; |
| | | } |
| | | |
| | | int onload() |
| | | { |
| | | htmlStr = L""; |
| | | ole_html = GetControl(L"ole_html"); |
| | | ole_html = GetControl(L"ole_1"); |
| | | if (!GetWinParam()) return 1; |
| | | SetArg(); |
| | | xaserverarg arg = GetArg(); |
| | |
| | | htmlStr = str; |
| | | ole_html.LoadHtml(str); |
| | | } |
| | | dw_data = *(xdwgrid*)arg.GetParam(L"obj"); |
| | | dw_data = (xdwgrid*)arg.GetParam(L"obj"); |
| | | |
| | | OnAttachEvent(); |
| | | |