掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
重なったコントロールのうち、下のコントロールのクリックを取得するには？ (ID:20662)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
２つのPaintBoxを配置して、それらが重なっているところをクリックすると、 上にあるPaintBoxでクリックが起こり、下のPaintBoxでは起きないみたいです。 下のPaintBoxでもクリックを処理することができるでしょうか？ または、重なっているすべてのPaintBoxにクリックが起きるという形でもよいのですが・・。 FAQのようにも感じるのですが、Googleなどで適当な表現で検索できなかったようで、見つけられませんでした。 また、お力添えいただけると幸いです。 今回は、次のようなコードでテストしました。 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TForm1 = class(TForm) PaintBox1: TPaintBox; PaintBox2: TPaintBox; procedure PaintBox1Click(Sender: TObject); procedure PaintBox2Click(Sender: TObject); private { Private 宣言 } public { Public 宣言 } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.PaintBox1Click(Sender: TObject); begin showmessage('Paintbox1'); end; procedure TForm1.PaintBox2Click(Sender: TObject); begin showmessage('Paintbox2'); end; end.
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.