Re: [請益] 有關Delphi存圖片的問題!

看板Programming作者 (Aipr)時間17年前 (2009/03/22 13:23), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
※ 引述《littlebugs (小崇子)》之銘言: : 各位大大好! : 我用Delphi寫了一個會自動產生圖的程式! : 我存的格式是*.bmp (24-bit Bitmap) : 但是因為有時圖很大 (3500 x 3500 或更大) : 不僅容量大~而且再大一點程式就跑不下去了~ : 希望程式再存檔時能存成Monochrome Bitmap或是16 color Bitmap的格式! : 但是我上網查或是翻書都找不到! : 不知道是要怎樣才能改呢?謝謝! : 我是用Image1.Canvas下去畫的 : 存圖時用 : Image1.Picture.SaveToFile(FileName); : 這時就會自動產生 24-bit Bitmap的圖檔! 試試看以下方法: var bmp:Tbitmap; begin bmp := Tbitmap.Create; bmp.Assign(Image1.Picture.Graphic); bmp.PixelFormat := pf1bit; bmp.SaveToFile(FileName); ... 如果顏色跑掉, 還需要自己去設定調色盤 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 123.204.156.133

03/23 15:19, , 1F
唷!!我成功了!感謝這位大大啦!!
03/23 15:19, 1F
文章代碼(AID): #19nSj6T9 (Programming)
文章代碼(AID): #19nSj6T9 (Programming)