[Gambas-user] Problem with Lock method for DrawingArea class
John Rose
john.aaron.rose at gmail.com
Fri Jun 5 18:22:39 CEST 2020
This problem is difficult to explain, so please bear with me. The idea
behind my app is to allow the user to select a Desktop Window. This is
done by having the FSelectWindow form overlay (with Opacity=35,
Arrangement=Vertical) the available desktop. The Select_Window form
contains only one control (DrawingAreaDesktop with Expand=True). This
results in the Drawing AreaDesktop forming a semi-opaque layer over the
available desktop.
If before you run my app, you close all windows except Gambas (but not
full screen) and Compile All, there are no compilation errors or
warnings. Then run my app and click on the Select button (in the FMain
form), you will see that all the desktop windows (i.e. only the Gambas
one) are shown in a semi-opaque 'mode'. If you now click on a point in
an empty area, a Message Box will be displayed saying "Try again:" &
"Did not click on window.": caused by lines 106-107 of Sub
DrawingAreaDesktop_MouseUp() event. If you click on the Ok button, then
(with the Lock command in line 104 commented out) the Mouse_Up event is
entered again: this is shown by examining the Console output. To prevent
(re-)entry to the Mouse_Up event coding when the user clicks the Message
Box Ok button, I tried to use the Lock method in line 104 to prevent
this (re-)entry. However, I then get an error window saying "Unknown
symbol in 'Lock' in class 'Drawing Area' at
FSelectWindow.DrawingAreaDesktop - MouseUp.104 (generated by line 135) .
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20200605/6bcce727/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: SelectWindow.tar.gz
Type: application/gzip
Size: 18924 bytes
Desc: not available
URL: <https://lists.gambas-basic.org/pipermail/user/attachments/20200605/6bcce727/attachment-0001.gz>
More information about the User
mailing list