導航:首頁 > 數據行情 > delphi讀取股票數據

delphi讀取股票數據

發布時間:2022-06-20 09:04:46

『壹』 delphi如何從資料庫中讀取數據啊。我剛學delphi

定義數組
var
arr: array of string;
遍歷結果集
with DataMole2.ADODataSet1 do
begin
setlength(arr, recordcount);// 動態數組設定長度
first;
while not eof do
begin
arr[recno - 1] := FieldByName('Username').AsStringl; // 數組賦值
next;
end;
end;

『貳』 怎樣用delphi寫一個程序來讀取從串口讀取來的數據,並顯示出來。

假設你的下位機是通過一個命令(A)讀取出這兩個值,一個溫度值和一個濕度值,那麼你可以先配置好串口組件的相關參數,然後打開串口,再用write命令發出去,然後你的單片機收到這個命令後,就立即返回當前的兩個值,上位機收到後再進行解析就可以了,如果你的下位機返回的是電壓值的話,上位機還需要根據你的電路計算出對應的溫度和濕度值。

『叄』 如何使用DELPHI編程從資料庫中讀取相關數據

1、放置ADOconnection控制項;
2、放置ADOtable控制項 或 查詢控制項;
3、放置 DataSource 控制項;
4、放置 DBGrid 控制項;
5、在ADOconnection控制項中設置好連接串,選擇數據表、打開數據表;
6、控制項 2~4 分別指向前一個控制項

『肆』 如何用C程序實現 讀取DAT股票文件數據

