※ 引述《waykao (waykao)》之銘言：
: 各位高手
: 想要請教一下
: 我用mousemove
: Private Sub Form_mousemove(Button As Integer, Shift As Integer, X As Single, Y As Single)
: If Button = 1 Then Line -(X, Y), RGB(0, 100, 255)
: Form1.CurrentX = X
: Form1.CurrentY = Y
: End Sub
: 讓使用者能夠在圖上畫出一個曲線(圖上有x-y座標)
: 可是我想將它所畫出的每一個點都存起來(我原先是有想過用矩陣f(n)=y,可
: 是他都存不進去)
: 希望高手們幫幫忙幫我解決這個問題
: 謝謝
除非你有別的用途
不然單純畫連續曲線的話是可以不用把座標都存下來
開兩個single變數紀錄座標(舉例oldX,oldY)
一個布林變數(true,false)紀錄是否在畫圖(以下稱為繪圖模式)
在mouse_down事件而滑鼠按下左鍵時啟動繪圖模式
而相對的在mouse_up要取消
在mouse_move中，如果是處於繪圖模式
就用line畫oldX,oldY-X,Y
然後將oldx,oldY更新為X,Y
而為了避免放開滑鼠後又按下時程式多畫一條從上次結束的點連過來的線
所以啟動繪圖模式時要指定oldX=X, oldY=Y
這樣是只要按下滑鼠
拖曳經過的地方就會有黑線
由於是由極短的直線構成所以看似曲線
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.216.80.74