using SKCOMLib;
namespace SkcomTest
{
public partial class mainForm : Form
{
private SKCenterLib m_pSKCenter;
private SKQuoteLib m_pSKQuote;
private int m_nCode;
private void skcomInit()
{
m_pSKCenter = new SKCenterLib();
m_pSKQuote = new SKQuoteLib();
}
private void debugAdd(string str)
{
debugList.Items.Add(str);
}
private void skcomLogin()
{
m_nCode = m_pSKCenter.SKCenterLib_Login("accountID", "accountPWD");
if (m_nCode == 0)
debugAdd("登入成功");
else
debugAdd("帳號 or 密碼錯誤");
}
private void OnUpDateDataRow(SKSTOCK pStock)
{
if(pStock.bstrStockNo == "TX00")
outputLabel.Text = (pStock.nClose / (Math.Pow(10, pStock.sDecimal))).ToString();
else
outputLabel2.Text = (pStock.nClose / (Math.Pow(10, pStock.sDecimal))).ToString();
}
private void m_SKQuoteLib_OnNotifyQuote(short sMarketNo, short sStockIdx)
{
SKSTOCK pSKStock = new SKSTOCK();
m_pSKQuote.SKQuoteLib_GetStockByIndex(sMarketNo, sStockIdx, ref pSKStock);
OnUpDateDataRow(pSKStock);
}
private void m_SKQuoteLib_OnNotifyStockList(short sMarketNo, string bstrStockListData)
{
debugAdd(bstrStockListData);
}
private void skcomMonitor()
{
m_pSKQuote.OnNotifyQuote += new _ISKQuoteLibEvents_OnNotifyQuoteEventHandler(m_SKQuoteLib_OnNotifyQuote);
m_pSKQuote.OnNotifyStockList += new _ISKQuoteLibEvents_OnNotifyStockListEventHandler(m_SKQuoteLib_OnNotifyStockList);
m_nCode = m_pSKQuote.SKQuoteLib_EnterMonitor();
if (m_nCode == 0)
{
debugAdd("Monitor成功");
}
}
private void skcomRequestData()
{
short sPage = -1;
m_nCode = m_pSKQuote.SKQuoteLib_RequestStocks(ref sPage, "TX00,MTX00");
if (m_nCode == 0)
{
debugAdd("Request Data成功");
}
}
private void skconStockList()
{
m_nCode = m_pSKQuote.SKQuoteLib_RequestStockList(2);
if (m_nCode == 0)
{
debugAdd("Get Stock List成功");
}
}
public mainForm()
{
InitializeComponent();
skcomInit();
}
private void connectBtn_Click(object sender, EventArgs e)
{
skcomLogin();
}
private void dataBtn_Click(object sender, EventArgs e)
{
skcomMonitor();
}
private void dataBtn_Click_1(object sender, EventArgs e)
{
skcomRequestData();
}
private void listBtn_Click(object sender, EventArgs e)
{
skconStockList();
}
}
}
留言列表
