請教關於tchart問題？ |
|
尚未結案
|
|
se0528
一般會員   發表：13 回覆：22 積分：7 註冊：2005-05-04 發送簡訊給我 |
我參考過站上文章，寫出下列程式，其中利用ScrollBar去調整3D圖形的Elevation及Rotation，但是旋轉的方向卻相反，請問是哪裡出錯了？謝謝！！
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Double w[10][10]={{1.557457701,0.831335071,1.119905835,0.018420816,1.672962333,0.524936653,-0.387613143,-1.074548219,-1.077867614,-1.273438631},{0.669734901,0.20047528,-1.160229775,-0.346260131,-1.041648341,-2.256085543,1.101486363,-1.912996599,1.358805317,0.297500684},{-0.015225891,1.191818622,1.013308963,-0.066472509,1.576859508,-0.582201526,-2.120532889,0.460155605,-0.493741108,-1.603283867}};
for (int i=1; i<=10; i )
{
Series1->AddXY(i,w[0][i-1]);
Series2->AddXY(i,w[1][i-1]);
Series3->AddXY(i,w[2][i-1]);
}
}
//--------------------------------------------------------------------------- void __fastcall TForm1::ScrollBar2Change(TObject *Sender)
{
if (ScrollBar2->Enabled) {
Chart1->View3DOptions->Orthogonal=false;
Chart1->View3DOptions->Rotation=ScrollBar2->Position;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ScrollBar1Change(TObject *Sender)
{
if (ScrollBar1->Enabled) {
Chart1->View3DOptions->Orthogonal=false;
Chart1->View3DOptions->Elevation=ScrollBar1->Position;
}
}
//---------------------------------------------------------------------------
|
|
se0528
一般會員 發表：13 回覆：22 積分：7 註冊：2005-05-04 發送簡訊給我 |
發表時間：2005-06-25 09:15:42
IP:163.28.xxx.xxx 未訂閱
系統時間：2024-06-18 7:36:15
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |