請教各位前輩: 我想要將一張800x600的點片,存成一張我想要的解析度(縮小圖)(如80x60), 有什麼方法可以做嗎,我已搜尋過了,沒有相關的文章, 不知如何下手,故請教論壇上的前輩囉!! 突然想學Delphi的新手

tahoo 您好：    如果您並無其它特別的要求，那麼您可以查看一下 Help 中有關 StretchDraw 函數的說明，我使用的是 BCB，對 Delphi 並不太熟悉，因此無法給您正確的範例，如果您需要範例的話，可以使用 StretchDraw 為關鍵字，搜尋站上相關的文章，應該有蠻多資料可供您參考的。

引言: tahoo 您好： 如果您並無其它特別的要求，那麼您可以查看一下 Help 中有關 StretchDraw 函數的說明，我使用的是 BCB，對 Delphi 並不太熟悉，因此無法給您正確的範例，如果您需要範例的話，可以使用 StretchDraw 為關鍵字，搜尋站上相關的文章，應該有蠻多資料可供您參考的。

雖然沒有明確的答案,但也給了我一個提示,謝謝!! 突然想學Delphi的新手

你好..想對一張bmp圖改變解析度大小的程式碼如下.. (先將原圖載入image1物件中)  

var Tr:Trect; zm:Tbitmap; begin zm:=tbitmap.Create; zm.PixelFormat:=pf24bit; Tr.Top:=0; Tr.Left:=0; Tr.Bottom:=59; Tr.Right:=79; zm.Width:=80; zm.Height:=60; zm.Canvas.StretchDraw(Tr,image1.Picture.Graphic); zm.SaveToFile('img.bmp'); end;

希望對你有幫助..不過前提是你還會看自己8天前po的問題 =.=|||