use "xcontrol.vframe.vbusiness.vd"
use "xbase.vframe.vbusiness.vd"

unit trade 
[
	class TestRetrieveingWin:  public xframe
	{
		//xdwgrid	dw_list;

		xnode	m_agentNode;	//Agent Condition

		//½¹µã¼¤»î´¦Àíº¯Êý
		int OnSetFocus(ref TEvent evt,int param)
		{
			//ÖØÖù¤¾ßÌõ
			return 1;
		}

		//ÃüÁî·¢²¼º¯Êý
		int OnCmdDispatch(string comdid)
		{
			if(comdid=="RetrieveFinished")
			{
				CloseWindow();
				return 1;
			}
			return 0;
		}
		
		//ÃüÁî´¦Àíʼþ
		int OnXCommand(ref TXCommandEvent evt,int param)
		{
			return OnCmdDispatch(evt.pStrID);
		}
		
		int OnAttachEvent()
		{
			//°ó¶¨¹¤¾ßÌõµã»÷ʼþ
			AttachEvent("WM_XCOMMAND",OnXCommand);
			//»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ
			AttachEvent("WM_SETFOCUS",OnSetFocus);
		}
		
		int onload()
		{
			OnAttachEvent();	
			
			return 1;
		}
		
	};
]