標題: [發問] 請問呼叫函式後觸發的事件資訊回傳 [打印本頁]

---

作者: tompi    時間: 2016-4-13 16:19     標題: 請問呼叫函式後觸發的事件資訊回傳

各位好
   因為群益期貨近日要更換下單元件，目前看該如何轉換
   以前有範例程式還滿好改的，而新的元件除了使用的函數說明
   剩下要使用者自己弄了。

1. Dim SKord As SKOrderLib
   
2. 
   
3. Sub SK_Ord_Int()
   
4.   Dim Status As Variant
   
5.   Set SKord = New SKOrderLib
   
6.   
   
7.   Status = SKord.SKOrderLib_Initialize           '下單元件初始
   
8.   Status = Status + SKord.GetUserAccount  '取得使用者帳號資訊
   
9.       '?? 不知該如何觸發OnAccount  得到回傳資料
   
10.   If Status = 0 Then
    
11.      OTS.Cells(1, 2) = "登入成功"
    
12.     Else
    
13.      OTS.Cells(1, 2) = Status
    
14.      Status = 0
    
15.   End If
    
16.   
    
17.   Status = SKord.ReadCertByID("A*********")  '交易人身份帳號
    
18.   
    
19.   If Status = 0 Then
    
20.      OTS.Cells(1, 3) = "讀取憑證成功"
    
21.     Else
    
22.      OTS.Cells(1, 3) = Status
    
23.   End If
    
24.   
    
25. End Sub

複製代碼

其中
1.GetUserAccount
   取回目前可交易的所有帳號。資料由OnAccount事件回傳。

2.OnAccount
    帳號資訊。透過呼叫GetUserAccount後，帳號資訊由該事件回傳。
宣告        void OnAccount([in] BSTR bstrLogInID, [in] BSTR bstrAccountData  );
參數        bstrLogInID        登入ID
                bstrAccountData          帳號資訊。以逗點分隔每一個欄位，欄位依序為：
                     『市場,分公司,分公司代號,帳號,身份證字號,姓名』

物件瀏覽器視窗
[attach]23829[/attach]

說明文件
[attach]23830[/attach]

感謝諸位指導 謝謝

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)