Image1の上にコントロールをクリエートしたい (ID:21369)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 HOta様 ありがとうございます。 Type節に下記の宣言をしています。（これはタバスコ様の忘れ物２のことかと思います） Type procedure labelMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); 現在の症状はテストソフトでは動くが移植すると動かない、というものです。 ShapeList[i] := TShape.Create(self); のselfでは通らない、即ちフォームのクラスがTForm1ではなくなってしまっている（？）可能性があるのではないかと疑っていますがこれをどのように確認するのかわからないでHELPなどを読んでいるところです。何か手がかりがあったらお願いします。