Highlighted
Absent Member.
Absent Member.
948 views

Button_Click method - Determine what the mouse button was pressed.

Jump to solution

Hi, again.

I do "set  btn to sender as type Button" and i can get button properts.

Now i need to get which mouse button has brought me here.


I suspect that the answer is in "e as type System.EventArgs", but, how?

I asked to google...

hugs.

Antonio João

Primavera do Leste / MT / Brasil

0 Likes
1 Solution

Accepted Solutions
Highlighted
Micro Focus Expert
Micro Focus Expert

RE: Button_Click method - Determine what the mouse button was pressed.

Jump to solution

Try using the MouseDown event instead of the Clicked event of the button:

Example:

       method-id button1_MouseDown final private.
       procedure division using by value sender as object e as type System.Windows.Forms.MouseEventArgs.
           if e::Button = type MouseButtons::Left
              set textBox1::Text to "left"
           else
              if e::Button = type MouseButtons::Right
                 set textBox1::Text to "right"
              end-if
           end-if
           
       end method.

View solution in original post

0 Likes
2 Replies
Highlighted
Micro Focus Expert
Micro Focus Expert

RE: Button_Click method - Determine what the mouse button was pressed.

Jump to solution

Try using the MouseDown event instead of the Clicked event of the button:

Example:

       method-id button1_MouseDown final private.
       procedure division using by value sender as object e as type System.Windows.Forms.MouseEventArgs.
           if e::Button = type MouseButtons::Left
              set textBox1::Text to "left"
           else
              if e::Button = type MouseButtons::Right
                 set textBox1::Text to "right"
              end-if
           end-if
           
       end method.

View solution in original post

0 Likes
Highlighted
Absent Member.
Absent Member.

RE: Button_Click method - Determine what the mouse button was pressed.

Jump to solution

Thank you very much, Mr. Chris.

It´s easy, when you know.

Antonio João

Primavera do Leste / MT / Brasil

0 Likes
The opinions expressed above are the personal opinions of the authors, not of Micro Focus. By using this site, you accept the Terms of Use and Rules of Participation. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.) and Hewlett Packard Enterprise Company. As of September 1, 2017, the Material is now offered by Micro Focus, a separately owned and operated company. Any reference to the HP and Hewlett Packard Enterprise/HPE marks is historical in nature, and the HP and Hewlett Packard Enterprise/HPE marks are the property of their respective owners.