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

如何在影像內點選將其值用if迴圈分別寫入

答題得分者是:taishyang
barryHsu
一般會員


發表:55
回覆:49
積分:20
註冊:2005-01-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-03-02 02:09:42 IP:163.18.xxx.xxx 未訂閱
假如目前有擷取到影像如下圖所示。 我現在將滑鼠點選可以得到其座標值,但是我想要用IF的迴圈將圖中的八個EDIT分別擷取到座標值,不知道這樣可以做得到ㄇ?     
 
void __fastcall TForm1::Panel2MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y) { TPoint P; int choice; Edit7->Text=choice; GetCursorPos(&P); P = ScreenToClient(P); Caption = IntToStr(P.x) " : " IntToStr(P.y); if(choice=1) { EdtX1->Text=X-320; EdtY1->Text=Y-218; } else if(choice=2) { Edit1->Text=X; Edit2->Text=Y; } else if(choice=3) { Edit3->Text=X; Edit4->Text=Y; } else if(choice=4) { Edit5->Text=X; Edit6->Text=Y; } }
barryHsu
一般會員


發表:55
回覆:49
積分:20
註冊:2005-01-25

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-03-02 02:13:51 IP:163.18.xxx.xxx 未訂閱
補圖檔
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-03-02 09:48:06 IP:210.68.xxx.xxx 未訂閱
您好: PO程式的方式請參考版規說明,煩請修改謝謝您的配合 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=47262 對於您的程式大概看了一下有幾問題
1.choice沒有初始值,且滑鼠每按一下並不會累加...
  應設為全域變數,且每按下滑鼠一次做累加,超出範圍則做歸0的動作 
2.if中的[等於]是用 == 而不是用 =
順心
barryHsu
一般會員


發表:55
回覆:49
積分:20
註冊:2005-01-25

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-03-02 20:19:56 IP:163.18.xxx.xxx 未訂閱
taishyang版主您好: 謝謝您,我已經測試出來了。
系統時間:2024-06-23 9:47:10
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!