右クリックで処理をするには

解決


松山  2002-01-14 23:19:34  No: 467  IP: [192.*.*.*]

通常マウスの左クリックはButton1ONCLICKで処理を記述します。
右クリックはどうするのですか?
Delphi2からDelphi使っているのですが、初めて右クリックの必要がでてきました。

編集 削除
新☆人  2002-01-14 23:53:44  No: 468  IP: [192.*.*.*]

OnMouseDown
OnMouseUp
でボタンを判別すればいいのでは?

編集 削除
motti  2002-01-28 16:36:15  No: 469  IP: [192.*.*.*]

多分いまの時点ではご存知かもしれないですけど

procedure TForm1.Panel1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
   if  Button  =   mbRight then
     ShowMessage('右だよ');
end;

こんな感じだと思います。

編集 削除
松山  2002-01-29 22:54:41  No: 470  IP: [192.*.*.*]

あの、すいません」。解決しました。私がWindowsの常識をしらなかったようです。POPUPMENUを使えばいいはなしでした。ポップアップメニューを表示したい
フォームなりボタンのPOPUPMENUのプロパティを設定すればよかったのです。
皆さん、私の言葉足らずの質問に答えてくださってありがとうございます。

編集 削除