int a = 0x19554c32;
這樣就能拿到數據,但讀文件的時要二進制打開讀,就是fopen("數據文件名「,"rb");
然後fread讀,都到一個buf里,讓後將buf按照你的類型強轉就行。

『伍』 如何獲取實時的股票數據

要跟供應商協商得到他的介面才能得到實時股票行情數據;
股票實時行情,可以通過兩個方法來進行查看:
第一種,在網路搜索頁面直接輸入股票代碼,如:000717,網路輸入後,即可在搜索結果中看到,其中分時,就是該股票在當天的實時走向。

第二種,通過炒股軟體,如東財,同花順等,在開啟後,直接輸入,股票代碼,如600854,點擊回車。進入的第一個頁面就是該股票在當天的實時行情。

同時在股票軟體的分時成交界面,可以查看到每一分鍾的成交價和手數。股票行情趨勢判斷必要時也需要結合分時成交界面的數據來進行判斷。

查看其它股票的行情也是一樣的道理,直接鍵入該股票的代碼就可以查看到該股票當天或某個時間段內的行情。當然,精準的行情走勢、趨勢,是需要結合多種指標來共同進行分析的。

『陸』 下載能一個通達信股票數讀取的Delphi文本源代碼,如何編譯編軟體請高手指點

光是這個文件可不夠,還有其它文件吧。
如果文件齊了,裡面應該包含一個.dpr文件(或者.groupproj,或者.bpg),你在Delphi裡面打開它,然後在Delphi的菜單裡面選擇Build All。如果下載的文件們沒問題的話,你就能得到想要的軟體了。

『柒』 delphi怎樣得到實時股票行情數據

實時股票行情數據,如果是商業性的需要服務費用,通常可以通過網路上各大股票網站站點來獲取發布的行情數據,比如以下是從 sina 網的行情數據伺服器上獲取 滬市601006 的行情:


http://hq.sinajs.cn/list=sh601006

訪問上面的url會返回一串文本,內容格式如:

varhq_str_sh600151="航天機電,11.020,10.980,10.950,
11.040,10.940,10.950,10.960,2634001,28909081.000,
9300,10.950,34300,10.940,55700,10.930,64000,10.920,
75900,10.910,22500,10.960,22192,10.970,20600,
10.980,50900,10.990,100300,11.000,2016-11-08,10:55:19,00";


然後對上面的數據進行文字解析就可以了。

『捌』 delphi怎麼讀取資料庫里的數據

結果就在這個ADOQUERY1的數據集裡面了。可以用1、AdoQuery1.Fieldbyname('欄位名').Value2、AdoQuery1.Fields[0].Value //因為你只有取一個欄位的值,所以直接數組0就可以了

『玖』 delphi怎麼讀取數據採集卡的採集的數據

現在世界上的計算機都只能處理數字信號,必須把模擬信號經過采樣轉換成數字信號才能處理。根據數字信號的輸出類型,採用不用的介面(232、485、RJ-45等等)接入到計算機。如果是232,你可以用mscomm,但如果是RJ-45,那就很可能用TCP了。

『拾』 如何編程從免費股票軟體中提取實時數據

自己寫程序的話,一種方法是從已提供的信息源,例如webservice獲取數據。還有種辦法就是去連接提供即時信息的網頁硬解析。

代碼舉例如下:

Created on Thu Jul 23 09:17:27 2015
@author: jet
"""
DAY_PRICE_COLS = ['date', 'open', 'high', 'close', 'low', 'volume',
'chg', '%chg', 'ma5', 'ma10', 'ma20',
'vma5', 'vma10', 'vma20', 'turnover']
DAY_PRICE_URL = '%sapi.finance.%s/%s/?code=%s&type=last'
INDEX_KEY = ['SH', 'SZ', 'HS300', 'SZ50', 'GEB', 'SMEB']
INDEX_LIST = {'SH': 'sh000001', 'SZ': 'sz399001', 'HS300': 'sz399300',
'SZ50': 'sh000016', 'GEB': 'sz399006', 'SMEB': 'sz399005'}
INDEX_DAY_PRICE_COLS= ['date', 'open', 'high', 'close', 'low', 'volume',
'chg', '%chg', 'ma5', 'ma10', 'ma20',
'vma5', 'vma10', 'vma20']
K_TYPE_KEY = ['D', 'W', 'M']
K_TYPE_MIN_KEY = ['5', '15', '30', '60']
K_TYPE = {'D': 'akdaily', 'W': 'akweekly', 'M': 'akmonthly'}
MIN_PRICE_URL = '%sapi.finance.%s/akmin?scode=%s&type=%s'
PAGE_TYPE = {'http': 'http://', 'ftp': 'ftp://'}
PAGE_DOMAIN = {'sina': 'sina.com.cn', 'ifeng': 'ifeng.com'}
URL_ERROR_MSG = '獲取失敗,請檢查網路狀態,或者API埠URL已經不匹配!'

get_hist_data.py
# -*- coding: utf-8 -*-
"""
Created on Thu Jul 23 09:15:40 2015
@author: jet
"""
import const as ct
import pandas as pd
import json
from urllib2 import urlopen,Request

def get_hist_data(code = None, start = None, end = None, ktype = 'D'):
"""
功能:
獲取個股歷史交易數據
--------
輸入:
--------
code:string
股票代碼 比如:601989
start:string
開始日期 格式:YYYY-MM-DD 為空時取到API所提供的最早日期數據
end:string
結束日期 格式:YYYY-MM-DD 為空時取到最近一個交易日數據
ktype:string(default=D, 函數內部自動統一為大寫)
數據類型 D=日K線,W=周K線,M=月K線,5=5分鍾,15=15分鍾
30=30分鍾,60=60分鍾
輸出:
--------
DataFrame
date 日期
open 開盤價
high 最高價
close 收盤價
low 最低價
chg 漲跌額
p_chg 漲跌幅
ma5 5日均價
ma10 10日均價
ma20 20日均價
vma5 5日均量
vma10 10日均量
vma20 20日均量
turnover換手率(指數無此項)
"""
code = code_to_APIcode(code.upper())
ktype = ktype.upper()

url = ''
url = get_url(ktype, code)
print(url)

js = json.loads(ping_API(url))
cols = []

if len(js['record'][0]) == 14:
cols = ct.INDEX_DAY_PRICE_COLS
else:
cols = ct.DAY_PRICE_COLS
df = pd.DataFrame(js['record'], columns=cols)

if ktype in ct.K_TYPE_KEY:
df = df.applymap(lambda x:x.replace(u',', u''))
for col in cols[1:]:
df[col]=df[col].astype(float)
if start is not None:
df = df [df.date >= start]
if end is not None:
df = df[df.date <= end]
df = df.set_index('date')
return df

def code_to_APIcode(code):
"""
功能:
驗證輸入的股票代碼是否正確,若正確則返回API對應使用的股票代碼
"""
print(code)
if code in ct.INDEX_KEY:
return ct.INDEX_LIST[code]
else:
if len(code) != 6:
raise IOError('code input error!')
else:
return 'sh%s'%code if code[:1] in ['5', '6'] else 'sz%s'%code

def get_url(ktype, code):
"""
功能:
驗證輸入的K線類型是否正確,若正確則返回url
"""
if ktype in ct.K_TYPE_KEY:
url = ct.DAY_PRICE_URL % (ct.PAGE_TYPE['http'], ct.PAGE_DOMAIN['ifeng'],
ct.K_TYPE[ktype], code)
return url
elif ktype in ct.K_TYPE_MIN_KEY:
url = ct.MIN_PRICE_URL % (ct.PAGE_TYPE['http'], ct.PAGE_DOMAIN['ifeng'],
code, ktype)
return url
else:
raise IOError('ktype input error!')

def ping_API(url):
"""
功能:
向API發送數據請求,若鏈接正常返回數據
"""
text = ''
try:
req = Request(url)
text = urlopen(req,timeout=10).read()
if len(text) < 15:
raise IOError('no data!')
except Exception as e:
print(e)
else:
return text

#測試入口
print(get_hist_data('601989','2015-07-11','2015-07-22'))

閱讀全文

與delphi讀取股票數據相關的資料

熱點內容
司爾特股票最新分析 瀏覽:874
2017有望摘帽的st股票 瀏覽:851
晶弘並入格力對格力影響股票 瀏覽:504
為什麼中國石油股票跌得這么厲害 瀏覽:853
麥捷科技股票診斷 瀏覽:365
銀行調整利率對股票有何影響 瀏覽:921
石頭科技股票票 瀏覽:356
最新的科創板股票 瀏覽:266
股票軟體早盤刷新很慢 瀏覽:636
最小市值股票募集配套資金 瀏覽:503
與COT指數類似的股票指標 瀏覽:268
百度員工可以買百度股票嗎 瀏覽:963
東方財富登錄股票賬戶安全嗎 瀏覽:244
中國股票有哪家是獨立題材 瀏覽:748
股票給是固定資產 瀏覽:255
股票強制退市後怎樣賣出 瀏覽:342
大智慧股票軟體ipad 瀏覽:23
股票賬戶號泄露怎麼辦 瀏覽:587
地平線員工有股票嗎 瀏覽:26
海信家電股票能長期持有嗎 瀏覽:337