掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
画像拡大時のタイルを円滑化 (ID:40793)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんちには，Mr.XRAYです． >転送元のRectを指定する方法などご存知でしたら教えてください。 ということですが，転送元は直接，値で設定しています． 転送先のRectは使用しました． 動作確認環境が違うので，うまくいかなかったらゴメンなさい． 動作確認環境 Windows XP(SP3) + Delphi 2010 Pro Delphi GDI+ Library for use with Delphi 2009 (version 1.2) //============================================================================= // .NET互換のGDI+ライブラリなので，そうでない場合は以下の修正が必要 // GPGraphics : IGPGraphics; --> TGPGraphics // bmp : IGPBitmap; --> TGPBitmap // これらの解放処理も必要 //============================================================================= procedure TForm1.Button3Click(Sender: TObject); var GPGraphics : IGPGraphics; bmp : IGPBitmap; DestRect : TGPRectF; begin GPgraphics := TGPGraphics.Create(Image1.Canvas.Handle); bmp := TGPBitmap.Create('002.jpg'); DestRect := TGPRectF.Create(50, 50, 300, 400); //bmpのRect(50, 30, 100, 100)の範囲をDestRectに描画 GPGraphics.DrawImage(bmp, DestRect, 50 ,30, 100, 100, UnitPixel); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.