掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
縮小した画像をファイルに保存するには？ (ID:43722)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Jpeg画像を縦横サイズ的に縮小してファイルに保存したいです。 色々と調べて、GDIを使うと綺麗に縮小画像ができることがわかりました。(下記のコードです) しかし、これをファイルに保存する方法が、どうしてもわかりません。 どなたか教えて頂けませんか？ よろしくお願いいたします。 開発環境 Delphi XE , Windows7 64bit uses に GDIPAPI ,GDIPOBJ を追加; procedure TForm1.Button1Click(Sender: TObject); var graphics : TGPGraphics; bmp: TGPBitmap; w, h: double; begin graphics := TGPGraphics.Create(Canvas.Handle); bmp := TGPBitmap.Create('test.jpg'); try w :=bmp.GetWidth * 0.2; h :=bmp.GetHeight * 0.2; graphics.SetInterpolationMode(InterpolationModeHighQualityBicubic); graphics.DrawImage(bmp, MakeRect(0, 0, w, h)); finally bmp.Free; graphics.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.