Re: [請益] 有關Delphi存圖片的問題!
※ 引述《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
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):