名前 題名 ▼ Mr.XRAYさん > > 他のコントロールに載せているコントロールの場合, > > 親のコントロールがメッセージを処理します. > > したがって,もし,Image1 の Align が alClient であれば, > > procedure TForm1.CMMouseleave(var Message: TMessage); > begin > inherited; > if TCMMouseLeave(Message).Sender = Panel1 then begin > Memo1.Lines.Add('Leave'); > end; > end; > > のように,親の TPanel で処理しても構わないと思います. GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link