SD王_Client_主窗口 uMain

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);