掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
JPEGを滑らかに表示する方法 (ID:17043)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
1.JpgをBmpに変換します。 2.そのBmpに滑らかに拡大(縮小)する処理をします。 3.BmpをJpgに変換し戻します。 滑らかに拡大(縮小)する処理方法は多数ありますが、私は中村拓男さんの関数を利用させていただいています。 photoshopと比較し、その品質は同等もしくは若干上というのが私の評価です。 1.http://www.asahi-net.or.jp/~HA3T-NKMR/DGS/DownLoad.htm よりDHGL1.2をダウンロードします。 2.解凍後、commonフォルダのBitmapUtils.pasを取り出します。 3.uses節にBitmapUtilsを追加します。 4.滑らかな拡大はfunction Enlarge(Bitmap: TBitmap; Width, Height: Integer): TBitmap; 縮小はfunction Shrink(Bitmap: TBitmap; Width, Height: Integer): TBitmap;を使用します。 使用例 var SrcBmp, DestBmp: TBitmap; NewWidth, NewHeight: Integer; begin SrcBmp にJpgを変換; try // DestBmpのインスタンスはEnlarge()内でCreateされる DestBmp := Enlarge(SrcBmp, NewWidth, NewHeight); finally DestBmp.Free; end; DestBmpをに変換
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.