SD王_Client_主窗口 uMain
1. FormCreate
CheckVerModify;// 檢查版本
FREList:=TStringList.Create; //客戶端發送的請求命令列表
FillChar(GADSDate, SizeOf(TAdsLstNewDateRec), $0); // 用0填充, TAdsLstNewDateRec -- ADS功能日期列最新日期結構
CreateDynamicStockNameClientSocket; // 創建網絡連接 Socket
CreateDynamicAWClientSocket;
GOPTEvent := CreateEvent(nil, True, True, 'OPTEVENT'); // 多線程,創建事件 四個系統內核對象(事件、互斥、信號、計時器)
ResetEvent(GOPTEvent);