☆MouseDownの処理で・・・。(2)

[Windowsフォームアプリケーション]
前回、MouseDownの処理で、左ボタンが押されたというチェックをしましたが、今回は、どの修飾子キー (Shift、Ctrl、および Alt) と一緒に押されているかをチェックします。

if (System.Windows.Forms.Control.ModifierKeys =
   (Keys.Shift or Keys.Control or Keys.Alt)) and
   (e.Button = System.Windows.Forms.MouseButtons.Left) then
  MessageBox.Show('Hello World!');
このコードは、SHIFTキーとCTRLキーとALTキーを押しながら、左クリックした場合にメッセージを表示します。

SHIFTキーのみをチェックするのであれば、
(System.Windows.Forms.Control.ModifierKeys = Keys.Shift)
とします。

|

☆MouseDownの処理で・・・。

[Windowsフォームアプリケーション]
MouseDownの処理で、左ボタンが押されたという判定をさせようと次のような処理を書きました。

if (e.Button = MouseButtons.Left) then
 MessageBox.Show('Left');

しかし、次のようなコンパイルエラーになってしまいました。
「レコード、オブジェクトまたはクラスのいずれかが必要です。」

いろいろ試した結果、次のようにすればいいみたいです。

if (e.Button = System.Windows.Forms.MouseButtons.Left) then
 MessageBox.Show('Left');

わかってみると簡単なことですが、こんなことにさえ躓くなんて・・・(T_T)

|

その他のカテゴリー

ADO | ADT | API | ArrayList | ASP.NET | BDE | BDP.NET | BdpConnection | Borland Developer Studio 2006 | CAPICOM | class | ClipBoard | CodeEditor | Convert.ToString | Custom component | DBExpress | Delphi 2005 | Delphi 2006 | Delphi 2007 | Delphi XE2 | Delphi7 | Delphi8 | Device Driver | Dialog | Docking | DocuWorks | Docuworks SDK | Drag&Drop | Evernote | EXCEL | Firebird | FireMonkey | Game | General | Generics | Google Earth COM API | Google Maps | Google SketchUp | Graphic | IDE | Imm | Indy | InstallAware Express6 | InterBase Admin | JWW | Microsoft SQL Server | MyBase | OnMouseDown | Oracle XE | Paradox | PreviewHandler | PrintDialog | PrintPreviewDialog | PropertyGrid | PSDファイル | Ribbon Controls | RichTextBox | Servers | SubClass | TAction | TActionList | TAnimate | TButton | TCategoryButtons | TClientDataSet | TComboBox | TComboBoxEx | TCustomEdit | TDBGrid | TDockTabSet | TDrawGrid | TEdit | TExcelApplication | TFont | TForm | third party | TImage | TLabel | TList | TListBox | TListView | TMemo | TOpenDialog | TOutlookApplication | TPageControl | TPanel | TRichEdit | TShellResources | TStringGrid | TTabControl | TToolBar | TToolButton | TTreeView | TWebBrowser | Update | VCL Styles | WinInet | XE2 | XPman | オープン配列パラメータ | グループ化 | トランスレーションマネージャー | ファイル処理 | ファイル名処理 | 動的配列 | 投票 | 文字列処理 | 日本語入力 | 暗号 | | 音声合成利用