🚀 go-pugleaf

K.Takaoka <saepro@din.or.jp> wrote in message
news:38661455.CECA03D4@din.or.jp...
> える@海豚ぞな
>
> 林 知紀 wrote:
> > ただTForm.CanvasとTPainBox.Canvasに共通する欠点として
> > フォームが他のアプリケーションのウインドウに隠されたときなどの
> > フォームの自動描画が行われないことがあります。
>
> もしかして、根本的に「Windows の描画アルゴリズム」を誤解されていま
> せんか ?

いや、確かによくわかっていない事だらけなんですが、
(しかもDelphiの前はN88BASICだったので
いろいろと変な癖がついてるし)
ちょっと補足しますので
その上でやっぱり変なところを指摘してやってください。


> Windows では (C/C++/VB/Delphi/なんでも) アタリマエのことなのですが、
>
> Form1.Canvas や PaintBox1.Canvas に、OnPaint 以外の場所で描画を行う
> ことは無意味に近いです。

Delphi以外は分からないのでとりあえず僕の環境での現象ですが
コードのどの部分でも
PaintBox1.Canvas.Draw(0,0,Bitmap);
を実行すると即座にBitmapの内容がPaintBox上に表示されます。
しかし、フォームをドラッグするなどOnPaintイベントが発生すると
画像が消えてしまいます。
不思議なのはもう一度同じコードを実行した後は
画面の端や別のウインドウ等で隠された部分だけしか消えません。
で、PaintBox1のOnPaintイベントに
PaintBox1.Canvas.Draw(0,0,Bitmap);
を書き込むと上記の不都合が解消されました。
(不都合というより仕様なんだろうけど)

以上の現象からOnPaintイベントは
OSが「君の窓が動いたり隠れていた場所が見えたりしたよ」と
アプリケーションに通知してきたのを受けて
発生するイベントではないかと思ったのですが
間違った理解なのでしょうか？

ただ、LineToで直接PaintBox1.Canvasに書き込んだり
PaintBox1.Canvas.Draw(0,0,Bitmap2);
とBitmap以外のものを書き込んでも
フォームが動くなどOnPaintイベントが発生するたびに
画面がBitmapの内容に戻ってしまうので
Bitmap.Assign(Bitmap2);
PaintBox1.Canvas.Draw(0,0,Bitmap);
と若干冗長なコードが必要なのが面倒くさいところです。


> 同様に無効にならないと Windows は描画をしようとしないので、
>
> Form1 や PaintBox1 で
>
>   PaintBox1.Canvas.Draw(0, 0, bitmap);
>
> のようなことをしている状態で、bitmap に変更を加えても何も画面上に
> は変化が現れないことになります。
>
>   PaintBox1.Invalidate;
>
> と、PaintBox1 を「無効」な状態にすると、Windows はもし PaintBox1 が
> 画面上に見えていたら、そこを有効にするために、PaintBox1.Paint を呼び
> だして、PaintBox1.OnPaint で再び bitmap を書くことで画面上の状態が
> 変化する、という具合です。

多分この点に誤解があったのではないかと思うのですが
もちろんオフスクリーンの状態でBitmapの内容を書き換えてから
PaintBox1に書き込んでいます。

最終的にVGAサイズのフルスクリーンにしようと思ってるので
OnPaintイベントはなかなか発生しないんじゃないかと
思っています。


ちなみに(Sender :TObject)の謎がなんとなく分かりました。
ありがとうございました。



--
くるくるくるくるくるくるくるくるくるくるくるくる

　　　林　知紀
　　　fwhx4467@mb.infoweb.ne.jp

くるくるくるくるくるくるくるくるくるくるくるくる