如果我今天有一個圖片在Image1，要怎麼把Image1中的某個區域 顯示在大小固定的Image2中，並且調整大小符合Image2 ？ 我原本是這樣寫的： //---------------------------------------------------------- Image1->Picture->LoadFromFile(PFile); imgWidth=Image1->Width/3; imgHeight=Image1->Height/4; Image2->Canvas->CopyRect(Rect(0,0,imgWidth,imgHeight), Image1->Canvas,Rect(imgWidth,imgHeight,imgWidth*2,imgHeight)); //---------------------------------------------------------- 我的Image2->Stretch有設成True，不過顯示出來的圖片比例還是 和原圖一樣，所以會有圖超出範圍或留下空白的情況，請問要用 什麼方法才可以做到那種效果？

引言: 如果我今天有一個圖片在Image1，要怎麼把Image1中的某個區域 顯示在大小固定的Image2中，並且調整大小符合Image2 ？ 我原本是這樣寫的： //---------------------------------------------------------- Image1->Picture->LoadFromFile(PFile); imgWidth=Image1->Width/3; imgHeight=Image1->Height/4; Image2->Canvas->CopyRect(Rect(0,0,imgWidth,imgHeight), Image1->Canvas,Rect(imgWidth,imgHeight,imgWidth*2,imgHeight)); //---------------------------------------------------------- 我的Image2->Stretch有設成True，不過顯示出來的圖片比例還是 和原圖一樣，所以會有圖超出範圍或留下空白的情況，請問要用 什麼方法才可以做到那種效果？

Phil999 你好: 先試試看改成以下這個樣子，是否可行？ < class="code"> Image2->Canvas->CopyRect(Rect(0, 0, imgWidth, imgHeight), Image1->Canvas, Image2->ClientRect); -- Enjoy Researching & Developing --

還是不行 取下圖片的大小還是不會自動調整成Image元件的大小來顯示 我現在是用一個方法來替代，就是取圖後先計算圖和元件大小的比例差 再把圖縮放成剛好符合的大小，不過這樣子開圖的時間會變慢很多 ，不太好用。

我是這樣想的,請參考以下程式: void __fastcall TForm1::Button2Click(TObject *Sender) {  int xx,yy;  int x1,x2,y1,y2;  int extd=6;         ShowRec();//顯示Image2座標矩形框 //copy image to image2-------------------------------------------------------         x1=xleft;         x2=xright;         y1=yup;         y2=ydown;         xx = x2-x1+1;         yy = y2-y1+1;            for(int i=0; i<(xx-1+2*extd); i++)         {           for(int j=0; j<(yy-1+2*extd); j++)           {            Image2->Canvas->Pixels[i][j] = Image1->Canvas->Pixels[i+x1-extd][j+y1-extd];            Image2->Width=xx-1+2*extd;            Image2->Height=yy-1+2*extd;            Image2->Visible = true;           };         }; } //-------------------------------------------------------------------------- //顯示座標矩形框--------------------------------------------------------------  void __fastcall TForm1::ShowRec() {   int xleft,xright,yup,ydown,retake;    xleft=100;   xright=200;   yup=100;   ydown=200;       retake = Image1->Canvas->Pen->Mode;   Image1->Canvas->Pen->Mode = pmNotXor;   Image1->Canvas->Pen->Style = psDash;   Image1->Canvas->Brush->Style = bsClear;   Image1->Canvas->Rectangle(xleft,yup,xright,ydown);      //cx = (xright-xleft)/2;   //cy = (ydown-yup)/2; }    座標可以從xleft,xright,yup,ydown來修改,至於大小可以從extd去調整,你可以試試看! 還有我預視時發現

------
Keni Lin

Graphics::TBitmap *bufferbmp = new Graphics::TBitmap;
TMemoryStream *pms = new TMemoryStream();    bufferbmp->Width=imgWidth;
bufferbmp->Height=imgHeigth;    bufferbmp->Canvas->CopyRect(Rect(0,0,imgWidth,imgHeight),
Image1->Canvas,Rect(imgWidth,imgHeight,imgWidth*2,imgHeight));    bufferbmp->SaveToStream(pms);
pms->Position=0;
Image2->Picture->Bitmap->LoadFromStream(pms);
delete pms;
delete bufferbmp;
 

這樣在Image2的stretch設成true 也會符合Image2的大小了 發表人 - fffhghgjh 於 2005/01/06 14:08:37

試試先COPY原圖再改尺寸吧，這樣Scretch才會有用

忽然想到Canvas->StretchDraw..查查線上的HELP吧 可以解決你很多的問題，而且在解決問題中可以讓你進步更快哦 加油