各位前輩安安 假設有一張 IMAGE 如下圖     假如 我想做出 1.滑鼠移動到某一格的話 就在那一格的邊邊畫一個框 表示圈選 2.每個格子上 按下滑鼠 分別定義不同的處理動作 PS : 實際上使用的圖 更複雜 而且矩形部分 也不是這樣相連 該要如何寫呢 是不是該用陣列 那又要如何宣告與使用 然後怎麼畫框 ^_^ 在此先謝謝各位前輩了 曾經在某本書看過一句話 (記不太清楚了，可能文字有錯但意思一樣) 在程式設計的領域中，可以滿足你無限的想像空間；但是在你學會走之前，想飛想都不要想 目前我只是在學習爬行的階段，連走都走不穩 @@

------
曾經在某本書看過一句話 (記不太清楚了，可能文字有錯但意思一樣)

在程式設計的領域中，可以滿足你無限的想像空間；但是在你學會走之前，想飛想都不要想

目前我只是在學習爬行的階段，連走都走不穩 @@

各位前輩    畫框的方式，我會了，可是為什麼畫框時，圖檔會閃爍ㄚ，下面是我拿來畫框的方式       TRect rt;
   TPoint pt;
   rt.Left=100;
   rt.Top=200;
   rt.Right=200;
   rt.Bottom=300;
   pt.x=X;
   pt.y=Y;
   if(PtInRect(rt, pt))
     {
        Image1->Canvas->Pen->Width=2; //設定畫筆的寬度
        Image1->Canvas->Pen->Color=clRed;//設定畫筆的研色
        Image1->Canvas->Brush->Style=bsClear;//設定矩形為透明
        Image1->Canvas->Rectangle(100,200,200,300);
     }    可是現在出現 4 個問題 ( @@ 越學越慘，問題一大堆 )    1. 如何使圖形在畫框時不要閃爍
2. 假如滑鼠移開矩形範圍的話，將畫框取消
3. 假如我的矩形有很多個的話 (假設超過 50 個) 那我要如何寫
4. 圖檔格式一定要 BMP 才能畫框嗎 我原本用 JPG 不能畫

曾經在某本書看過一句話 (記不太清楚了，可能文字有錯但意思一樣) 在程式設計的領域中，可以滿足你無限的想像空間；但是在你學會走之前，想飛想都不要想 目前我只是在學習爬行的階段，連走都走不穩 @@

------
曾經在某本書看過一句話 (記不太清楚了，可能文字有錯但意思一樣)

在程式設計的領域中，可以滿足你無限的想像空間；但是在你學會走之前，想飛想都不要想

目前我只是在學習爬行的階段，連走都走不穩 @@

arthurxu您好:

引言: 假如 我想做出 1.滑鼠移動到某一格的話 就在那一格的邊邊畫一個框 表示圈選 2.每個格子上 按下滑鼠 分別定義不同的處理動作

1.要判斷滑鼠是否移到矩形內,可參考下面連結RaynorPao版主的範例 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=36926 要畫矩形可用

Form1->Canvas->Rectangle()

2.您可以用旗標來表示各個矩形,依照不同的旗標 用switch-case的方式來定義不同的動作處裡 參考看看,順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～ 發表人 -

arthurxu您好:

引言: 1. 如何使圖形在畫框時不要閃爍 2. 假如滑鼠移開矩形範圍的話，將畫框取消 3. 假如我的矩形有很多個的話 (假設超過 50 個) 那我要如何寫 4. 圖檔格式一定要 BMP 才能畫框嗎 我原本用 JPG 不能畫

1.試試下面的code

void __fastcall TForm1::FormCreate(TObject *Sender)
{
 Form1->DoubleBuffered=true;
}
 

2.讀取原圖,我個人覺得應該是最快的方式 > <>～我也是在學習的階段,回答的不好請您多多見諒與指教～ 發表人 -