如可將點繪成線? |
答題得分者是:李國維
|
enu
中階會員 發表:36 回覆:93 積分:55 註冊:2003-10-22 發送簡訊給我 |
各位先進好,請教一個問題,小弟現在從資料庫中將x、y座標取出了,可是要將它連線起來卻不知如何下手了,可否幫忙看看!感謝! while(ADOQuery1->Eof != true & ADOQuery2->Eof != true)
{
sxItem = "";
syItem="";
for(int i=0; i<=(ADOQuery1->Fields->Count-1); i )
{
sxItem = sxItem ADOQuery1->Fields->Fields[i]->AsString;
syItem = syItem ADOQuery2->Fields->Fields[i]->AsString;
sx=StrToInt(sxItem);
sy=StrToInt(syItem);
Form1->Canvas->LineTo(sx,sy);//這裡雖可直接畫線,可是因為沒有MoveTo的原始點,所以會有錯誤產生。
}
ADOQuery1->Next();
ADOQuery2->Next();
} 可否請教先進,要如何修改才可以將整個x、y座標繪出?感恩!
(ps.之前曾在資料庫程式設計討論區發問,應該不是資料庫的問題,所以沒人回應,在此請教了!)
|
李國維
高階會員 發表:42 回覆:287 積分:235 註冊:2003-02-07 發送簡訊給我 |
enu:
bool bFirst = false;
while(ADOQuery1->Eof != true & ADOQuery2->Eof != true)
{
sxItem = "";
syItem="";
for(int i=0; i<=(ADOQuery1->Fields->Count-1); i )
{
sxItem = sxItem ADOQuery1->Fields->Fields[i]->AsString;
syItem = syItem ADOQuery2->Fields->Fields[i]->AsString;
sx=StrToInt(sxItem);
sy=StrToInt(syItem);
if (bFirst == false)
{
Form1->Canvas->MoveTo(sx,sy);
bFirst = true;
}
else
{
Form1->Canvas->LineTo(sx,sy);//這裡雖可直接畫線,可是因為沒有MoveTo的原始點,所以會有錯誤產生。
Form1->Canvas->MoveTo(sx,sy);
}
}
ADOQuery1->Next();
ADOQuery2->Next();
}
不知道這是不是你所要的需求
|
enu
中階會員 發表:36 回覆:93 積分:55 註冊:2003-10-22 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |