New topic: 

Help with MouseMove Code?

<http://forums.realsoftware.com/viewtopic.php?t=47544>

         Page 1 of 1
   [ 1 post ]                 Previous topic | Next topic          Author  
Message        mikecotrone          Post subject: Help with MouseMove 
Code?Posted: Mon Apr 08, 2013 12:56 pm                         
Joined: Tue Mar 05, 2013 2:33 pm
Posts: 28
Location: North Carolina                I was hoping someone can see where I am 
going wrong. I am almost there while spending alot of time troubleshooting this 
issue. Here is my issue>

1. Add a new Picture(0) to the canvas
2. Works fine and when I move mouse over the picture my icon changes to the 
"Copy" icon and all is well. I then move off of the picture(0) and the icon 
goes back to the standardicon all well.
3. When I add picture(1) to the canvas everything still works fine as in #2. 
However I then mouse over to picture(0) and the icon never changes.

After troubleshooting I do see when I am moused over picture(0) it is properly 
recognized. It seems like I am stuck in the "Else" condition where the 
standardicon is, but that isn't possible right?

Thanks!

//Track Current X/Y Coordinates for Troubleshooting Purposes
Window1.LiveMouseCoordLabel.Text =  "My X: " + Str(X) + " " + "My Y: " + Str(Y) 
+ EndOfLine

qSelected = False

// Calculate the Coordinates to understand if we are over the Picture
For Each q As PictureClass In qPictureObject
  
  If X >= q.Left And X <= q.Right And Y >= q.Top And Y <= q.Bottom Then
  me.MouseCursor = System.Cursors.Copy
  
  Window1.TroubleLogTextArea.Text = "q = " + q.Caption + EndOfLine
  Window1.TroubleLogTextArea.AppendText "q.Left: " + str(q.Left) + " " + 
"q.Right: " + str(q.Right) + EndOfLine
  
  // Pass User Option to enable/disable
  if AutoHighLight = True then
  SelectedObject = q
  else
  end if
  
  else
  me.MouseCursor = System.Cursors.StandardPointer
  End If
  
Next
      
_________________
Mike Cotrone - CCIE #8411 R&S, CCIE #8411 Voice
Chief Technology Officer 
Onepath Systems, LLC

Real Studio 2012 R2.1 Enterprise, Mac OS, Windows, Ubuntu Linux  
                             Top             Display posts from previous: All 
posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost 
timeSubject AscendingDescending          Page 1 of 1
   [ 1 post ]      
-- 
Over 1500 classes with 29000 functions in one REALbasic plug-in collection. 
The Monkeybread Software Realbasic Plugin v9.3. 
http://www.monkeybreadsoftware.de/realbasic/plugins.shtml

[email protected]

Reply via email to