PS/2 mouse 可以讀出移動的data數據嗎? |
尚未結案
|
cccheng
一般會員 發表:8 回覆:19 積分:5 註冊:2002-05-30 發送簡訊給我 |
|
bestlong
站務副站長 發表:126 回覆:734 積分:512 註冊:2002-10-19 發送簡訊給我 |
1. 讀取滑鼠游標的座標請使用 OnMouseMove 事件來讀取
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
Label1.Caption := IntToStr(x);
Label2.Caption := IntToStr(y);
end; 2. 讀取 Mouse 左右鍵請用 OnMouseDown 事件來處理
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if Button in [mbLeft] then Label3.Caption := '左鍵';
if Button in [mbRight] then Label3.Caption := '右鍵';
if Button in [mbMiddle] then Label3.Caption := '中鍵';
end; 我是雪龍
------
http://blog.bestlong.idv.tw/ http://www.bestlong.idv.tw/ http://delphi-ktop.bestlong.idv.tw/ |
cccheng
一般會員 發表:8 回覆:19 積分:5 註冊:2002-05-30 發送簡訊給我 |
|
cmf
尊榮會員 發表:84 回覆:918 積分:1032 註冊:2002-06-26 發送簡訊給我 |
|
cccheng
一般會員 發表:8 回覆:19 積分:5 註冊:2002-05-30 發送簡訊給我 |
|
cmf
尊榮會員 發表:84 回覆:918 積分:1032 註冊:2002-06-26 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |