大家好    小弟目前在bcb6的介面上做了兩個按鍵    欲控制馬達的左右轉    目前是按一次(按了又放開)    就會透過rs232傳一數值至8051    想請教的是：    要如何能一直按住不放，而一直傳數值出去    而放開就不傳呢？    謝謝

我目前想到的方法如下，只是想法沒有實作 若有其他大大有更好的方法也請提出 1.增加個Timer物件，你的控制程式段寫在裡面，Timer的時間你自己定義，它會決定按著不放時，多久要轉一下 2.按鍵"按下"的事件中，把Timer Eable起來 3.按鍵"放開"的事件中，把Timer Diseable掉 發表人 - folkchen 於 2004/12/23 08:26:22

引言: 我目前想到的方法如下，只是想法沒有實作 若有其他大大有更好的方法也請提出 1.增加個Timer物件，你的控制程式段寫在裡面，Timer的時間你自己定義，它會決定按著不放時，多久要轉一下 2.按鍵"按下"的事件中，把Timer Eable起來 3.按鍵"放開"的事件中，把Timer Diseable掉 發表人 - folkchen 於 2004/12/23 08:26:22

>

「按下」 OnKeyDown 「放開」 OnKeyUp

引言: 「按下」 OnKeyDown 「放開」 OnKeyUp

folkchen大大您好 OnKeyDown和OnKeyUp是用來偵測鍵盤按鍵的(實驗的心得) 後來我用 > 下面是後來實現的 class="code"> //----------------------------------------------------------- void __fastcall TForm1::Button1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { a=0; do{ Memo1->Lines->Append("ABCDE"); Delay(1000); }while(a==0); } //----------------------------------------------------------- void __fastcall TForm1::Button1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { a=1; } //----------------------------------------------------------- void Delay(DWORD DT) //延遲一段時間 { long tt; tt = GetTickCount(); while(GetTickCount()-ttProcessMessages(); if(GetTickCount()-tt<=0) tt=GetTickCount(); } } //-----------------------------------------------------------

建議 OnMouseDown和OnKeyDown都指向同一個Function Up的部份亦同 ^^ 祝順心