如何隨機產生圓點 並隨機移動? |
答題得分者是:harpist
|
saiz
一般會員 發表:5 回覆:1 積分:1 註冊:2006-12-13 發送簡訊給我 |
|
harpist
資深會員 發表:3 回覆:251 積分:430 註冊:2002-10-03 發送簡訊給我 |
<textarea class="cpp" rows="10" cols="60" name="code">
Repaint();
RECT PosRect = {X-5,Y-5,X 5,Y 5};
Form1->Canvas->Brush->Color = clRed;
Form1->Canvas->Pen->Color = clBlue;
Form1->Canvas->Ellipse(PosRect);
Form1->Canvas->Brush->Color = Form1->Color;
Form1->Canvas->TextOutA(X 5,Y-20,"X=" AnsiString(X) " Y=" AnsiString(Y));
</textarea>
將這段程式放在FORM的MouseMove事件裡,你會看到一個圓點跟著滑鼠跑以及顯示滑鼠座標。 至於移動簡單的可以用內建Timer元件或用Thread。 ===================引 用 saiz 文 章=================== 如題,因為作業需求 要做出隨機圓點 隨機移動的樣子 不過BCB的元件一堆...我也不知要用哪些元件才可以 請問要如何在FORM的一個給定範圍內 產生隨機的圓點,要給編碼 顯示出來 然後讓其隨機移動 還要可以改變移動速度. 要做到這些功能 要用到哪些元件呢? 感謝各位了.只要提示用哪些元件 大概概念就好了.程式我自己努力~ 多謝了~
------
~§~迷時師渡,悟了自渡~§~
編輯記錄
harpist 重新編輯於 2007-04-30 00:29:11, 註解 打錯字...= ="‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |