掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Bitblt (ID:3926)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
TCanvas の Draw メソッドが BitBlt() と同じです。 描画先が Canvas を持っているときは Draw() メソッドを使ってください。 以下の例は、どちらも同じ実行結果を与えます。 // TCanvas.Drawメソッドの例 procedure TForm1.Button1Click(Sender: TObject); var BMP:TBitmap; begin BMP := TBitmap.Create; try BMP.LoadFromFile('c:\Test.bmp'); Canvas.Draw(10,10,BMP); finally BMP.Free; end; end; // BitBlt() の例 procedure TForm1.Button2Click(Sender: TObject); var BMP:TBitmap; begin BMP := TBitmap.Create; try BMP.LoadFromFile('c:\Test.bmp'); BitBlt(Canvas.Handle,10,10, BMP.Width,BMP.Height, BMP.Canvas.Handle,0,0,SRCCOPY); finally BMP.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.