luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
gambas-source-code/gb.gtk/src/CMouse.cpp

473 lines
11 KiB
C++
Raw Normal View History

* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
/***************************************************************************
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
CMouse.cpp
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
(c) 2004-2006 - Daniel Campos Fernández <dcamposf@gmail.com>
[CONFIGURATION] * NEW: Update copyright and license string in all source files. git-svn-id: svn://localhost/gambas/trunk@2241 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2009-08-17 12:41:51 +02:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
MA 02110-1301, USA.
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
***************************************************************************/
#define __CMOUSE_CPP
#include "CMouse.h"
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
//-------------------------------------------------------------------------
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
BEGIN_METHOD(CCURSOR_new, GB_OBJECT picture; GB_INTEGER x; GB_INTEGER y)
CPICTURE *Pic=(CPICTURE*)VARG(picture);
gPicture *pic=NULL;
long X=0,Y=0;
if (!MISSING(x)) X=VARG(x);
if (!MISSING(y)) Y=VARG(y);
if (Pic) pic=Pic->picture;
THIS->cur=new gCursor(pic,X,Y);
END_METHOD
BEGIN_METHOD_VOID(CCURSOR_delete)
delete THIS->cur;
END_METHOD
BEGIN_PROPERTY(CCURSOR_x)
GB.ReturnInteger(THIS->cur->left());
END_PROPERTY
BEGIN_PROPERTY(CCURSOR_y)
GB.ReturnInteger(THIS->cur->top());
END_PROPERTY
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
//-------------------------------------------------------------------------
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_ScreenX)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnInteger(gMouse::screenX());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_ScreenY)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnInteger(gMouse::screenY());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_METHOD(Mouse_Move, GB_INTEGER x; GB_INTEGER y)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
gMouse::move(VARG(x),VARG(y));
END_PROPERTY
#define CHECK_VALID() \
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
if (!gMouse::isValid()) \
{ \
GB.Error("No mouse event data"); \
return; \
}
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_X)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::x());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Y)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::y());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_StartX)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::startX());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_StartY)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::startY());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Button)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::button());
END_PROPERTY
[DEVELOPMENT ENVIRONMENT] * NEW: Try to avoir Application.Busy flickering in some dialogs. [EXAMPLES] * NEW: New Tablet event inspired by a project made by Ricardo Díaz Martín. [GB.DRAW] * NEW: Paint.DrawImage() takes a new optional argument that defines the opacity of the drawing, between 0 and 1. [GB.FORM] * NEW: ScrollArea.Tablet is a new property that allows it to catch tablet events. [GB.GTK] * BUG: Support for tablet events. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. * BUG: DrawingArea.Tablet now works correctly when the DrawingArea is not cached. [GB.QT4] * BUG: Mouse events from tablet now get accurate button information. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. git-svn-id: svn://localhost/gambas/trunk@5057 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-19 15:01:57 +02:00
BEGIN_PROPERTY(Mouse_State)
CHECK_VALID();
Fix Mouse.Button and Mouse.State, especially for mouses having more than 3 buttons. [GB.GTK] * BUG: Now Mouse.Button returns the button number, between 1 and 5. * BUG: Mouse.State returns the same thing as with Qt components, except that apparently GTK+ cannot tell if button 4 and 5 are pressed all the time. [GB.GTK3] * BUG: Now Mouse.Button returns the button number, between 1 and 5. * BUG: Mouse.State returns the same thing as with Qt components, except that apparently GTK+ cannot tell if button 4 and 5 are pressed all the time. [GB.QT4] * BUG: Now Mouse.Button returns the button number, between 1 and 5. [GB.QT5] * BUG: Now Mouse.Button returns the button number, between 1 and 5.
2021-06-10 02:10:09 +02:00
GB.ReturnInteger(gMouse::state());
[DEVELOPMENT ENVIRONMENT] * NEW: Try to avoir Application.Busy flickering in some dialogs. [EXAMPLES] * NEW: New Tablet event inspired by a project made by Ricardo Díaz Martín. [GB.DRAW] * NEW: Paint.DrawImage() takes a new optional argument that defines the opacity of the drawing, between 0 and 1. [GB.FORM] * NEW: ScrollArea.Tablet is a new property that allows it to catch tablet events. [GB.GTK] * BUG: Support for tablet events. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. * BUG: DrawingArea.Tablet now works correctly when the DrawingArea is not cached. [GB.QT4] * BUG: Mouse events from tablet now get accurate button information. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. git-svn-id: svn://localhost/gambas/trunk@5057 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-19 15:01:57 +02:00
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Left)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnBoolean(gMouse::left());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Right)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnBoolean(gMouse::right());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Middle)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnBoolean(gMouse::middle());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Shift)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
Fix menu Show event and allow Mouse key modifiers properties outside of Mouse event handlers. [GB.GTK] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler. [GB.GTK3] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler.
2020-10-22 10:06:40 +02:00
//CHECK_VALID();
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnBoolean(gMouse::shift());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Control)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
Fix menu Show event and allow Mouse key modifiers properties outside of Mouse event handlers. [GB.GTK] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler. [GB.GTK3] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler.
2020-10-22 10:06:40 +02:00
//CHECK_VALID();
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnBoolean(gMouse::control());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Alt)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
Fix menu Show event and allow Mouse key modifiers properties outside of Mouse event handlers. [GB.GTK] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler. [GB.GTK3] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler.
2020-10-22 10:06:40 +02:00
//CHECK_VALID();
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnBoolean(gMouse::alt());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Meta)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
Fix menu Show event and allow Mouse key modifiers properties outside of Mouse event handlers. [GB.GTK] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler. [GB.GTK3] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler.
2020-10-22 10:06:40 +02:00
//CHECK_VALID();
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnBoolean(gMouse::meta());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Normal)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
Fix menu Show event and allow Mouse key modifiers properties outside of Mouse event handlers. [GB.GTK] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler. [GB.GTK3] * BUG: Mouse key modifiers properties are now available outside of Mouse event handlers as in Qt components. * BUG: Menu Show event now behaves as expected, and allow recreating the menu contents during its event handler.
2020-10-22 10:06:40 +02:00
//CHECK_VALID();
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB.ReturnBoolean(gMouse::normal());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Delta)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::delta());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Orientation)
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
CHECK_VALID();
GB.ReturnInteger(gMouse::orientation());
END_PROPERTY
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
BEGIN_PROPERTY(Mouse_Forward)
CHECK_VALID();
GB.ReturnBoolean(gMouse::delta() > 0);
END_PROPERTY
BEGIN_METHOD(Mouse_Inside, GB_OBJECT control)
CWIDGET *control = (CWIDGET *)VARG(control);
gControl *widget;
int x, y, xw, yw;
if (GB.CheckObject(control))
return;
widget = control->widget;
if (!widget->isVisible())
{
GB.ReturnBoolean(false);
return;
}
gMouse::getScreenPos(&x, &y);
widget->getScreenPos(&xw, &yw);
x -= xw;
y -= yw;
GB.ReturnBoolean(x >= 0 && x < widget->width() && y >= 0 && y < widget->height());
END_METHOD
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[CONFIGURATION] * NEW: Chinese translations updated everywhere. [DEVELOPMENT ENVIRONMENT] * NEW: Update Gambas fonts. * BUG: In the menu editor, the last menu can be move up now. * NEW: Add "GB_REVERSE=1" in the environment variable list of the project properties dialog. [GB.DB.FORM] * NEW: The DataCheckBox control now raises its Click event as expected. [GB.FORM] * BUG: The icon of the FileProperties control now correctly adapts its size. [GB.FORM.MDI] * NEW: ToolBar now inverts its layout if the current language is right-to- left written. [GB.GTK] * NEW: Mouse.Translate() is a new method that allows to translate the current mouse event. * BUG: The rtl layout is correctly initialized at startup. [GB.GUI.BASE] * NEW: ScrollArea, GridView, TreeView and its friends now invert their layout if the current language is right-to-left written. [GB.NET.POP3] * BUG: Error messages must not be translatable. [GB.QT4] * NEW: Mouse.Translate() is a new method that allows to translate the current mouse event. git-svn-id: svn://localhost/gambas/trunk@5993 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2013-12-09 20:42:30 +01:00
BEGIN_METHOD(Mouse_Translate, GB_INTEGER dx; GB_INTEGER dy)
CHECK_VALID();
gMouse::translate(VARG(dx), VARG(dy));
END_METHOD
Add Mouse.Click property and fix gb.gtk3 style methods. [GB.GTK] * NEW: Mouse.Click is a new property that returns the click index in a multi-click event. * NEW: Style.Name is now lowercase. [GB.GTK3] * NEW: Mouse.Click is a new property that returns the click index in a multi-click event. * NEW: Style.Name is now lowercase. * BUG: Fix Style.PaintCheck() and Style.PaintArrow() for GTK+ >= 3.14.
2020-05-19 22:23:02 +02:00
BEGIN_PROPERTY(Mouse_Click)
GB.ReturnInteger(gMouse::clickCount());
END_PROPERTY
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
//-------------------------------------------------------------------------
[DEVELOPMENT ENVIRONMENT] * BUG: Fix a possible crash in form editor arrangement icons managemnt. [GB.GTK] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. * BUG: Try to activate all XInput devices when the DrawingArea.Tablet property is set. [GB.QT4] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. git-svn-id: svn://localhost/gambas/trunk@5051 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-17 17:53:52 +02:00
BEGIN_PROPERTY(Pointer_ScreenX)
CHECK_VALID();
GB.ReturnFloat(gMouse::getPointerScreenX());
END_PROPERTY
BEGIN_PROPERTY(Pointer_ScreenY)
CHECK_VALID();
GB.ReturnFloat(gMouse::getPointerScreenY());
END_PROPERTY
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
BEGIN_PROPERTY(Pointer_X)
CHECK_VALID();
[DEVELOPMENT ENVIRONMENT] * BUG: Fix a possible crash in form editor arrangement icons managemnt. [GB.GTK] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. * BUG: Try to activate all XInput devices when the DrawingArea.Tablet property is set. [GB.QT4] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. git-svn-id: svn://localhost/gambas/trunk@5051 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-17 17:53:52 +02:00
GB.ReturnFloat(gMouse::getPointerX());
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
END_PROPERTY
BEGIN_PROPERTY(Pointer_Y)
CHECK_VALID();
[DEVELOPMENT ENVIRONMENT] * BUG: Fix a possible crash in form editor arrangement icons managemnt. [GB.GTK] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. * BUG: Try to activate all XInput devices when the DrawingArea.Tablet property is set. [GB.QT4] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. git-svn-id: svn://localhost/gambas/trunk@5051 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-17 17:53:52 +02:00
GB.ReturnFloat(gMouse::getPointerY());
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
END_PROPERTY
BEGIN_PROPERTY(Pointer_XTilt)
CHECK_VALID();
GB.ReturnFloat(gMouse::getAxis(GDK_AXIS_XTILT));
END_PROPERTY
BEGIN_PROPERTY(Pointer_YTilt)
CHECK_VALID();
GB.ReturnFloat(gMouse::getAxis(GDK_AXIS_YTILT));
END_PROPERTY
BEGIN_PROPERTY(Pointer_Pressure)
CHECK_VALID();
GB.ReturnFloat(gMouse::getAxis(GDK_AXIS_PRESSURE));
END_PROPERTY
BEGIN_PROPERTY(Pointer_Rotation)
CHECK_VALID();
GB.ReturnFloat(gMouse::getAxis(GDK_AXIS_WHEEL));
END_PROPERTY
BEGIN_PROPERTY(Pointer_Type)
CHECK_VALID();
GB.ReturnInteger(gMouse::getType());
END_PROPERTY
//-------------------------------------------------------------------------
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
GB_DESC CCursorDesc[] =
{
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_DECLARE("Cursor", sizeof(CCURSOR)),
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_METHOD("_new", 0, CCURSOR_new, "(Picture)Picture;[(X)i(Y)i]"),
GB_METHOD("_free", 0, CCURSOR_delete, NULL),
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
The mouse cursor type constants are now defined in the Cursor class. Add more mouse cursor constants. [GB.GTK] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants. [GB.GTK3] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants. [GB.QT4] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants. [GB.QT5] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants.
2021-10-29 16:32:38 +02:00
GB_CONSTANT("Custom", "i", CURSOR_CUSTOM),
GB_CONSTANT("Default", "i", CURSOR_DEFAULT),
GB_CONSTANT("Blank", "i", CURSOR_NONE),
GB_CONSTANT("Arrow", "i", CURSOR_ARROW),
GB_CONSTANT("Cross", "i", CURSOR_CROSSHAIR),
GB_CONSTANT("Wait", "i", CURSOR_WAIT),
GB_CONSTANT("Text", "i", CURSOR_TEXT),
GB_CONSTANT("SizeAll", "i", CURSOR_MOVE),
GB_CONSTANT("SizeH", "i", CURSOR_EW_RESIZE),
GB_CONSTANT("SizeV", "i", CURSOR_NS_RESIZE),
GB_CONSTANT("SizeN", "i", CURSOR_N_RESIZE),
GB_CONSTANT("SizeS", "i", CURSOR_S_RESIZE),
GB_CONSTANT("SizeW", "i", CURSOR_W_RESIZE),
GB_CONSTANT("SizeE", "i", CURSOR_E_RESIZE),
GB_CONSTANT("SizeNW", "i", CURSOR_NW_RESIZE), //FDiag
GB_CONSTANT("SizeSE", "i", CURSOR_SE_RESIZE),
GB_CONSTANT("SizeNE", "i", CURSOR_NE_RESIZE), //BDiag
GB_CONSTANT("SizeSW", "i", CURSOR_SW_RESIZE),
GB_CONSTANT("SizeNWSE", "i", CURSOR_NWSE_RESIZE),
GB_CONSTANT("SizeNESW", "i", CURSOR_NESW_RESIZE),
GB_CONSTANT("SplitH", "i", CURSOR_COL_RESIZE), // SplitH
GB_CONSTANT("SplitV", "i", CURSOR_ROW_RESIZE), // SplitV
GB_CONSTANT("Pointing", "i", CURSOR_POINTER),
GB_CONSTANT("None", "i", CURSOR_NONE),
GB_CONSTANT("Help", "i", CURSOR_HELP),
GB_CONSTANT("Pointer", "i", CURSOR_POINTER),
GB_CONSTANT("ContextMenu", "i", CURSOR_CONTEXT_MENU),
GB_CONSTANT("Progress", "i", CURSOR_PROGRESS),
GB_CONSTANT("Cell", "i", CURSOR_CELL),
GB_CONSTANT("CrossHair", "i", CURSOR_CROSSHAIR),
GB_CONSTANT("VerticalText", "i", CURSOR_VERTICAL_TEXT),
GB_CONSTANT("Alias", "i", CURSOR_ALIAS),
GB_CONSTANT("Copy", "i", CURSOR_COPY),
GB_CONSTANT("NoDrop", "i", CURSOR_NO_DROP),
GB_CONSTANT("Move", "i", CURSOR_MOVE),
GB_CONSTANT("NotAllowed", "i", CURSOR_NOT_ALLOWED),
GB_CONSTANT("Grab", "i", CURSOR_GRAB),
GB_CONSTANT("Grabbing", "i", CURSOR_GRABBING),
GB_CONSTANT("AllScroll", "i", CURSOR_ALL_SCROLL),
GB_CONSTANT("ColResize", "i", CURSOR_COL_RESIZE),
GB_CONSTANT("RowResize", "i", CURSOR_ROW_RESIZE),
GB_CONSTANT("NResize", "i", CURSOR_N_RESIZE),
GB_CONSTANT("EResize", "i", CURSOR_E_RESIZE),
GB_CONSTANT("SResize", "i", CURSOR_S_RESIZE),
GB_CONSTANT("WResize", "i", CURSOR_W_RESIZE),
GB_CONSTANT("NEResize", "i", CURSOR_NE_RESIZE),
GB_CONSTANT("NWResize", "i", CURSOR_NW_RESIZE),
GB_CONSTANT("SWResize", "i", CURSOR_SW_RESIZE),
GB_CONSTANT("SEResize", "i", CURSOR_SE_RESIZE),
GB_CONSTANT("EWResize", "i", CURSOR_EW_RESIZE),
GB_CONSTANT("NSResize", "i", CURSOR_NS_RESIZE),
GB_CONSTANT("NESWResize", "i", CURSOR_NESW_RESIZE),
GB_CONSTANT("NWSEResize", "i", CURSOR_NWSE_RESIZE),
GB_CONSTANT("ZoomIn", "i", CURSOR_ZOOM_IN),
GB_CONSTANT("ZoomOut", "i", CURSOR_ZOOM_OUT),
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_PROPERTY_READ("X", "i", CCURSOR_x),
GB_PROPERTY_READ("Y", "i", CCURSOR_y),
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_END_DECLARE
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
};
GB_DESC CMouseDesc[] =
{
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
GB_DECLARE_VIRTUAL("Mouse"),
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_STATIC_PROPERTY_READ("ScreenX", "i", Mouse_ScreenX),
GB_STATIC_PROPERTY_READ("ScreenY", "i", Mouse_ScreenY),
GB_STATIC_METHOD("Move", 0, Mouse_Move, "(X)i(Y)i"),
GB_STATIC_METHOD("Inside", "b", Mouse_Inside, "(Control)Control"),
GB_CONSTANT("Custom", "i", CURSOR_CUSTOM),
The mouse cursor type constants are now defined in the Cursor class. Add more mouse cursor constants. [GB.GTK] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants. [GB.GTK3] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants. [GB.QT4] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants. [GB.QT5] * NEW: The mouse cursor type constants are now defined in the Cursor class. * NEW: Add more mouse cursor constants.
2021-10-29 16:32:38 +02:00
GB_CONSTANT("Default", "i", CURSOR_DEFAULT),
GB_CONSTANT("Blank", "i", CURSOR_NONE),
GB_CONSTANT("Arrow", "i", CURSOR_ARROW),
GB_CONSTANT("Cross", "i", CURSOR_CROSSHAIR),
GB_CONSTANT("Wait", "i", CURSOR_WAIT),
GB_CONSTANT("Text", "i", CURSOR_TEXT),
GB_CONSTANT("SizeAll", "i", CURSOR_MOVE),
GB_CONSTANT("SizeH", "i", CURSOR_EW_RESIZE),
GB_CONSTANT("SizeV", "i", CURSOR_NS_RESIZE),
GB_CONSTANT("SizeN", "i", CURSOR_N_RESIZE),
GB_CONSTANT("SizeS", "i", CURSOR_S_RESIZE),
GB_CONSTANT("SizeW", "i", CURSOR_W_RESIZE),
GB_CONSTANT("SizeE", "i", CURSOR_E_RESIZE),
GB_CONSTANT("SizeNW", "i", CURSOR_NW_RESIZE), //FDiag
GB_CONSTANT("SizeSE", "i", CURSOR_SE_RESIZE),
GB_CONSTANT("SizeNE", "i", CURSOR_NE_RESIZE), //BDiag
GB_CONSTANT("SizeSW", "i", CURSOR_SW_RESIZE),
GB_CONSTANT("SizeNWSE", "i", CURSOR_NWSE_RESIZE),
GB_CONSTANT("SizeNESW", "i", CURSOR_NESW_RESIZE),
GB_CONSTANT("SplitH", "i", CURSOR_COL_RESIZE), // SplitH
GB_CONSTANT("SplitV", "i", CURSOR_ROW_RESIZE), // SplitV
GB_CONSTANT("Pointing", "i", CURSOR_POINTER),
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_CONSTANT("Horizontal", "i", 0),
GB_CONSTANT("Vertical", "i", 1),
GB_STATIC_PROPERTY_READ("X", "i", Mouse_X),
GB_STATIC_PROPERTY_READ("Y", "i", Mouse_Y),
GB_STATIC_PROPERTY_READ("StartX", "i", Mouse_StartX),
GB_STATIC_PROPERTY_READ("StartY", "i", Mouse_StartY),
GB_STATIC_PROPERTY_READ("Left", "b", Mouse_Left),
GB_STATIC_PROPERTY_READ("Right", "b", Mouse_Right),
GB_STATIC_PROPERTY_READ("Middle", "b", Mouse_Middle),
GB_STATIC_PROPERTY_READ("Button", "i", Mouse_Button),
[DEVELOPMENT ENVIRONMENT] * NEW: Try to avoir Application.Busy flickering in some dialogs. [EXAMPLES] * NEW: New Tablet event inspired by a project made by Ricardo Díaz Martín. [GB.DRAW] * NEW: Paint.DrawImage() takes a new optional argument that defines the opacity of the drawing, between 0 and 1. [GB.FORM] * NEW: ScrollArea.Tablet is a new property that allows it to catch tablet events. [GB.GTK] * BUG: Support for tablet events. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. * BUG: DrawingArea.Tablet now works correctly when the DrawingArea is not cached. [GB.QT4] * BUG: Mouse events from tablet now get accurate button information. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. git-svn-id: svn://localhost/gambas/trunk@5057 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-19 15:01:57 +02:00
GB_STATIC_PROPERTY_READ("State", "i", Mouse_State),
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_STATIC_PROPERTY_READ("Shift", "b", Mouse_Shift),
GB_STATIC_PROPERTY_READ("Control", "b", Mouse_Control),
GB_STATIC_PROPERTY_READ("Alt", "b", Mouse_Alt),
GB_STATIC_PROPERTY_READ("Meta", "b", Mouse_Meta),
GB_STATIC_PROPERTY_READ("Normal", "b", Mouse_Normal),
GB_STATIC_PROPERTY_READ("Orientation", "i", Mouse_Orientation),
GB_STATIC_PROPERTY_READ("Delta", "f", Mouse_Delta),
GB_STATIC_PROPERTY_READ("Forward", "b", Mouse_Forward),
Add Mouse.Click property and fix gb.gtk3 style methods. [GB.GTK] * NEW: Mouse.Click is a new property that returns the click index in a multi-click event. * NEW: Style.Name is now lowercase. [GB.GTK3] * NEW: Mouse.Click is a new property that returns the click index in a multi-click event. * NEW: Style.Name is now lowercase. * BUG: Fix Style.PaintCheck() and Style.PaintArrow() for GTK+ >= 3.14.
2020-05-19 22:23:02 +02:00
GB_STATIC_PROPERTY_READ("Click", "i", Mouse_Click),
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
[CONFIGURATION] * NEW: Chinese translations updated everywhere. [DEVELOPMENT ENVIRONMENT] * NEW: Update Gambas fonts. * BUG: In the menu editor, the last menu can be move up now. * NEW: Add "GB_REVERSE=1" in the environment variable list of the project properties dialog. [GB.DB.FORM] * NEW: The DataCheckBox control now raises its Click event as expected. [GB.FORM] * BUG: The icon of the FileProperties control now correctly adapts its size. [GB.FORM.MDI] * NEW: ToolBar now inverts its layout if the current language is right-to- left written. [GB.GTK] * NEW: Mouse.Translate() is a new method that allows to translate the current mouse event. * BUG: The rtl layout is correctly initialized at startup. [GB.GUI.BASE] * NEW: ScrollArea, GridView, TreeView and its friends now invert their layout if the current language is right-to-left written. [GB.NET.POP3] * BUG: Error messages must not be translatable. [GB.QT4] * NEW: Mouse.Translate() is a new method that allows to translate the current mouse event. git-svn-id: svn://localhost/gambas/trunk@5993 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2013-12-09 20:42:30 +01:00
GB_STATIC_METHOD("Translate", NULL, Mouse_Translate, "(DX)i(DY)i"),
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
GB_END_DECLARE
};
GB_DESC CPointerDesc[] =
{
GB_DECLARE_VIRTUAL("Pointer"),
GB_CONSTANT("Mouse", "i", POINTER_MOUSE),
GB_CONSTANT("Pen", "i", POINTER_PEN),
GB_CONSTANT("Eraser", "i", POINTER_ERASER),
GB_CONSTANT("Cursor", "i", POINTER_CURSOR),
GB_STATIC_PROPERTY_READ("Type", "i", Pointer_Type),
GB_STATIC_PROPERTY_READ("X", "f", Pointer_X),
GB_STATIC_PROPERTY_READ("Y", "f", Pointer_Y),
[DEVELOPMENT ENVIRONMENT] * BUG: Fix a possible crash in form editor arrangement icons managemnt. [GB.GTK] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. * BUG: Try to activate all XInput devices when the DrawingArea.Tablet property is set. [GB.QT4] * NEW: DrawingArea.UseTablet has been renamed as DrawingArea.Tablet. * NEW: Pointer.ScreenX and Pointer.ScreenY are two new properties that replace Pointer.X and Pointer.Y. Pointer.X and Pointer.Y are yet there, but now they return the pointer position relative to the control receiving the event. git-svn-id: svn://localhost/gambas/trunk@5051 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-17 17:53:52 +02:00
GB_STATIC_PROPERTY_READ("ScreenX", "f", Pointer_ScreenX),
GB_STATIC_PROPERTY_READ("ScreenY", "f", Pointer_ScreenY),
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
GB_STATIC_PROPERTY_READ("XTilt", "f", Pointer_XTilt),
[DEVELOPMENT ENVIRONMENT] * NEW: Try to avoir Application.Busy flickering in some dialogs. [EXAMPLES] * NEW: New Tablet event inspired by a project made by Ricardo Díaz Martín. [GB.DRAW] * NEW: Paint.DrawImage() takes a new optional argument that defines the opacity of the drawing, between 0 and 1. [GB.FORM] * NEW: ScrollArea.Tablet is a new property that allows it to catch tablet events. [GB.GTK] * BUG: Support for tablet events. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. * BUG: DrawingArea.Tablet now works correctly when the DrawingArea is not cached. [GB.QT4] * BUG: Mouse events from tablet now get accurate button information. * BUG: Make mouse events in gb.gtk and gb.qt3 behave the same way. * NEW: Mouse.State is a new property that return the state of all mouse buttons as specified by the current mouse event. * NEW: Mouse.Button now only returns the index of the button that triggered the mouse event. * BUG: Fix a typo in the name of the Pointer.YTilt property. git-svn-id: svn://localhost/gambas/trunk@5057 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-19 15:01:57 +02:00
GB_STATIC_PROPERTY_READ("YTilt", "f", Pointer_YTilt),
[GB.FORM.MDI] * NEW: Little design fix in the shortcut configuration dialog. [GB.GTK] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. [GB.QT4] * NEW: Management of tablet events. At the moment only the DrawingArea control can catch them if its UseTablet property is TRUE. In that case, standard mouse events are raised, and the properties of the tablet event are stored in the new Pointer class. All that is not definitive. git-svn-id: svn://localhost/gambas/trunk@5024 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-08-10 01:39:29 +02:00
GB_STATIC_PROPERTY_READ("Pressure", "f", Pointer_Pressure),
GB_STATIC_PROPERTY_READ("Rotation", "f", Pointer_Rotation),
[GB.FORM] * NEW: ButtonBox use the new Style.BoxFrameWidth and Style.BoxFrameHeight properties to draw itself. [GB.GTK] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * BUG: The DrawingArea draw event is raised before other internal drawing events now, not after. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. [GB.QT4] * NEW: Style.BoxFrameWidth and Style.BoxFrameHeight are two new properties that replace Style.TextBoxFrameWidth. * NEW: Mouse.Forward is a new property that returns if Mouse.Delta is positive. * NEW: Mouse.Inside() is a new method that returns if the mouse cursor is inside a specific control. git-svn-id: svn://localhost/gambas/trunk@4836 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2012-06-16 03:27:32 +02:00
GB_END_DECLARE
* Copy https://gambas.svn.sourceforge.net/svnroot/gambas/2.0 to https://gambas.svn.sourceforge.net/svnroot/gambas/gambas git-svn-id: svn://localhost/gambas/trunk@893 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2007-12-30 17:41:49 +01:00
};
******** Merged /branches/64bits r918:1003 into /trunk [CONFIGURATION] * NEW: 64 bits port. [EXAMPLES] * BUG: Fixed the AnalogWatch example. [WIKI CGI SCRIPT] * NEW: Some little cosmetic changes. [INTERPRETER] * NEW: The extern function implementation has been redesigned and is now based on libffi, so that it works on 64 bits system. Because of a flaw in the compiler design, projects that use the Pointer datatype must be recompiled to be used on a 64 bits system. This flaw will be fixed in Gambas 3. * OPT: Put some tables into read-only memory. About 1000 bytes are saved for each running interpreter, except the first one. * BUG: Does not crash anymore if a component cannot be loaded. * NEW: Spanish translation updated. * NEW: A new interpreter API for returning a pointer. [COMPILER] * BUG: Correctly compiles LONG constants inside code. [GB.DEBUG] * BUG: Compiles and links the gb.debug components with the thread libraries. [GB.DB.SQLITE3] * BUG: Getting the primary index of a table without primary index is safe now. [GB.GTK] * BUG: Modified the GLib priority of watched descriptors, as the main loop could enter in a loop in which user interface events were not managed. * BUG: Message boxes use application title without crashing now. [GB.OPENGL] * BUG: Disable dead code. [GB.QT.EXT] * BUG: TextEdit.TextWidth and TextEdit.TextHeight were not declared as read-only properties. [GB.XML.XSLT] * BUG: XSLT class is now declared as being not creatable. git-svn-id: svn://localhost/gambas/trunk@1006 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2008-01-17 22:39:26 +01:00
Reference in a new issue Copy permalink