 |
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 18094 |
|
引用:
最初由 hgt08161 發表
想數字字尾為3畫水平線,用程式
如:
7303
7343
7383
7403
7443
7483
...
畫水平線
N:=7493; //中心
PARTLINE(1,N) linedot coloryellow;
PARTLINE(1,N+10) linedot coloryellow;
PARTLINE(1,N-10) linedot coloryellow;
PARTLINE(1,N+20) linedot coloryellow;
PARTLINE(1,N-20) linedot coloryellow;
PARTLINE(1,N+30) linedot coloryellow;
PARTLINE(1,N-30) linedot coloryellow;
PARTLINE(1,N+40) linedot coloryellow;
PARTLINE(1,N-40) linedot coloryellow;
如此一直下去....
要畫幾條就要幾行 PARTLINE
|
|
向版主報告此篇 |  |
|
2012-10-29 09:38 |
|
|
| |
|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 18094 |
|
另一種取巧的做法, 不用N條寫N行
但K棒數要足夠用
每多一根K棒, 可多畫兩條
原碼:
NN:=C*0;
NNSt:=7123; //最高
NNSp:=10; //間隔
for i=1 to 30 do begin //上下各畫30條
if datacount-i<1 then break;
NN[datacount-i]:=i*NNSp;
end;
DRAWSL(1,NNSt,0,0,2) linedot pxdn2 coloryellow;
DRAWSL(1,NNSt+NN,0,0,2) linedot pxdn2 coloryellow;
DRAWSL(1,NNSt-NN,0,0,2) linedot pxdn2 coloryellow;
|
|
向版主報告此篇 | |
|
|
2012-10-29 10:06 |
|
|
| |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|
