線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1299
推到 Plurk!
推到 Facebook!

如何隨機產生圓點 並隨機移動?

答題得分者是:harpist
saiz
一般會員


發表:5
回覆:1
積分:1
註冊:2006-12-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-04-29 21:09:36 IP:59.104.xxx.xxx 訂閱
如題,因為作業需求 要做出隨機圓點 隨機移動的樣子
不過BCB的元件一堆...我也不知要用哪些元件才可以
請問要如何在FORM的一個給定範圍內 產生隨機的圓點,要給編碼 顯示出來
然後讓其隨機移動 還要可以改變移動速度.
要做到這些功能 要用到哪些元件呢?
感謝各位了.只要提示用哪些元件 大概概念就好了.程式我自己努力~
多謝了~
harpist
資深會員


發表:3
回覆:251
積分:430
註冊:2002-10-03

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-04-30 00:28:13 IP:59.104.xxx.xxx 未訂閱
<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, 註解 打錯字...= ="‧
系統時間:2024-05-16 22:47:24
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!