關於TrackBar一問 |
尚未結案
|
bala0514
一般會員 發表:42 回覆:37 積分:15 註冊:2004-07-26 發送簡訊給我 |
我有一個直方圖的分佈圖!如圖1,我想利用TrackBar來在圖一上描繪直線,一直移動TrackBar,想要描繪一直線,但是,為何直線畫的出來,但是會一直顯示出先前移動位置上的直線,如圖二。故要如何移除先前所移動的直線,僅留下移動後所描繪出來的一條直線。謝謝,程式碼如下:
圖一
圖二
int now_x1; Image1->Canvas->Pen->Color=(TColor)RGB(0,255,255); Image1->Canvas->MoveTo(now_x1,0); Image1->Canvas->LineTo(now_x1,255); Image1->Canvas->MoveTo(TrackBar1->Position,0); Image1->Canvas->LineTo(TrackBar1->Position,255); now_x1=TrackBar1->Position; Edit1->Text=IntToStr(now_x1);***程式語言真是一門高深的學問*** 發表人 - taishyang 於 2005/04/12 11:28:54
------
***程式語言真是一門高深的學問*** |
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
您好:
放一個Image2在Image1上面,並將Transparent設為true,再試試下面的程式碼,
void __fastcall TForm1::FormCreate(TObject *Sender) { Form1->DoubleBuffered = true; } //------------------------------------------------------- void __fastcall TForm1::TrackBar1Change(TObject *Sender) { Image2->Picture = NULL; Image2->Canvas->Brush->Style=bsClear; Image2->Canvas->Pen->Color=(TColor)RGB(0,255,255); Image2->Canvas->MoveTo(TrackBar1->Position, 0); Image2->Canvas->LineTo(TrackBar1->Position, 255); }順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~> 發表人 - |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |