フォームに TPanel を追加し、TImage をこのパネルに追加します。
TPanel の BorderWidth を 4 にして、
TImage の Align を alClient としています。
フォームのリサイズを行った場合にOnResize で
TImage の Picture.Bitmap の Width, Heightに
TImage の Width, Height を入れて
FillRectを行っています。
この状態で、フォームのサイズをぐるぐるっと
変更するとリソースエラーとか、リソースが処理中とか
無効なポインタ操作とか挙句の果てにはシステムフリーズ
してしまいます。
どうすればよいのでしょうか？
やってみましたが、問題ありません。
TPanelのAlignもalClientか、Anchorが設定されているんですよね？
FillRectは、何に対してやっているんですか？
一応、TPanelのAlignをalClientにして、
Image1.Picture.Bitmap.Canvas.FillRect
を行ってみましたが、再現しませんでした。