开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
APPMAIN.C
资源名称：inet_stock.zip　[点击查看]
上传用户：bjghjy
上传日期：2007-01-07
资源大小：379k
文件大小：41k
源码类别：

金融证券系统

开发平台：

Visual C++

APPMAIN.C：源码内容
  1. /* hq_cl:股票行情，分析，资讯，交易。
  2. *  by lgd/Paladin.InetSoft guangzhou 1996.9
  3. *  http://www.nease.net/~inetsoft, inetsoft@163.net
  4. *  modify by lym(看此程序学了些win32编程，修改后作者里却不愿写上原作者的一个人) guangzhou 1997.5-1998
  5. */
  6. #include <windows.h>
  7. #include <windowsx.h>
  8. #include <stdio.h>
  9. #include <string.h>
  10. #include <stdlib.h>
  11. #include <time.h>
  12. #include <io.h>
  13. #include "global.h"
  14. #include "resource.h"
  15. #include "appmain.h"
  17. #include "pctcp.h"
  18. #include "hq.h"
  19. #include "hq_cl.h"
  20. #include "jy_cl.h"
  22. #include "caption.h"
  23. #include "mmp.h"
  24. #include "cj.h"
  25. #include "status.h"
  26. #include "xlt.h"
  27. #include "jlt.h"
  28. #include "graph.h"
  29. #include "maxmin.h"
  30. #include "lithq.h"
  31. #include "zs.h"
  32. #include "fx.h"
  33. #include "toolbar.h"
  34. #include "msg.h"
  35. #include "rsa.h"
  36. #include "env.h"
  37. #include "comm.h"
  39. #include "hq_tcp.h"
  41. int WinVer =3;
  42. HINSTANCE ghInstance =NULL;
  44. HWND ghWndMain =NULL, 
  45.     ghWndStatus =NULL, 
  46.     ghWndMaxMin =NULL,
  47. ghWndXlt =NULL, 
  48. ghWndJlt =NULL,
  49. ghWndCaption =NULL, 
  50. ghWndZs =NULL,
  51. ghWndMmp =NULL, 
  52. ghWndCj =NULL, 
  53. ghWndHq =NULL, 
  54. ghWndLitHq =NULL, 
  55. ghWndFx =NULL,
  56. ghDlgChkUsr =NULL,
  57. ghWndToolBar =NULL, 
  58. ghWndTips =NULL,
  59. ghWndHelp=NULL,
  60. hWndInput =NULL;
  62. HMENU ghMenuHq =NULL, 
  63. ghMenuMain =NULL, 
  64. ghMenuMainGraph =NULL, 
  65. ghMenuGraph =NULL;
  67. HBITMAP hBmpUp =NULL, 
  68. hBmpDown =NULL, 
  69. hBmpEqual =NULL;
  71. BOOL IsSzRead=FALSE,IsShRead=FALSE;
  73. int STATUS_HEIGHT=0;
  74. int MSG_HEIGHT =0;
  75. int INPUT_WIDTH =0; 
  76. int TOOLBAR_HEIGHT =0;
  78. BOOL gfTest =FALSE;
  80. int gfOnLine = FALSE,
  81. gfConnecting =TRUE,
  82. gfDelete=FALSE;
  83. int jy_running =FALSE;
  85. char * IpSendBuffer,
  86.  *IpCommitBuffer;
  87. unsigned int IpSendLen =0,
  88. IpCommitLen =0;
  90. HANDLE hLibCtl3d =NULL;
  91. char inkey[16+1],*winpy=NULL;
  92. short SeleGp[MAX_SELE_NUM][2];
  94. char UserID[HQ_USERID_SIZE+1];
  95. char UserPwd[HQ_USERPWD_SIZE+1];
  97. //extern HWND ghDlgJy;
  99. extern char szDataPath[128];
  100. extern unsigned int RANGE_MENU[7];
  101. extern int SeleQs;
  103. extern LPSTR HqTitles[HQ_FLDS_COUNT+2];
  104. extern int Jy(void);
  105. extern void UDP_Send_Exit(void);
  106. extern HBRUSH DrawChild(HDC hDC, HWND hWnd);
  108. extern int UDP_Client_ReadHq(void);
  109. extern int AnaRecvData(void);
  110. extern int AnaJyRecvData(void);
  112. extern int UDP_Client_ReadJy(void);
  113. extern int UDP_Send_Hq00(int jys, BOOL fFirst, int fRefresh, int fSel, int recCount, short *recList);
  114. extern int UDP_Send_Hq01(int, BOOL, int, int);
  115. extern int UDP_Send_Zx(void);
  116. extern int sdHq,JyOffLineTime;
  117. extern JY_ANS_CHKUSR curChkUsrRes;
  118. extern HFILE hfZx ;
  120. extern BOOL  Ip_Send_Pack();
  121. extern int InitQsInfo(void);
  122. extern int JyQs;
  123. extern char Addr[MAX_ZQS_COUNT][15];
  124. extern int ConnectToJyHost(char *HostName);
  125. extern void SendJyQsxx(void);
  127. int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hInstPre,
  128. LPSTR lpszCmdLine, int nCmdShow)
  129. {                      
  130. WNDCLASS wc;
  131. HWND hwnd;
  132. MSG msg;
  133. int x,y;
  134.     
  135. if(hInstPre)
  136. {
  137. hwnd =FindWindow(APPNAME, NULL);
  138. if(hwnd)
  139. SetFocus(hwnd);
  140. return FALSE;
  141. }
  142. ghInstance =hInstance;
  144. memset(&wc, 0, sizeof(wc));
  145. wc.style =0;
  146. wc.lpfnWndProc = MainWndProc;
  147. wc.lpszClassName =APPNAME;
  148. wc.hbrBackground =GetStockObject(BLACK_BRUSH);
  149. wc.hInstance = hInstance;
  150. wc.lpszMenuName = NULL;
  151. wc.hCursor = LoadCursor(NULL, IDC_ARROW);        
  152. wc.hIcon = LoadIcon(hInstance, MAKEINTRESOURCE(IDR_MAINFRAME));
  154. if(!RegisterClass(&wc))
  155. {
  156. ErrMsg(NULL, "RegisterClass wnd_main failed!");
  157. return FALSE;                         
  158. }       
  160. if(!RegisterChilds()) return FALSE;
  162. if(!AppInit())
  163. {
  164. ErrMsg(NULL, "AppInit failed!");
  165. AppExit();
  166. return FALSE;
  167. }
  168. if(strstr(lpszCmdLine,"/T")!=NULL||strstr(lpszCmdLine,"/t")!=NULL)
  169. gfTest =TRUE;
  171. x =GetSystemMetrics(SM_CXSCREEN);
  172. y =GetSystemMetrics(SM_CYSCREEN) -GetSystemMetrics(SM_CYCAPTION)*2;
  173. hwnd =CreateWindow(APPNAME, APPNAME, WS_SYSMENU|WS_CLIPCHILDREN|
  174. WS_THICKFRAME|WS_MAXIMIZEBOX|WS_MINIMIZEBOX,
  175. 0, 0, x, y,
  176. NULL, NULL, hInstance, NULL);
  177. if(hwnd ==NULL)
  178. {
  179. ErrMsg(NULL, "建立主窗口失败！");
  180. return FALSE;
  181. }
  182. ghWndMain =hwnd;
  183. ShowWindow(hwnd, SW_SHOW);
  184. InvalidateRect(hwnd, NULL, FALSE);
  186. while(GetMessage(&msg, 0, 0, 0))
  187. {
  188. TranslateMessage(&msg);
  189. DispatchMessage(&msg);
  190. }
  192. AppExit();
  194. return msg.wParam;
  195. }
  197. void LoadPy(void)
  198. {
  199. OFSTRUCT os;
  200. HANDLE hf;
  201. long len;
  203. hf=OpenFile("winpy.dat", &os, OF_SHARE_DENY_NONE|OF_READ);
  204. if(hf!=HFILE_ERROR)
  205. {   
  206. if((len =_llseek(hf,0L,SEEK_END))>0L)
  207. {
  208. winpy = (char *)GlobalAllocPtr(GHND,len+1);
  209. if(winpy!=NULL)
  210. {
  211. _llseek(hf,0L,SEEK_SET);
  212. if(_lread(hf,winpy,(UINT)len)!=(UINT)len)
  213. {
  214. GlobalFreePtr(winpy);
  215. winpy =NULL;
  216. }
  217. }
  218. }
  219. }
  220. if(hf!=HFILE_ERROR) _lclose(hf);
  221. }
  223. BOOL AppInit(void)
  224. {
  225. FARPROC fpTemp =NULL;
  227. WinVer =LOBYTE(LOWORD(GetVersion()));
  228. if(WinVer <4)
  229. {
  230. hLibCtl3d =LoadLibrary("CTL3DV2.DLL");
  231. if((UINT)hLibCtl3d <=32)
  232. hLibCtl3d =LoadLibrary("CTL3D.DLL");
  233. if((UINT)hLibCtl3d >32)
  234. {
  235. fpTemp =GetProcAddress(hLibCtl3d, "Ctl3dRegister");
  236. if(fpTemp)
  237. (*fpTemp)(ghInstance);
  238. fpTemp =GetProcAddress(hLibCtl3d, "Ctl3dAutoSubclass");
  239. if(fpTemp)
  240. (*fpTemp)(ghInstance);
  241. }
  242. }
  244. ghMenuMain =LoadMenu(ghInstance, MAKEINTRESOURCE(IDR_MENU_MAIN));
  245. if(!ghMenuMain)
  246. {
  247. ErrMsg(NULL, "Load main menu failed!");
  248. return FALSE;
  249. }
  250. ghMenuHq =GetSubMenu(ghMenuMain, 0);
  251. ghMenuMainGraph =LoadMenu(ghInstance, MAKEINTRESOURCE(IDR_MENU_GRAPH));
  253. if(!ghMenuMainGraph)
  254. {
  255. ErrMsg(NULL, "Load graph menu failed!");
  256. return FALSE;
  257. }
  258. ghMenuGraph =GetSubMenu(ghMenuMainGraph, 0);
  260. hBmpUp =LoadBitmap(ghInstance, MAKEINTRESOURCE(IDB_UP));
  261. hBmpDown =LoadBitmap(ghInstance, MAKEINTRESOURCE(IDB_DOWN));
  262. hBmpEqual =LoadBitmap(ghInstance, MAKEINTRESOURCE(IDB_EQUAL));
  264. if(!HqInit()) return FALSE;
  265. if(!JyInit()) return FALSE;
  266. if(!GraphInit()) return FALSE;
  267. if(!AnalyseInit()) return FALSE;
  268. if(PCTCPInit() !=0)
  269. {
  270. ErrMsg(NULL, "PCTCPInit() failed!");
  271. gfOnLine =FALSE;
  272. }
  273. IpSendBuffer = (char *)GlobalAllocPtr(GHND,MAX_WRITE_BUF_SIZE +1);
  274. if(IpSendBuffer ==NULL) return FALSE;
  276. IpCommitBuffer = (char *)GlobalAllocPtr(GHND,MAX_WRITE_BUF_SIZE +1);
  277. if(IpCommitBuffer ==NULL) return FALSE;
  278. GetSet();
  279. LoadPy();
  280. return TRUE;
  281. }
  283. void AppExit(void)
  284. {
  285. FARPROC fpTemp =NULL;
  286. static BOOL fExit =FALSE;
  288. if(fExit) return;
  290. fExit =TRUE;
  292. SaveSet();
  294. GraphExit();
  295. HqExit();
  296. JyExit();
  297. PCTCPExit();
  298. GlobalFreePtr(IpSendBuffer);
  299. GlobalFreePtr(IpCommitBuffer);
  300. FxExit(Fx);
  302. if(ghMenuMain) DestroyMenu(ghMenuMain);
  303. if(ghMenuMainGraph) DestroyMenu(ghMenuMainGraph);
  304. if(hBmpUp) DeleteObject(hBmpUp);
  305. if(hBmpDown) DeleteObject(hBmpDown);
  306. if(hBmpEqual) DeleteObject(hBmpEqual);
  307. if((UINT)hLibCtl3d >32)
  308. {
  309. fpTemp =GetProcAddress(hLibCtl3d, "Ctl3dUnregister");
  310. if(fpTemp)
  311. (*fpTemp)(ghInstance);
  312. FreeLibrary(hLibCtl3d);
  313. }
  314. if(winpy!=NULL) GlobalFreePtr(winpy);
  315. }
  317. extern void ReadHqDataAll(void); 
  318. extern void WriteHqDataAll(void);
  319. extern void DelOldData(void);   
  320. extern void ReadHqData(int jys);
  323. LRESULT CALLBACK MainWndProc(HWND hWnd, UINT message,
  324. WPARAM wParam, LPARAM lParam)
  325. {
  326. FARPROC lpFarProc=NULL;
  327. static int recNum =0;
  328. int i,ret,j;
  329. char temp[100+1];
  330. HDC hDC;
  331. TEXTMETRIC tm;
  332. STOCK_INFO_FRAME StockInfo;
  334. switch(message)
  335. {
  336. case WM_CREATE:
  337. ghWndMain =hWnd;
  338. ghDlgJy =NULL;
  340. hDC =GetDC(hWnd);
  341. GetTextMetrics(hDC, &tm);
  342. ReleaseDC(hWnd,hDC);
  344. STATUS_HEIGHT =30;
  345.             MSG_HEIGHT =tm.tmHeight+4;
  346. INPUT_WIDTH =tm.tmMaxCharWidth*10;
  348. if(!CreateChilds(hWnd)) 
  349. return -1;
  350. InvalidateRect(hWnd, NULL, FALSE);
  351. PostMessage(hWnd,WM_USER+4,0,0L);
  352. break;  
  353. case WM_USER+1:
  354. switch(lParam)
  355. {
  356. case FD_READ:
  357. AnaRecvData();
  358. break;
  359. case FD_CONNECT:
  360. gfConnecting=FALSE;
  361. gfOnLine =TRUE;
  362. if(UDP_Send_Hq00(0, TRUE, FALSE, FALSE, HqPaintData.curRecCount, &recNum)<0)
  363. {
  364. ErrMsg(ghWndMain, "不能请求行情数据");
  365. gfOnLine =FALSE;
  366. PostMessage(hWnd,WM_USER+3,0,0L);
  367. break;
  368. }
  370. SetTimer(hWnd, 1, 100, NULL);
  371. SetTimer(hWnd, 2, 1000*HQ_REFRESH_TIME, NULL);
  373. lpFarProc =MakeProcInstance((FARPROC)HqUserDlgProc, ghInstance);
  374. DialogBox(ghInstance, MAKEINTRESOURCE(IDD_HQUSER),
  375. hWnd, lpFarProc);
  376. FreeProcInstance(lpFarProc);
  378. if(!gfOnLine)
  379. PostMessage(hWnd,WM_USER+3,0,0L);
  380. else
  381. {
  382. Msg("请求主机发送初始化数据",MSG_VERT);
  383. DelOldData();
  384. gfDelete=TRUE;
  385. gfOnLine=TRUE;
  386. }
  387. break;
  388. }
  389. break;
  390. case WM_USER+2:
  391. switch(lParam)
  392. {
  393. case FD_READ:
  394.     AnaJyRecvData();
  395. break;
  396. case FD_CONNECT:
  397. JyQs =SeleQs;
  398. DispQsName(JyQs,0);
  399. if(!ReadRsaCiper(JyQs,RsaKey,temp))
  400. {
  401. SendJyQsxx();
  402. RsaOk =0;
  403. }
  404. else
  405. {
  406. strncpy(DesKey,temp,8);
  407. DesKey[8]=0;
  408. RsaOk =1;
  409. DispQsName(JyQs,RsaOk);
  410. }
  411. break;
  412. }
  413. break;
  414. case WM_USER +3:
  415. gfConnecting=FALSE;
  416. ReadHqDataAll();
  417. if(ReCreateChild()!=0)
  418. return (-1);
  419. IsSzRead=IsShRead=TRUE;
  420. GetSelSet();
  421. SetTimer(hWnd, 1, 100, NULL);
  422. SetTimer(hWnd, 2, 1000*HQ_REFRESH_TIME, NULL);
  423. break;
  424. case WM_USER +4:
  425. gfOnLine =FALSE;
  426. gfConnecting=TRUE;            
  427. recNum =0;      
  428.             
  429.             if(BeginConnect(HostName)<0)
  430. {
  431. Msg("连接主机失败，系统进入离线状态",MSG_VERT);
  432. PostMessage(hWnd,WM_USER+3,0,0L);
  433. }
  434. else
  435. {
  436. sprintf(temp,"正在连接主机%s",HostName);
  437. Msg(temp,MSG_VERT);
  438. SetTimer(hWnd, 1, 15000, NULL);
  439. }
  440. break;
  441. case WM_USER +5:
  442. Msg("读取深圳初始化文件",MSG_VERT);
  443. ReadHqData(0);
  444. IsSzRead=TRUE;
  445. break;
  446. case WM_USER +6:
  447. Msg("读取上海初始化文件",MSG_VERT);
  448. ReadHqData(1);
  449. IsShRead=TRUE;
  450. InitQsInfo();
  451. GetSelSet();
  452. if(access("winpy.dat",0)!=0)
  453. {
  454.   StockInfo.type=FILE_WINPY;
  455. strcpy(StockInfo.name,"winpy.dat");
  456.     UDP_Send_Stock_Info(&StockInfo);
  457. }
  458. break;
  459. case WM_USER +7:
  460. LoadPy();
  461. break;
  462. case WM_SIZE:
  463.     CreateChilds(ghWndMain);
  464. break;
  466. case WM_SYSKEYDOWN:
  467. ret =toupper(wParam);
  468. switch(ret)
  469. {
  470.     case 'H':
  471. SendMessage(ghWndHq, WM_KEYDOWN,VK_F1, 0L);
  472.     break; 
  473.     case 'J':
  474. SendMessage(ghWndHq, WM_KEYDOWN,VK_F2, 0L);
  475.     break; 
  476. case 'R':
  477. SendMessage(ghWndXlt, WM_KEYDOWN,VK_F3, 0L);
  478. break;
  479. case 'A':
  480. SendMessage(ghWndHq, WM_KEYDOWN,VK_F4, 0L);
  481. break;
  482. case 'Z':
  483. SendMessage(ghWndHq, WM_KEYDOWN,VK_F5, 0L);
  484. break;
  485. case 'W':
  486. SendMessage(ghWndHq, WM_KEYDOWN,VK_F6, 0L);
  487. break;
  488. case 'S':
  489. SendMessage(ghWndHq, WM_KEYDOWN,VK_F7, 0L);
  490. break;
  491. case 'F':
  492. SendMessage(ghWndHq, WM_KEYDOWN,VK_F8, 0L);
  493. break;
  494. case 'E':
  495. SendMessage(ghWndHq, WM_KEYDOWN,VK_F9, 0L);
  496. break; 
  497. case 'G':
  498. SendMessage(ghWndHq, WM_KEYDOWN,VK_F12, 0L);
  499. break;
  500. case 'Q':
  501. SendMessage(hWnd, WM_CLOSE,0, 0L);
  502. break;
  503. case '1':
  504. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  505. gfTest)
  506.                      DlgBuySell('B');
  507. break;
  508. case '2':
  509. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  510. gfTest)
  511.                      DlgBuySell('S');
  512. break;
  513. case '3':
  514. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  515. gfTest)
  516.                      DlgCancel();
  517. break;
  518. case '4':
  519. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  520. gfTest)
  521.                      DlgCjcx();
  522. break;
  523. case '5':
  524. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  525. gfTest)
  526.                      DlgWtcx();
  527. break;
  528. case '6':
  529. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  530. gfTest)
  531.                      DlgYecx();
  532. break;
  533. case '7':
  534. if((curChkUsrRes.userId !=0 && curChkUsrRes.flag==ANS_SUCC)||
  535. gfTest)
  536.                      DlgChgPwd();
  537. break;
  538. }
  539. break;
  541. case WM_TIMER:
  542. if(wParam ==2 && gfOnLine)
  543. CheckTime(TRUE);
  544. if(wParam ==1)
  545. {   
  546. KillTimer(ghWndMain,1);
  548. if(gfConnecting &&!gfOnLine)
  549. {
  550. ErrMsg(hWnd, "连接主机失败，系统进入离线状态");
  551. PostMessage(hWnd,WM_USER+3,0,0L);
  552. }
  553. Ip_Send_Pack();
  555.     //if(JyOffLineTime>0)
  556.               // JyOffLineTime--;
  557.               //if(JyOffLineTime==0)
  558.               //{
  559.               // Msg("交易连接时间过长，系统复位",MSG_VERT);
  560.               //   curChkUsrRes.userId=0;
  561.               //} 
  562.              
  563.               //if(JyOffLineTime<10&&JyOffLineTime*(int)JyOffLineTime/2==JyOffLineTime
  564.               // &&JyOffLineTime>0)
  565.               // DrawTime(-2);
  566.               //else
  567. DrawTime(-1);
  569.               SetTimer(ghWndMain,1,400,NULL);
  570. }
  571. if(wParam ==6) DestroyWindow(hWnd);
  572. break;
  574. case WM_CHAR:
  575. if(ghWndSetup==NULL)
  576. {
  577. SendMessage(ghWndMsg, WM_CHAR, wParam, lParam);
  578. return 0;
  579. }
  580. break;
  581. case WM_KEYDOWN:
  582. if(wParam==VK_RETURN)
  583. {
  584. GetWindowText(hWndInput, inkey, sizeof(inkey));
  585.     ret =PreComm(inkey);
  586.     switch(ret)
  587.     {
  588.      case IP_CONN_COMM:
  589. strcpy(HostName,inkey);
  590. strcpy(inkey,"");
  591.      SendMessage(hWnd, WM_USER+4, 0, 0L);
  592.      SetWindowText(hWndInput, "");     
  593.      break;
  594. case NULL_COMM:     
  595.      case OP_CODE_COMM:
  596.      case GP_CODE_COMM:
  597. if(IsWindowVisible(ghWndFx))
  598. SendMessage(ghWndFx, WM_KEYDOWN, wParam, lParam);
  599. else if(IsWindowVisible(ghWndXlt))
  600. SendMessage(ghWndXlt, WM_KEYDOWN, wParam, lParam);
  601. else SendMessage(ghWndHq, WM_KEYDOWN, wParam, lParam);     
  602.      break;
  603.      case PY_NAME_COMM:
  604.      if(winpy==NULL)
  605.      break;
  606.      for(i=0;i<10;i++) SeleGp[i][0]=-1;
  607.     
  608. for(i =0,j=0; i<HqData[0].recCount&&j<MAX_SELE_NUM; i++)
  609. {
  610. strcpy(temp,HqData[0].lpPreData[i].zqmc);
  611. PreStockName(temp);
  613. if(IsPyOk(inkey,temp))
  614. {
  615. SeleGp[j][0]=0;
  616. SeleGp[j++][1]=i;
  617. }
  618. }
  619. for(i =0; i<HqData[1].recCount&&j<MAX_SELE_NUM; i++)
  620. {
  621. strcpy(temp,HqData[1].lpPreData[i].zqmc);
  622. PreStockName(temp);
  624. if(IsPyOk(inkey,temp))
  625. {
  626. SeleGp[j][0]=1;
  627. SeleGp[j++][1]=i;
  628. }
  629. }
  631. if(SeleGp[1][0]!=-1)
  632. {
  633. i=DlgSelectGp();
  634. if(i!=-1)
  635. if(SeleGp[i][0]!=-1)
  636. SetWindowText(hWndInput, HqData[SeleGp[i][0]].lpPreData[SeleGp[i][1]].zqdm);
  637. }
  638. else
  639. {
  640.   if(SeleGp[0][0]!=-1)
  641. SetWindowText(hWndInput, HqData[SeleGp[0][0]].lpPreData[SeleGp[0][1]].zqdm);
  642. }
  643. if(IsWindowVisible(ghWndFx))
  644. SendMessage(ghWndFx, WM_KEYDOWN, wParam, lParam);
  645. else if(IsWindowVisible(ghWndXlt))
  646. SendMessage(ghWndXlt, WM_KEYDOWN, wParam, lParam);
  647. else SendMessage(ghWndHq, WM_KEYDOWN, wParam, lParam);     
  648.      break;
  649.     }
  650.     strcpy(inkey,"");
  651.     SetWindowText(hWndInput, "");
  652. }
  653. else
  654. {
  655. if(IsWindowVisible(ghWndXlt))
  656. SendMessage(ghWndXlt, WM_KEYDOWN, wParam, lParam);
  657. else if(IsWindowVisible(ghWndFx))
  658. SendMessage(ghWndFx, WM_KEYDOWN, wParam, lParam);
  659. else SendMessage(ghWndHq, WM_KEYDOWN, wParam, lParam);
  660. }
  661. break;
  662. case WM_KILLFOCUS:
  663. if(IsWindowVisible(ghWndFx))
  664. SendMessage(ghWndFx, WM_KILLFOCUS, wParam, lParam);
  665. else SendMessage(ghWndXlt, WM_KILLFOCUS, wParam, lParam);
  666. break;
  667. case WM_CLOSE:
  668. if(MessageBox(hWnd, "您是否确定要退出?",APPNAME,
  669. MB_YESNO|MB_ICONQUESTION|MB_DEFBUTTON2|MB_SYSTEMMODAL)
  670. ==IDNO)
  671. return 0L;
  672. UDP_Send_Exit();
  673. SetTimer(hWnd, 6, 1000,NULL);
  674. gfOnLine = FALSE;
  675. //DestroyWindow(hWnd);
  676. break;
  678. case WM_DESTROY:
  679. WriteHqDataAll();
  680. ghWndMain =NULL;
  681. KillTimer(hWnd, 1);
  682. KillTimer(hWnd, 2);
  683. KillTimer(hWnd, 5);
  684. KillTimer(hWnd, 6);
  685. PostQuitMessage(0);
  686. break;
  688. case WM_COMMAND:
  689. switch(wParam)
  690. {
  691. case IDM_ONLINE:
  692. SetHqEnv();
  693. break;
  695. case IDM_VIEW_TOOLBAR:
  696. if(IsWindowVisible(ghWndToolBar))
  697. {
  698.     ShowWindow(ghWndFx, SW_HIDE);
  699. ShowWindow(ghWndToolBar, SW_HIDE);
  700. ModifyMenu(ghMenuMain, IDM_VIEW_TOOLBAR, MF_STRING|MF_BYCOMMAND,
  701. IDM_VIEW_TOOLBAR, "显示工具条");
  702. TOOLBAR_HEIGHT=0;
  703. ReCreateChild();
  704. }
  705. else
  706. {
  707. ShowWindow(ghWndFx, SW_HIDE);
  708. ShowWindow(ghWndToolBar, SW_SHOW);
  709. ModifyMenu(ghMenuMain, IDM_VIEW_TOOLBAR, MF_STRING|MF_BYCOMMAND,
  710. IDM_VIEW_TOOLBAR, "隐藏工具条");
  711. TOOLBAR_HEIGHT=BUTTON_HEIGHT +12;
  712. ReCreateChild();
  713. }
  714. break;
  715. case IDM_HQ_SZ:
  716. case IDM_HQ_SH:
  717. case IDM_HQSEL_1:
  718. case IDM_HQSEL_2:
  719. case IDM_HQSEL_3:
  720. case IDM_HQSEL_4:
  721. case IDM_HQSEL_5:
  722. case IDM_GRAPH:
  723. SendMessage(ghWndHq, WM_COMMAND, wParam, 0L);
  724. break;
  726. case IDM_HQSEL_SET_1:
  727. case IDM_HQSEL_SET_2:
  728. case IDM_HQSEL_SET_3:
  729. case IDM_HQSEL_SET_4:
  730. case IDM_HQSEL_SET_5:
  731. lpFarProc =MakeProcInstance((FARPROC)HqSelDlgProc, ghInstance);
  732. DialogBoxParam(ghInstance, MAKEINTRESOURCE(IDD_HQSEL_SET),
  733. hWnd, lpFarProc, (LPARAM)wParam);
  734. FreeProcInstance(lpFarProc);
  735. break;
  737. case IDM_HQ_FLD_SEL:
  738. lpFarProc =MakeProcInstance((FARPROC)HqFldSelDlgProc, ghInstance);
  739. DialogBox(ghInstance, MAKEINTRESOURCE(IDD_FLDSEL),
  740. hWnd, lpFarProc);
  741. FreeProcInstance(lpFarProc);
  742. break;
  743. //case IDM_SORT_REFRESH:
  744. // UDP_Client_Hq01(HqPaintData.jys, TRUE);
  745. //break;
  746. case IDM_JY:
  747. jy_running =TRUE;
  748. Jy();
  749. jy_running =FALSE;
  750. break;
  751. case IDM_MINIMIZE:
  752. ShowWindow(hWnd, SW_MINIMIZE);
  753. break;
  754. case IDM_FX:
  755. case IDM_FX_MACD:
  756. case IDM_FX_DMI:
  757. case IDM_FX_RSI:
  758. case IDM_FX_PSY:
  759. case IDM_FX_VR:
  760. case IDM_FX_OBV:
  761. case IDM_FX_BIAS:
  762. case IDM_FX_WR:
  763. case IDM_FX_KDJ:
  764. for(i=IDM_FX_MACD;i<=IDM_FX_KDJ;i++)
  765. {
  766.                      if(GetMenuState(ghMenuMain, i, MF_BYCOMMAND)&MF_CHECKED)
  767.                              break;
  768. }
  769. if((unsigned int)i!= wParam)
  770. {
  771. CheckMenuItem(ghMenuMain, i, MF_BYCOMMAND|MF_UNCHECKED);
  772. CheckMenuItem(ghMenuMain, wParam, MF_BYCOMMAND|MF_CHECKED);
  773. if(i<=IDM_FX_KDJ) Fx->type =i;
  774. else Fx->type =IDM_FX_MACD;
  775. }
  776. Fx->IsDataOk=FALSE;
  777.     SendMessage(ghWndHq,WM_KEYDOWN,VK_F9,0L);
  778. break;
  779. case IDM_FX_5:
  780. case IDM_FX_15:
  781. case IDM_FX_30:
  782. case IDM_FX_60:
  783. case IDM_FX_DAY:
  784. case IDM_FX_WEEK:
  785. case IDM_FX_MONTH:
  786. for(i=0;i<MONTH+1;i++)
  787. if(RANGE_MENU[i]==wParam) break;
  788. if(i<MONTH+1)
  789. {
  790. CheckMenuItem(ghMenuMain, wParam, MF_BYCOMMAND|MF_CHECKED);
  791. CheckMenuItem(ghMenuMain,RANGE_MENU[Fx->range], MF_BYCOMMAND|MF_UNCHECKED);
  792. Fx->range =i;
  793. }
  794. if(IsWindowVisible(ghWndFx))
  795. {
  796. Fx->IsDataOk=FALSE;
  797. InvalidateRect(ghWndFx, NULL, TRUE);
  798. }
  799. break;
  800. case IDM_NEWS:
  801.      SendMessage(ghWndHq,WM_KEYDOWN,VK_F12,0L);
  802. break;
  803. case IDM_HELP:
  804.      SendMessage(ghWndHq,WM_KEYDOWN,VK_F1,0L);
  805. break;
  806. case IDM_SZDP:
  807. SendMessage(ghWndHq, WM_COMMAND, IDM_GRAPH, 3L);
  808. break;
  809. case IDM_SHDP:
  810.     SendMessage(ghWndHq, WM_COMMAND, IDM_GRAPH, 4L);
  811. break;
  812. case IDM_GGXX:
  813.      SendMessage(ghWndHq,WM_KEYDOWN,VK_F3,0L);
  814. break;
  815. case IDM_EXIT:
  816. SendMessage(hWnd, WM_CLOSE, 0, 0L);
  817. break;
  819. default:
  820. if(IsWindowVisible(ghWndHq))
  821. SendMessage(ghWndHq, WM_COMMAND, wParam, lParam);
  822. //else if(IsWindowVisible(ghWndXlt))
  823. // SendMessage(ghWndXlt, WM_COMMAND, wParam, lParam);
  824.      else if(IsWindowVisible(ghWndFx))
  825. SendMessage(ghWndFx ,WM_COMMAND, wParam, lParam);
  826. break;
  827. }
  828. break;
  829. }
  831. return DefWindowProc(hWnd, message, wParam, lParam);
  832. }
  834. LRESULT CALLBACK HqSelDlgProc(HWND hDlg, UINT message,
  835. WPARAM wParam, LPARAM lParam)
  836. {
  837. int i, k;
  838. char tmp[256];
  839. static int SelNum;
  840. DWORD dw;
  841. HWND hctl;
  842. int sel_num[MAX_HQSEL_REC_COUNT+1];
  843. LPSTR tok;
  845. switch(message)
  846. {
  847. case WM_INITDIALOG:
  848. ghDlgJy =hDlg;
  849. SendMessage(hDlg,WM_USER+1,wParam,lParam);
  850. return TRUE;
  851. case WM_USER+1:
  852. SelNum =(int)lParam-IDM_HQSEL_SET_1;
  854. if(SelNum >=5)
  855. {
  856. EndDialog(hDlg, 0);
  857. return FALSE;
  858. }
  859. k =0;
  860. if(HqSelData[SelNum].recCount <=0)
  861. HqSelData[SelNum].jys =HqPaintData.jys;
  862. for(i =0; i<HqData[HqSelData[SelNum].jys].recCount; i++)
  863. {
  864. if(HqData[HqSelData[SelNum].jys].lpPreData[i].zqdm[0] ==0)
  865. continue;
  866. wsprintf(tmp, "%s-%d-%s",
  867. (LPSTR)HqData[HqSelData[SelNum].jys].lpPreData[i].zqdm,
  868. i, (LPSTR)HqData[HqSelData[SelNum].jys].lpPreData[i].zqmc);
  869. if(HqSelData[SelNum].recCount)
  870. {
  871. if(HqSelData[SelNum].recNum[k] ==i && k<HqSelData[SelNum].recCount)
  872. {
  873. SendDlgItemMessage(hDlg, IDL_SEL, LB_ADDSTRING,
  874. 0, (LPARAM)(LPSTR)tmp);
  875. k++;
  876. continue;
  877. }
  878. }
  879. SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_ADDSTRING,
  880. 0, (LPARAM)(LPSTR)tmp);
  881. }
  882. return TRUE;
  883. case WM_COMMAND:
  884. switch(wParam)
  885. {
  886. case IDC_ADD:
  887. dw =SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_GETSELCOUNT, 0, 0L);
  888. if(dw ==LB_ERR) break;
  889. if((int)dw >MAX_HQSEL_REC_COUNT)
  890. {
  891. wsprintf(tmp, "最大可选数量不能超过%d", MAX_HQSEL_REC_COUNT);
  892. ErrMsg(hDlg, tmp);
  893. break;
  894. }
  895. if(SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_GETSELITEMS, (int)dw,
  896. (LPARAM)(int FAR *)&sel_num[0]) ==LB_ERR)
  897. break;
  899. for(i =0; i<(int)dw; i++)
  900. {
  901. if(SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_GETTEXT, sel_num[i],
  902. (LPARAM)(LPSTR)tmp) ==LB_ERR)
  903. {
  904. ErrMsg(hDlg, "Error LB_GETTEXT");
  905. break;
  906. }
  907. SendDlgItemMessage(hDlg, IDL_SEL, LB_ADDSTRING, i,
  908. (LPARAM)(LPSTR)tmp);
  909. }
  910. for(i =(int)dw -1; i>=0; i--)
  911. SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_DELETESTRING, sel_num[i], 0L);
  913. hctl =GetDlgItem(hDlg, IDOK);
  914. EnableWindow(hctl, TRUE);
  915. break;
  916.     
  917.     case IDC_DEL:
  918. dw =SendDlgItemMessage(hDlg, IDL_SEL, LB_GETSELCOUNT, 0, 0L);
  919. if(dw ==LB_ERR) break;
  920. if(SendDlgItemMessage(hDlg, IDL_SEL, LB_GETSELITEMS, (int)dw,
  921. (LPARAM)(int FAR *)&sel_num[0]) ==LB_ERR)
  922. break;
  924. for(i =0; i<(int)dw; i++)
  925. {
  926. if(SendDlgItemMessage(hDlg, IDL_SEL, LB_GETTEXT, sel_num[i],
  927. (LPARAM)(LPSTR)tmp) ==LB_ERR)
  928. {
  929. ErrMsg(hDlg, "Error LB_GETTEXT");
  930. break;
  931. }
  932. SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_ADDSTRING, i,
  933. (LPARAM)(LPSTR)tmp);
  934. }
  935. for(i =(int)dw -1; i>=0; i--)
  936. SendDlgItemMessage(hDlg, IDL_SEL, LB_DELETESTRING, sel_num[i], 0L);
  938. hctl =GetDlgItem(hDlg, IDOK);
  939. EnableWindow(hctl, TRUE);
  940. break;
  941.     
  942. case IDOK:
  943. k =(int)SendDlgItemMessage(hDlg, IDL_SEL, LB_GETCOUNT, 0, 0L);
  944. if(k >MAX_HQSEL_REC_COUNT)
  945. {
  946. wsprintf(tmp, "最大可选数量不能超过%d", MAX_HQSEL_REC_COUNT);
  947. ErrMsg(hDlg, tmp);
  948. break;
  949. }
  951. for(i =0; i<k; i++)
  952. {
  953. if(SendDlgItemMessage(hDlg, IDL_SEL, LB_GETTEXT, i,
  954. (LPARAM)(LPSTR)tmp) ==LB_ERR)
  955. {
  956. ErrMsg(hDlg, "get list text failed!");
  957. break;
  958. }
  959. tok =strtok(tmp, "-");
  960. if(!tok)
  961. break;
  962. else tok =strtok(NULL, "-");
  963. if(!tok) break;
  964. HqSelData[SelNum].recNum[i] =atoi(tok);
  965. }
  966. HqSelData[SelNum].recCount =i;
  967. if(HqPaintData.type ==SelNum+2)
  968. SendMessage(ghWndHq, WM_HQSEL_RESET, SelNum+2, 0L);
  969. case IDCANCEL:
  970. EndDialog(hDlg, 0);
  971. ghDlgJy =NULL;
  972. break;
  973. break;
  974. }
  975. }
  977. return FALSE;
  978. } 
  980. LRESULT CALLBACK HqFldSelDlgProc(HWND hDlg, UINT message,
  981. WPARAM wParam, LPARAM lParam)
  982. {
  983. int i, j;
  984. char tmp[256];
  985. DWORD dw;
  986. HWND hctl;
  987. LPSTR tok;
  989. switch(message)
  990. {
  991. case WM_INITDIALOG:
  992. ghDlgJy =hDlg;
  993. for(i =0; i<HqPaintData.fldCount; i++)
  994. {
  995. wsprintf(tmp, "%d-%s", HqPaintData.fldNum[i],
  996. HqTitles[HqPaintData.fldNum[i]]);
  997. SendDlgItemMessage(hDlg, IDL_SEL, LB_ADDSTRING,
  998. 0, (LPARAM)(LPSTR)tmp);
  999. }
  1000. for(i =0; i<HQ_FLDS_COUNT+1; i++)
  1001. {
  1002. wsprintf(tmp, "%d-%s", i, HqTitles[i]);
  1003. for(j =0; j<HqPaintData.fldCount; j++)
  1004. {
  1005. if(HqPaintData.fldNum[j] ==i)
  1006. break;
  1007. }
  1008. if(j ==HqPaintData.fldCount)
  1009. SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_ADDSTRING,
  1010. 0, (LPARAM)(LPSTR)tmp);
  1011. }
  1012. return TRUE;
  1014. /*case WM_CTLCOLOR:
  1015. SetBkMode((HDC)wParam, TRANSPARENT);
  1016. if(HIWORD(lParam) == CTLCOLOR_LISTBOX)
  1017. return (LRESULT)DrawChild((HDC)wParam, (HWND)LOWORD(lParam));
  1018. return (LRESULT)(HBRUSH)GetStockObject(LTGRAY_BRUSH);
  1019. break;
  1021. case WM_NCACTIVATE:
  1022. if(WinVer >3) break;
  1023. DrawDlgFrame(hDlg, (BOOL)wParam, 1);
  1024. return TRUE;
  1026. case WM_NCPAINT:
  1027. if(WinVer >3) break;
  1028. DrawDlgFrame(hDlg, -1, 0);
  1029. return TRUE;   
  1030.     */
  1031. case WM_COMMAND:
  1032. switch(wParam)
  1033. {
  1034. case IDC_ADD:
  1035. dw =SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_GETCURSEL, 0, 0L);
  1036. if(dw ==LB_ERR) break;
  1037. i =(int)dw;
  1038. if(SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_GETTEXT, i,
  1039. (LPARAM)(LPSTR)tmp) ==LB_ERR)
  1040. {
  1041. ErrMsg(hDlg, "Error LB_GETTEXT");
  1042. break;
  1043. }
  1044. SendDlgItemMessage(hDlg, IDL_SEL, LB_ADDSTRING, i,
  1045. (LPARAM)(LPSTR)tmp);
  1047. SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_DELETESTRING, i, 0L);
  1049. hctl =GetDlgItem(hDlg, IDOK);
  1050. EnableWindow(hctl, TRUE);
  1051. break;
  1052.     
  1053.     case IDC_DEL:
  1054. dw =SendDlgItemMessage(hDlg, IDL_SEL, LB_GETCURSEL, 0, 0L);
  1055. if(dw ==LB_ERR) break;
  1056. i =(int)dw;
  1057. if(SendDlgItemMessage(hDlg, IDL_SEL, LB_GETTEXT, i,
  1058. (LPARAM)(LPSTR)tmp) ==LB_ERR)
  1059. {
  1060. ErrMsg(hDlg, "Error LB_GETTEXT");
  1061. break;
  1062. }
  1063. SendDlgItemMessage(hDlg, IDL_NOTSEL, LB_ADDSTRING, i,
  1064. (LPARAM)(LPSTR)tmp);
  1065. SendDlgItemMessage(hDlg, IDL_SEL, LB_DELETESTRING, i, 0L);
  1067. hctl =GetDlgItem(hDlg, IDOK);
  1068. EnableWindow(hctl, TRUE);
  1069. break;
  1070.     
  1071. case IDOK:
  1072. j =(int)SendDlgItemMessage(hDlg, IDL_SEL, LB_GETCOUNT, 0, 0L);
  1074. for(i =0; i<j; i++)
  1075. {
  1076. if(SendDlgItemMessage(hDlg, IDL_SEL, LB_GETTEXT, i,
  1077. (LPARAM)(LPSTR)tmp) ==LB_ERR)
  1078. {
  1079. ErrMsg(hDlg, "get list text failed!");
  1080. break;
  1081. }
  1082. tok =strtok(tmp, "-");
  1083. if(!tok) break;
  1084. HqPaintData.fldNum[i] =atoi(tok);
  1085. }
  1086. HqPaintData.fldCount =i;
  1087. if(IsWindowVisible(ghWndHq))
  1088. SendMessage(ghWndHq, WM_USER +1, 0, 0L);
  1089. case IDCANCEL:
  1090. EndDialog(hDlg, 0);
  1091. ghDlgJy =NULL;
  1092. break;
  1093. break;
  1094. }
  1095. }
  1097. return FALSE;
  1098. }
  1100. extern void WriteMsg(LPSTR);
  1101. BOOL ErrMsg(HWND hWnd, LPSTR msg)
  1102. {
  1103. char tmp[256];
  1104. HWND hwnd;
  1106. WriteMsg(msg);
  1107. if(strlen(msg)>=250) *(msg+250) =0;
  1108. wsprintf(tmp, "错误: %s", msg);
  1109. if(ghDlgJy) hwnd =ghDlgJy;
  1110. else if(hwnd ==NULL) hwnd =ghWndMain;
  1111. else hwnd =hWnd;
  1112. MessageBox(hwnd, tmp, APPNAME, MB_OK|MB_ICONSTOP);
  1113. return FALSE;
  1114. }
  1116. BOOL GetInitString(char *Entry, char *Item, char *buf)
  1117. {
  1118. GetPrivateProfileString(Entry, Item, "", buf, 256, "st_cl.ini");
  1119. if(*buf ==0) return FALSE;
  1120. return TRUE;
  1121. }
  1123. BOOL PutInitString(char *Entry, char *Item, char *buf)
  1124. {
  1125. return WritePrivateProfileString(Entry, Item, buf, "st_cl.ini");
  1126. }
  1128. int CheckTime(BOOL fRead)
  1129. {
  1130. char tmp[15];
  1131. LPSTR tok;
  1132. int tim, jys;
  1133. static int recNum =0;
  1134. BOOL fret =FALSE;
  1136. _strtime(tmp);
  1137. tok =strtok(tmp, ":");
  1138. tim =atoi(tok)*60;
  1139. tim +=atoi(strtok(NULL, ":"));
  1140. tim -=1;
  1141. for(jys =0; jys <2; jys++)
  1142. {
  1143. if(tim <HqTime[jys].am_min_start
  1144. || tim >HqTime[jys].pm_min_start+HqTime[jys].pm_min_count
  1145. || (tim <HqTime[jys].pm_min_start 
  1146. && tim >HqTime[jys].am_min_start+HqTime[jys].am_min_count))
  1147. {
  1148. //if(HqTime[jys].fRunning ==TRUE)
  1149. //HqTime[jys].fRunning =FALSE;
  1150. }
  1151. else if(HqTime[jys].fRunning ==FALSE)
  1152. {
  1153. HqTime[jys].fRunning =TRUE;     
  1154. if(fRead)
  1155. {
  1156.     //if(!gfConnecting&&gfOnLine)
  1157.     //{
  1158. // if(UDP_Send_Hq00(0, TRUE, FALSE, FALSE, HqPaintData.curRecCount, &recNum)<0)
  1159. // {
  1160. // ErrMsg(ghWndMain, "UDP_Send_Hq00 failed");
  1161. // DestroyWindow(ghWndMain);
  1162. // return FALSE;
  1163. // }
  1164. //}
  1165. fret =TRUE;
  1166. }
  1167. }
  1168. }
  1169. return fret;
  1170. }
  1172. int SaveSet(void)
  1173. {
  1174. int i, j;
  1175. char tmp[6000], tmp1[256];
  1177. for(i =0; i<5; i++)
  1178. {
  1179. sprintf(tmp, "%d,%d", HqSelData[i].jys, HqSelData[i].recCount);
  1180. for(j =0; j<HqSelData[i].recCount; j++)
  1181. {
  1182. //HqData[HqSelData[i].jys].lpPreData[j].zqdm
  1183. //sprintf(&tmp[strlen(tmp)], ",%d", HqSelData[i].recNum[j]);
  1184. sprintf(&tmp[strlen(tmp)], ",%s", HqData[HqSelData[i].jys].lpPreData[HqSelData[i].recNum[j]].zqdm);
  1185. }
  1186. sprintf(tmp1, "HQSEL%d", i);
  1187. PutInitString("HQSEL", tmp1, tmp);
  1188. }
  1189. sprintf(tmp, "%d", HqPaintData.fldCount);
  1190. for(i =0; i<HqPaintData.fldCount; i++)
  1191. {
  1192. sprintf(&tmp[strlen(tmp)], ",%d", HqPaintData.fldNum[i]);
  1193. }
  1194. PutInitString("HQ", "FLDS", tmp);
  1196. return 0;
  1197. }
  1199. int GetSet(void)
  1200. {
  1201. int i ;//, j;
  1202. char tmp[1000]; //, tmp1[20];
  1203. LPSTR tok;
  1204.         
  1205. /*        
  1206. for(i =0; i<5; i++)
  1207. {
  1208. sprintf(tmp1, "HQSEL%d", i);
  1209. if(!GetInitString("HQSEL", tmp1, tmp))
  1210. {
  1211. HqSelData[i].recCount =0;
  1212. continue;
  1213. }
  1214. if(!(tok =strtok(tmp, ","))) continue;;
  1215. HqSelData[i].jys =atoi(tok);
  1216. if(HqSelData[i].jys <0) HqSelData[i].jys =0;
  1217. if(HqSelData[i].jys >=2) HqSelData[i].jys =1;
  1218. if(!(tok =strtok(NULL, ","))) continue;
  1219. HqSelData[i].recCount =atoi(tok);
  1220. for(j =0; j<HqSelData[i].recCount; j++)
  1221. {
  1222. if(!(tok =strtok(NULL, ","))) break;
  1223. HqSelData[i].recNum[j] =atoi(tok);
  1225. }
  1226. HqSelData[i].recCount =j;
  1227. }
  1228. */
  1229. if(!GetInitString("HQ", "FLDS", tmp))
  1230. {
  1231. HqPaintData.fldCount =0;
  1232. return 0;
  1233. }
  1234. if(!(tok =strtok(tmp, ",")))
  1235. {
  1236. HqPaintData.fldCount =0;
  1237. return 0;
  1238. }
  1239. HqPaintData.fldCount =atoi(tok);
  1240. for(i =0; i<HqPaintData.fldCount; i++)
  1241. {
  1242. if(!(tok =strtok(NULL, ","))) break;
  1243. HqPaintData.fldNum[i] =atoi(tok);
  1244. }
  1245. HqPaintData.fldCount =i;
  1247. return 0;
  1248. }
  1251. int GetSelSet(void)
  1252. {
  1253. int i, j,k;
  1254. char tmp[6000], tmp1[20];
  1255. LPSTR tok;
  1257. for(i =0; i<5; i++)
  1258. {
  1259. sprintf(tmp1, "HQSEL%d", i);
  1260. if(!GetInitString("HQSEL", tmp1, tmp))
  1261. {
  1262. HqSelData[i].recCount =0;
  1263. continue;
  1264. }
  1265. if(!(tok =strtok(tmp, ","))) continue;;
  1266. HqSelData[i].jys =atoi(tok);
  1267. if(HqSelData[i].jys <0) HqSelData[i].jys =0;
  1268. if(HqSelData[i].jys >=2) HqSelData[i].jys =1;
  1269. if(!(tok =strtok(NULL, ","))) continue;
  1270. HqSelData[i].recCount =atoi(tok);
  1271. for(j =0; j<HqSelData[i].recCount; j++)
  1272. {
  1273. if(!(tok =strtok(NULL, ","))) break;
  1274. HqData[HqSelData[i].jys].lpPreData[HqSelData[i].recNum[j]].zqdm;
  1275. for(k=0;k<HqData[HqSelData[i].jys].recCount;k++)
  1276. {
  1277. if(strncmp(tok,HqData[HqSelData[i].jys].lpPreData[k].zqdm,
  1278. strlen(tok))==0)
  1279. break;
  1280. }     
  1281. if(k<HqData[HqSelData[i].jys].recCount)
  1282. HqSelData[i].recNum[j] =k;
  1283. else
  1284. continue;
  1286. }
  1287. HqSelData[i].recCount =j;
  1288. }
  1290. return 0;
  1291. }
  1293. BOOL RegisterChilds(void)
  1294. {
  1295. if(!RegisterHq())
  1296. {
  1297. ErrMsg(NULL, "Error Register HQ");
  1298. return FALSE;
  1299. }
  1301. if(!RegisterXlt())
  1302. {
  1303. ErrMsg(NULL, "Error Register JgGraph");
  1304. return FALSE;
  1305. }
  1307. if(!RegisterJlt())
  1308. {
  1309. ErrMsg(NULL, "Error Register JltGraph");
  1310. return FALSE;
  1311. }
  1313. if(!RegisterStatus())
  1314. {
  1315. ErrMsg(NULL, "Error Register Status");
  1316. return FALSE;
  1317. }
  1319. if(!RegisterCaption())
  1320. {
  1321. ErrMsg(NULL, "Error Register Caption");
  1322. return FALSE;
  1323. }
  1325. if(!RegisterMmp())
  1326. {
  1327. ErrMsg(NULL, "Error Register Mmp");
  1328. return FALSE;
  1329. }
  1331. if(!RegisterCj())
  1332. {
  1333. ErrMsg(NULL, "Error Register Cj");
  1334. return FALSE;
  1335. }
  1336. if(!RegisterLitHq())
  1337. {
  1338. ErrMsg(NULL, "Error Register LitHq");
  1339. return FALSE;
  1340. }
  1341. if(!RegisterMaxMin())
  1342. {
  1343. ErrMsg(NULL, "Error Register LitHq");
  1344. return FALSE;
  1345. }
  1346. if(!RegisterZs())
  1347. {
  1348. ErrMsg(NULL, "Error Register Zs");
  1349. return FALSE;
  1350. }
  1351.     if(!RegisterFx())
  1352. {
  1353. ErrMsg(NULL, "Error Register Fx");
  1354. return FALSE;
  1355. }
  1356.     if(!RegisterToolBar())
  1357. {
  1358. ErrMsg(NULL, "Error Register ToolBar");
  1359. return FALSE;
  1360. }
  1361. if(!RegisterHelp())
  1362. {
  1363. ErrMsg(NULL, "Error Register Help");
  1364. return FALSE;
  1365. }
  1366. if(!RegisterMsg())
  1367. {
  1368. ErrMsg(NULL, "Error Register Msg");
  1369. return FALSE;
  1370. }
  1372. return TRUE;    
  1373. }
  1375. BOOL CreateChilds(HWND hWnd)
  1376. {
  1377. if(!CreateWndHq(hWnd))
  1378. {
  1379. ErrMsg(hWnd, "CreateWndHq failed!");
  1380. return FALSE;
  1381. }
  1382. if(!CreateWndStatus(hWnd))
  1383. {
  1384. ErrMsg(hWnd, "CreateWndStatus failed!");
  1385. return FALSE;
  1386. }
  1387. if(!CreateWndCaption(hWnd))
  1388. {
  1389. ErrMsg(hWnd, "CreateWndCaption failed!");
  1390. return FALSE;
  1391. }
  1392. if(!CreateWndXlt(hWnd))
  1393. {
  1394. ErrMsg(hWnd, "CreateWndXlt failed!");
  1395. return FALSE;
  1396. }
  1397. if(!CreateWndJlt(hWnd))
  1398. {
  1399. ErrMsg(hWnd, "CreateWndJlt failed!");
  1400. return FALSE;
  1401. }
  1402. if(!CreateWndMmp(hWnd))
  1403. {
  1404. ErrMsg(hWnd, "CreateWndMmp failed!");
  1405. return FALSE;
  1406. }
  1407. if(!CreateWndCj(hWnd))
  1408. {
  1409. ErrMsg(hWnd, "CreateWndCj failed!");
  1410. return FALSE;
  1411. }
  1412. if(!CreateWndLitHq(hWnd))
  1413. {
  1414. ErrMsg(hWnd, "CreateWndLitHq failed!");
  1415. return FALSE;
  1416. }
  1417. if(!CreateWndMaxMin(hWnd))
  1418. {
  1419. ErrMsg(hWnd, "CreateWndMaxMin failed!");
  1420. return FALSE;
  1421. }
  1422. if(!CreateWndZs(hWnd))
  1423. {
  1424. ErrMsg(hWnd, "CreateWndZs failed!");
  1425. return FALSE;
  1426. }
  1427.     if(!CreateWndFx(hWnd))
  1428. {
  1429. ErrMsg(hWnd, "CreateWndFx failed!");
  1430. return FALSE;
  1431.     }
  1432.     if(!CreateToolBar(hWnd))
  1433. {
  1434. ErrMsg(hWnd, "CreateWnd ToolBar failed!");
  1435. return FALSE;
  1436.     }
  1437.     if(!CreateWndHelp(hWnd))
  1438. {
  1439. ErrMsg(hWnd, "CreateWnd Help!");
  1440. return FALSE;
  1441.     }
  1442.     if(!CreateWndMsg(hWnd))
  1443. {
  1444. ErrMsg(hWnd, "CreateWnd Msg!");
  1445. return FALSE;
  1446.     }
  1447. return TRUE;
  1448. }
  1450. void PASCAL ShowBmp(HDC hDC,HBITMAP hBmp,int left,int top,int width,int height)
  1451. {
  1452.   HDC hMemDC = CreateCompatibleDC(hDC);
  1453.   
  1454.   if(hBmp)
  1455.   {
  1456.     SelectObject(hMemDC,hBmp);
  1457.     BitBlt(hDC,left,top,width,height,hMemDC,0,0,SRCCOPY);
  1458.   }         
  1459.   DeleteObject(hMemDC);
  1460. }
  1462. void PASCAL ShowBmp1(HDC hDC,HBITMAP hBmp,int left,int top,int width,int height)
  1463. {
  1464.   BITMAP bmp;
  1465.   HDC hMemDC = CreateCompatibleDC(hDC);
  1466.   
  1467.   GetObject(hBmp, sizeof(BITMAP), &bmp);
  1468.   if(hBmp)
  1469.   {
  1470.     SelectObject(hMemDC,hBmp);
  1471.     StretchBlt(hDC,left,top,width,height,hMemDC,0,0,
  1472. bmp.bmWidth, bmp.bmHeight,SRCCOPY);
  1473.   }         
  1474.   DeleteObject(hMemDC);
  1475. }
  1477. LRESULT CALLBACK HelpWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam);
  1479. BOOL RegisterHelp(void)
  1480. {
  1481. WNDCLASS wc;
  1483. memset(&wc, 0, sizeof(wc));
  1484. wc.style =CS_HREDRAW | CS_VREDRAW;
  1485. wc.lpfnWndProc =HelpWndProc;
  1486. wc.lpszClassName ="HELP";
  1487. wc.hbrBackground =GetStockObject(BLACK_BRUSH);
  1488. wc.hInstance = ghInstance;
  1489. wc.lpszMenuName = NULL;
  1490. wc.hCursor = LoadCursor(NULL, IDC_ARROW);        
  1491. wc.hIcon = LoadIcon(ghInstance, MAKEINTRESOURCE(IDR_MAINFRAME));
  1492. if(!RegisterClass(&wc)) return FALSE;
  1494. return TRUE;
  1495. }
  1498. int LoadFile(char *filename,int sline,char *title)
  1499. {
  1500.     static char infile[80];
  1501.     ShowWindow(ghWndHelp,SW_SHOW);
  1502.     SetFocus(ghWndHelp);
  1503. if(strlen(filename)!=0)
  1504. {
  1505.      strcpy(infile,filename);
  1506.      SendMessage(ghWndHelp,WM_USER+2,(UINT)sline,(LPARAM)filename);
  1507.     }
  1508.     if(strlen(title)!=0)
  1509.      SetWindowText(ghWndHelp,title);
  1510.  
  1511.     return 1;
  1512. }
  1514. #define MAX_LINE_CHARS 200
  1515. #define MAX_DISP_LINE 300
  1516. char *PageBuff[MAX_DISP_LINE];
  1518. int LoadPage(char *filename,int lstart,int lnum)
  1519. {
  1520.     
  1521.     FILE *fp;
  1522.     int i,j=0;
  1523.     char line[MAX_LINE_CHARS+1];
  1524.     
  1525. fp=fopen(filename,"rt");
  1526. if(fp==NULL)  return -1;
  1528. if(lnum ==0) lnum =MAX_DISP_LINE;
  1529.     for(i=0;i<lstart+lnum;i++)
  1530.     {
  1531.      if(fgets(line,MAX_LINE_CHARS,fp)==NULL)
  1532.      break;
  1533.      if(i<lstart) continue;
  1534.      if(PageBuff[j] ==NULL)
  1535.      PageBuff[j] =(char *)GlobalAllocPtr(GHND,MAX_LINE_CHARS*sizeof(char));
  1536.      if(PageBuff[j]==NULL)
  1537.      break;
  1538.      memset(PageBuff[j],' ',MAX_LINE_CHARS);
  1539.      strcpy(PageBuff[j++],line);
  1540.     }
  1541. fclose(fp);
  1542.     return j;
  1543. }
  1545. extern int UDP_Send_Stock_Info(STOCK_INFO_FRAME *StockInfoFrame);
  1548. LRESULT CALLBACK HelpWndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
  1549. {
  1550. PAINTSTRUCT ps;
  1551. RECT rc;
  1552. static char file[256];
  1553. static int sline=0,
  1554.    TolNum=0,
  1555.    minRange,maxRange,step,LinePerScr,CurSor=0;
  1556. int pos;
  1557.     char line[256];
  1558.     int i,j;
  1559.     STOCK_INFO_FRAME StockInfo;
  1560.     HDC hdc;
  1561.     TEXTMETRIC tm;
  1562. static int FontHeight;
  1564. switch(message)
  1565. {
  1566. case WM_CREATE:
  1567. hdc =GetDC(hWnd);
  1568. SelectObject(hdc,GetStockObject(SYSTEM_FIXED_FONT));
  1569. GetTextMetrics(hdc, &tm);
  1570. FontHeight =tm.tmHeight;
  1571. FontHeight +=FontHeight*15/100;
  1572. ReleaseDC(hWnd, hdc);
  1574. SetScrollRange(hWnd,SB_VERT,0,5000,TRUE);
  1575. GetScrollRange(hWnd,SB_VERT,&minRange,&maxRange);
  1576. GetClientRect(hWnd, &rc);
  1577. LinePerScr  =(rc.bottom -rc.top)/FontHeight;
  1578. memset(PageBuff,0,sizeof(char *)*MAX_DISP_LINE);
  1579. break;
  1580. case WM_SIZE:
  1581. GetClientRect(hWnd, &rc);
  1582. LinePerScr  =(rc.bottom -rc.top)/FontHeight;
  1583. if(TolNum>0)
  1584. step = maxRange/TolNum;
  1585. break;
  1586. case WM_USER+2:
  1587. strcpy(file,(LPSTR)lParam);
  1588. TolNum=sline =CurSor=0;
  1590. TolNum =LoadPage(file,sline,0);
  1591. if(TolNum>0) 
  1592. {
  1593. step = maxRange/TolNum;
  1594. InvalidateRect(ghWndHelp, NULL, TRUE);
  1595. }
  1596. else
  1597. SetTimer(hWnd,1,1000,NULL);
  1599. break;
  1600. case WM_VSCROLL:
  1601. pos=GetScrollPos(hWnd,SB_VERT);
  1602. if(wParam==SB_BOTTOM)
  1603. sline=TolNum -1;
  1604. if(wParam==SB_LINEDOWN)
  1605. if(sline<TolNum) sline++;
  1606. if(wParam==SB_PAGEDOWN)
  1607. if(sline+LinePerScr<=TolNum) sline+=LinePerScr;
  1608. if(wParam==SB_PAGEUP)
  1609. {
  1610. if(sline -LinePerScr>=0) 
  1611. sline -=LinePerScr;
  1612. else 
  1613. sline=0;
  1614. }
  1615. if(wParam==SB_LINEUP) if(sline>0) sline--;
  1616. if(wParam==SB_TOP) sline=0;
  1617. pos=step*sline ;
  1618. SetScrollPos(hWnd,SB_VERT,pos,TRUE);
  1619. InvalidateRect(ghWndHelp, NULL, TRUE);
  1620. break;
  1621. case WM_KEYDOWN:
  1622. if(wParam==VK_ESCAPE)
  1623. {
  1624. SetScrollPos(hWnd,SB_VERT,0,TRUE);
  1625. ShowWindow(hWnd,SW_HIDE);
  1626. KillTimer(hWnd,1);
  1627. for(i=0;i<TolNum;i++) 
  1628. {
  1629. GlobalFreePtr(PageBuff[i]);
  1630. PageBuff[i] =NULL;
  1631. }
  1632. TolNum=sline =CurSor=0;
  1633. break;
  1634. }
  1635. pos=GetScrollPos(hWnd,SB_VERT);
  1637. if(wParam==VK_UP)
  1638. {   
  1639. if(TolNum>0)
  1640. {
  1641. hdc =GetDC(hWnd);
  1642. SelectObject(hdc,GetStockObject(SYSTEM_FIXED_FONT));
  1643. SetBkColor(hdc, RGB(0, 0, 0));
  1644. SetTextColor(hdc, RGB(10,150,100));
  1645. TextOut(hdc,2,CurSor*FontHeight,PageBuff[sline+CurSor],
  1646. strlen(PageBuff[sline+CurSor])-1);
  1648.   if(CurSor>0) CurSor--; 
  1649. SetTextColor(hdc, RGB(0,255,255));
  1650. TextOut(hdc,2,CurSor*FontHeight,PageBuff[sline+CurSor],
  1651. strlen(PageBuff[sline+CurSor])-1);
  1653.   ReleaseDC(hWnd,hdc);
  1654.   }
  1655.   break;
  1656. }
  1658. if(wParam==VK_DOWN) 
  1659. {   
  1660. if(TolNum>0)
  1661. {
  1662. hdc =GetDC(hWnd);
  1663. SelectObject(hdc,GetStockObject(SYSTEM_FIXED_FONT));
  1664. SetBkColor(hdc, RGB(0, 0, 0));
  1665. SetTextColor(hdc, RGB(10,150,100));
  1666. TextOut(hdc,2,CurSor*FontHeight,PageBuff[sline+CurSor],
  1667. strlen(PageBuff[sline+CurSor])-1);
  1669. if(CurSor<LinePerScr &&CurSor +sline <TolNum-1) 
  1670. CurSor++;
  1671. SetTextColor(hdc, RGB(0,255,255));
  1672. TextOut(hdc,2,CurSor*FontHeight,PageBuff[sline+CurSor],
  1673. strlen(PageBuff[sline+CurSor])-1);
  1674.   ReleaseDC(hWnd,hdc);
  1675. }
  1676. break;
  1677. }
  1679. if(wParam==VK_NEXT)
  1680. {   
  1681. if(TolNum>0)
  1682. {
  1683. CurSor =0;
  1684. if(sline+LinePerScr<TolNum)
  1685. sline+=LinePerScr;
  1686. else
  1687. {
  1688. sline =TolNum -LinePerScr -1;
  1689. if(sline <0) sline =0;
  1690. }
  1691. }
  1692. }
  1693. if(wParam==VK_PRIOR)
  1694. {
  1695. if(TolNum>0)
  1696. {
  1697. CurSor =LinePerScr -1;
  1698. if(sline -LinePerScr>=0) 
  1699. sline -=LinePerScr;
  1700. else 
  1701. sline=0;
  1702. }
  1703. }
  1704. if(wParam ==VK_RETURN)
  1705. {   
  1707. if(TolNum>0)
  1708. {
  1709. if(strstr(strupr(file),"IDX")!=NULL)
  1710.         {
  1711. StockInfo.type= 2;
  1712. strncpy(line,PageBuff[sline+CurSor],12);
  1713. line[12] =0;
  1714. for(i=0;i<12;i++)
  1715. {
  1716. if(line[i]!=' ') break;
  1717. }
  1718. if(i<12)
  1719. {
  1720. strcpy(StockInfo.name,&line[i]);
  1721.      sprintf(file,"%s\%s",szDataPath,&line[i]);
  1722.      TolNum=sline =CurSor=0;
  1723.      UDP_Send_Stock_Info(&StockInfo);
  1724.      SetTimer(hWnd,1,3000,NULL);
  1725.      }
  1726.      }
  1727.     }
  1728. }
  1729. pos=step*sline ; 
  1730. SetScrollPos(hWnd,SB_VERT,pos,TRUE);
  1731. InvalidateRect(ghWndHelp, NULL, TRUE);
  1732. break;
  1733. case WM_TIMER:
  1734. KillTimer(hWnd,1);
  1735. TolNum =LoadPage(file,sline,0);
  1736. if(TolNum>0) 
  1737. {
  1738. step = maxRange/TolNum;
  1739. InvalidateRect(ghWndHelp, NULL, TRUE);
  1740. }
  1741. else
  1742. SetTimer(hWnd,1,1000,NULL);
  1743. break;
  1744. //case WM_KILLFOCUS:
  1745. // KillTimer(hWnd,1);
  1746. //break;
  1747. case WM_PAINT:
  1748. BeginPaint(hWnd, &ps);
  1749. SelectObject(ps.hdc,GetStockObject(SYSTEM_FIXED_FONT));
  1750. SetBkColor(ps.hdc, RGB(0, 0, 0));
  1752.      for(i=sline,j=0;i<TolNum&&i<=LinePerScr+sline;i++,j++)
  1753.      {
  1754.      memset(line,' ',256);
  1755.      TextOut(ps.hdc,2,j*FontHeight,line,256);
  1756.     
  1757.      if(j==CurSor)
  1758.      SetTextColor(ps.hdc, RGB(0,255,255));
  1759.      else
  1760.      SetTextColor(ps.hdc, RGB(10,150,100));
  1761.      TextOut(ps.hdc,2,j*FontHeight,PageBuff[i],strlen(PageBuff[i])-1);
  1762.      }
  1763. EndPaint(hWnd, &ps);
  1764. break;
  1765. case WM_DESTROY:
  1766. KillTimer(hWnd,1);
  1767. break;
  1768. default:
  1769. break;
  1770. }
  1771. return DefWindowProc(hWnd, message, wParam, lParam);
  1772. }
  1775. BOOL CreateWndHelp(HWND hWnd)
  1776. {                          
  1777. int x ;
  1778. HWND hwnd;
  1779. RECT rc;
  1781. GetClientRect(ghWndMain, &rc);
  1782. x =GetSystemMetrics(SM_CXSCREEN);
  1784. if(ghWndHelp ==NULL)
  1785. {
  1786. hwnd =CreateWindow("HELP", "在线帮助[ESC退出]", WS_POPUP|WS_CAPTION|WS_HSCROLL|WS_VSCROLL|WS_THICKFRAME,
  1787. 0, 
  1788. STATUS_HEIGHT-2+TOOLBAR_HEIGHT,
  1789. x, 
  1790. rc.bottom -rc.top -STATUS_HEIGHT*2-TOOLBAR_HEIGHT+2,
  1791. NULL, NULL, ghInstance, NULL);
  1792. if(hwnd ==NULL)
  1793. {
  1794. ErrMsg(hWnd, "Error create help window");
  1795. return FALSE;
  1796. }
  1798. ghWndHelp =hwnd;
  1799. ShowWindow(hwnd, SW_HIDE);
  1800. }
  1801. return TRUE;
  1802. }
  1803.     
  1804. int ReCreateChild(void)
  1805. {
  1806. PostMessage(ghWndHq,WM_CLOSE,0,0L);
  1807. PostMessage(ghWndStatus,WM_CLOSE,0,0L);
  1808. //PostMessage(ghWndCaption,WM_CLOSE,0,0L);
  1809. PostMessage(ghWndXlt,WM_CLOSE,0,0L);
  1810. PostMessage(ghWndJlt,WM_CLOSE,0,0L);
  1811. PostMessage(ghWndMmp,WM_CLOSE,0,0L);
  1812. PostMessage(ghWndCj,WM_CLOSE,0,0L);
  1813. PostMessage(ghWndLitHq,WM_CLOSE,0,0L);
  1814. PostMessage(ghWndMaxMin,WM_CLOSE,0,0L);
  1815. PostMessage(ghWndZs,WM_CLOSE,0,0L);
  1816. PostMessage(ghWndFx,WM_CLOSE,0,0L);
  1817. ghWndHq=ghWndXlt=ghWndJlt=ghWndMmp=NULL;
  1818. ghWndCj = ghWndLitHq =ghWndMaxMin =ghWndZs =NULL;
  1819. ghWndFx =NULL;
  1820. ghWndStatus =NULL;
  1821. //PostMessage(ghWndToolBar,WM_CLOSE,0,0L);
  1822. if(!CreateChilds(ghWndMain)) 
  1823. return -1;
  1824.     else
  1825.       return 0;
  1826. }