掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Sleepの動作について (ID:13721)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
解決ということですが,ついでに... 一般にCanvasへの描画は重ね描画の時に使用します. また,単一の画像を表示する時は,Pictureを使用するといいでしょう. 今回の目的がどちらかはわかりまんが,例えば以下のコードを, サイズの違うビットマップで動作させてみると違いがわかります. (できればBMP01を一番サイズの大きいものにすると,なおBetter) // 単一の画像の表示なら procedure TForm1.Button1Click(Sender: TObject); begin Image1.Picture.Assign(BMP1); Image1.Refresh; sleep(500); Image1.Picture.Assign(BMP2); Image1.Refresh; sleep(500); Image1.Picture.Assign(BMP3); Image1.Refresh; end; // Canvasは重ね書きに procedure TForm1.Button2Click(Sender: TObject); begin if Image1.Picture.Graphic<>nil then Image1.Picture.Graphic:=nil; Image1.SetBounds(0,0,ClientWidth,ClientHeight); Image1.Canvas.Draw(0,0,BMP1); Image1.Refresh; sleep(500); Image1.Canvas.Draw(0,0,BMP2); Image1.Refresh; sleep(500); Image1.Canvas.Draw(0,0,BMP3); Image1.Canvas.Font.Size:=20; Image1.Canvas.TextOut(10,10,'テスト'); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.