Resize a group of components

In your MouseMove event you can check whether the cursor is over your object. In my example above it could go like this:

[code]Function MouseOverTable(X As Integer, Y As Integer) As PAFQueryTable

Dim p As New REALbasic.Point(X,Y)

Dim r As REALbasic.Rect

Dim tbl As PAFQueryTable

For i As Integer = Tables.Ubound DownTo 0

tbl = Tables(i)

r = New REALbasic.Rect(tbl.Left, tbl.Top, tbl.Width, tbl.Height)

if r.Contains(p) then
  
  Return tbl
  
  exit
  
end if

Next

Return nil
End Function
[/code]

I use downTo in my loop because I control the drawing order of the tables based on the array. I don’t want to return a table that may be partially obscured by another.

Michael is correct but in my case the classes are not subclassed controls so they do not inherit any events. I do the basic mouse tracking in my Workspace class.