diff options
Diffstat (limited to 'packages/ptc/src/core')
41 files changed, 103 insertions, 53 deletions
diff --git a/packages/ptc/src/core/aread.inc b/packages/ptc/src/core/aread.inc index ea2f55569b..290282ab12 100644 --- a/packages/ptc/src/core/aread.inc +++ b/packages/ptc/src/core/aread.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/areai.inc b/packages/ptc/src/core/areai.inc index c94eba26a7..397ce99f39 100644 --- a/packages/ptc/src/core/areai.inc +++ b/packages/ptc/src/core/areai.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/baseconsoled.inc b/packages/ptc/src/core/baseconsoled.inc index 9a9133a0ac..b4785650b6 100644 --- a/packages/ptc/src/core/baseconsoled.inc +++ b/packages/ptc/src/core/baseconsoled.inc @@ -1,6 +1,6 @@ { Free Pascal port of the OpenPTC C++ library. - Copyright (C) 2001-2003, 2006, 2007, 2009-2013 Nikolay Nikolov (nickysn@users.sourceforge.net) + Copyright (C) 2001-2003, 2006, 2007, 2009-2013, 2016 Nikolay Nikolov (nickysn@users.sourceforge.net) Original C++ version by Glenn Fiedler (ptc@gaffer.org) This library is free software; you can redistribute it and/or @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type @@ -70,6 +70,9 @@ type function GetKeyReleaseEnabled: Boolean; property KeyReleaseEnabled: Boolean read GetKeyReleaseEnabled write SetKeyReleaseEnabled; + { mouse handling } + function MoveMouseTo(X, Y: Integer): Boolean; + property Pages: Integer read GetPages; property Name: string read GetName; property Title: string read GetTitle; diff --git a/packages/ptc/src/core/baseconsolei.inc b/packages/ptc/src/core/baseconsolei.inc index b970186e50..e41eaf745d 100644 --- a/packages/ptc/src/core/baseconsolei.inc +++ b/packages/ptc/src/core/baseconsolei.inc @@ -1,6 +1,6 @@ { Free Pascal port of the OpenPTC C++ library. - Copyright (C) 2001-2003, 2006, 2007, 2009-2013 Nikolay Nikolov (nickysn@users.sourceforge.net) + Copyright (C) 2001-2003, 2006, 2007, 2009-2013, 2016, 2017 Nikolay Nikolov (nickysn@users.sourceforge.net) Original C++ version by Glenn Fiedler (ptc@gaffer.org) This library is free software; you can redistribute it and/or @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type @@ -117,6 +117,9 @@ type procedure ReadKey; property KeyReleaseEnabled: Boolean read GetKeyReleaseEnabled write SetKeyReleaseEnabled; + { mouse handling } + function MoveMouseTo(X, Y: Integer): Boolean; virtual; + property Pages: Integer read GetPages; property Name: string read GetName; property Title: string read GetTitle; @@ -212,6 +215,12 @@ begin Result := FReleaseEnabled; end; +{ must be overriden in consoles, that support moving the mouse cursor } +function TPTCBaseConsole.MoveMouseTo(X, Y: Integer): Boolean; +begin + Result := False; +end; + function TPTCOpenGLLessConsole.GetOpenGL_Enabled: Boolean; begin Result := False; diff --git a/packages/ptc/src/core/basesurfaced.inc b/packages/ptc/src/core/basesurfaced.inc index 0e26ce0ac2..56711cf9ff 100644 --- a/packages/ptc/src/core/basesurfaced.inc +++ b/packages/ptc/src/core/basesurfaced.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/basesurfacei.inc b/packages/ptc/src/core/basesurfacei.inc index 11d7a83ba0..30b16138f9 100644 --- a/packages/ptc/src/core/basesurfacei.inc +++ b/packages/ptc/src/core/basesurfacei.inc @@ -27,5 +27,5 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } diff --git a/packages/ptc/src/core/cleard.inc b/packages/ptc/src/core/cleard.inc index 069276f2e0..47b3b6f5b1 100644 --- a/packages/ptc/src/core/cleard.inc +++ b/packages/ptc/src/core/cleard.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/cleari.inc b/packages/ptc/src/core/cleari.inc index 3b0cebf4f0..e00f6245d0 100644 --- a/packages/ptc/src/core/cleari.inc +++ b/packages/ptc/src/core/cleari.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } constructor TPTCClear.Create; diff --git a/packages/ptc/src/core/clipperd.inc b/packages/ptc/src/core/clipperd.inc index 588e53d90a..2afb601004 100644 --- a/packages/ptc/src/core/clipperd.inc +++ b/packages/ptc/src/core/clipperd.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/clipperi.inc b/packages/ptc/src/core/clipperi.inc index 50ca03c918..7bdf28d50d 100644 --- a/packages/ptc/src/core/clipperi.inc +++ b/packages/ptc/src/core/clipperi.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } {$INLINE ON} diff --git a/packages/ptc/src/core/closeeventd.inc b/packages/ptc/src/core/closeeventd.inc index a38e2b1f55..74d5c425b0 100644 --- a/packages/ptc/src/core/closeeventd.inc +++ b/packages/ptc/src/core/closeeventd.inc @@ -26,7 +26,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/closeeventi.inc b/packages/ptc/src/core/closeeventi.inc index e1b2fbee2d..5b42043634 100644 --- a/packages/ptc/src/core/closeeventi.inc +++ b/packages/ptc/src/core/closeeventi.inc @@ -26,7 +26,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/colord.inc b/packages/ptc/src/core/colord.inc index 6894197fe6..31891418d9 100644 --- a/packages/ptc/src/core/colord.inc +++ b/packages/ptc/src/core/colord.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/colori.inc b/packages/ptc/src/core/colori.inc index 982aa392f1..9b991c5df7 100644 --- a/packages/ptc/src/core/colori.inc +++ b/packages/ptc/src/core/colori.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/consoled.inc b/packages/ptc/src/core/consoled.inc index b742a6b6d3..068bbb8d7d 100644 --- a/packages/ptc/src/core/consoled.inc +++ b/packages/ptc/src/core/consoled.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/consolei.inc b/packages/ptc/src/core/consolei.inc index c0aac1a5de..3188b7f473 100644 --- a/packages/ptc/src/core/consolei.inc +++ b/packages/ptc/src/core/consolei.inc @@ -1,6 +1,6 @@ { Free Pascal port of the OpenPTC C++ library. - Copyright (C) 2001-2003, 2006, 2007, 2009-2013, 2015 Nikolay Nikolov (nickysn@users.sourceforge.net) + Copyright (C) 2001-2003, 2006, 2007, 2009-2013, 2015, 2016 Nikolay Nikolov (nickysn@users.sourceforge.net) Original C++ version by Glenn Fiedler (ptc@gaffer.org) This library is free software; you can redistribute it and/or @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type @@ -114,6 +114,7 @@ type function GetInformation: string; override; function NextEvent(out AEvent: IPTCEvent; AWait: Boolean; const AEventMask: TPTCEventMask): Boolean; override; function PeekEvent(AWait: Boolean; const AEventMask: TPTCEventMask): IPTCEvent; override; + function MoveMouseTo(X, Y: Integer): Boolean; override; procedure OpenGL_SwapBuffers; override; procedure OpenGL_SetSwapInterval(AInterval: Integer); override; function OpenGL_GetSwapInterval: Integer; override; @@ -839,6 +840,12 @@ begin raise TPTCError.Create('console is not open (core)'); end; +function TPTCConsole.MoveMouseTo(X, Y: Integer): Boolean; +begin + Check; + Result := FConsole.MoveMouseTo(X, Y); +end; + procedure TPTCConsole.PassOpenGLOptionsToInnerConsole; begin FConsole.OpenGL_Enabled := FUseOpenGL; diff --git a/packages/ptc/src/core/copyd.inc b/packages/ptc/src/core/copyd.inc index bc6c22737b..2332a10a7a 100644 --- a/packages/ptc/src/core/copyd.inc +++ b/packages/ptc/src/core/copyd.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/copyi.inc b/packages/ptc/src/core/copyi.inc index 6b6924e4d8..c289226c14 100644 --- a/packages/ptc/src/core/copyi.inc +++ b/packages/ptc/src/core/copyi.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } constructor TPTCCopy.Create; diff --git a/packages/ptc/src/core/errord.inc b/packages/ptc/src/core/errord.inc index 3db1d3e78d..0610096677 100644 --- a/packages/ptc/src/core/errord.inc +++ b/packages/ptc/src/core/errord.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/errori.inc b/packages/ptc/src/core/errori.inc index 0d01bf5311..bad8422de0 100644 --- a/packages/ptc/src/core/errori.inc +++ b/packages/ptc/src/core/errori.inc @@ -1,6 +1,6 @@ { Free Pascal port of the OpenPTC C++ library. - Copyright (C) 2001-2007, 2009, 2010, 2012 Nikolay Nikolov (nickysn@users.sourceforge.net) + Copyright (C) 2001-2007, 2009, 2010, 2012, 2013 Nikolay Nikolov (nickysn@users.sourceforge.net) Original C++ version by Glenn Fiedler (ptc@gaffer.org) This library is free software; you can redistribute it and/or @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } constructor TPTCError.Create; diff --git a/packages/ptc/src/core/eventd.inc b/packages/ptc/src/core/eventd.inc index 5aa70b1363..dc5354e2b5 100644 --- a/packages/ptc/src/core/eventd.inc +++ b/packages/ptc/src/core/eventd.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/eventi.inc b/packages/ptc/src/core/eventi.inc index aa325b854b..7816a2baa0 100644 --- a/packages/ptc/src/core/eventi.inc +++ b/packages/ptc/src/core/eventi.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } {function TPTCExposeEvent.GetType: TPTCEventType; diff --git a/packages/ptc/src/core/formatd.inc b/packages/ptc/src/core/formatd.inc index 5db2569262..99e0f92415 100644 --- a/packages/ptc/src/core/formatd.inc +++ b/packages/ptc/src/core/formatd.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/formati.inc b/packages/ptc/src/core/formati.inc index 76c621a183..fac28fefb9 100644 --- a/packages/ptc/src/core/formati.inc +++ b/packages/ptc/src/core/formati.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/keyeventd.inc b/packages/ptc/src/core/keyeventd.inc index f700a992d9..add306b39f 100644 --- a/packages/ptc/src/core/keyeventd.inc +++ b/packages/ptc/src/core/keyeventd.inc @@ -1,6 +1,6 @@ { Free Pascal port of the OpenPTC C++ library. - Copyright (C) 2001-2003, 2006, 2007, 2009-2011, 2015 Nikolay Nikolov (nickysn@users.sourceforge.net) + Copyright (C) 2001-2003, 2006, 2007, 2009-2011, 2015, 2017 Nikolay Nikolov (nickysn@users.sourceforge.net) Original C++ version by Glenn Fiedler (ptc@gaffer.org) This library is free software; you can redistribute it and/or @@ -27,11 +27,16 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type - TPTCModifierKey = (pmkAlt, pmkShift, pmkControl); + TPTCModifierKey = (pmkAlt, pmkShift, pmkControl, pmkLeftAlt, pmkRightAlt, + pmkLeftShift, pmkRightShift, pmkLeftControl, pmkRightControl, + pmkNumLockActive, pmkNumLockPressed, + pmkCapsLockActive, pmkCapsLockPressed, + pmkScrollLockActive, pmkScrollLockPressed, + pmkRightKey, pmkNumPadKey, pmkDeadKey); TPTCModifierKeys = set of TPTCModifierKey; IPTCKeyEvent = interface(IPTCEvent) ['{9BD1CD41-1DF6-4392-99DC-885EADB6D85A}'] diff --git a/packages/ptc/src/core/keyeventi.inc b/packages/ptc/src/core/keyeventi.inc index ab9629c133..4fe9c4c61e 100644 --- a/packages/ptc/src/core/keyeventi.inc +++ b/packages/ptc/src/core/keyeventi.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type TPTCKeyEvent = class(TPTCEvent, IPTCKeyEvent) diff --git a/packages/ptc/src/core/log.inc b/packages/ptc/src/core/log.inc index 0641069b9b..7c8a93096d 100644 --- a/packages/ptc/src/core/log.inc +++ b/packages/ptc/src/core/log.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } {$IFNDEF WinCE} diff --git a/packages/ptc/src/core/moded.inc b/packages/ptc/src/core/moded.inc index df2ad4b876..039e7528c4 100644 --- a/packages/ptc/src/core/moded.inc +++ b/packages/ptc/src/core/moded.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/modei.inc b/packages/ptc/src/core/modei.inc index c927b370d2..f15dbd719c 100644 --- a/packages/ptc/src/core/modei.inc +++ b/packages/ptc/src/core/modei.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/mouseeventd.inc b/packages/ptc/src/core/mouseeventd.inc index 8ab5913fce..b84b4964a1 100644 --- a/packages/ptc/src/core/mouseeventd.inc +++ b/packages/ptc/src/core/mouseeventd.inc @@ -1,6 +1,6 @@ { Free Pascal port of the OpenPTC C++ library. - Copyright (C) 2001-2007, 2009-2011 Nikolay Nikolov (nickysn@users.sourceforge.net) + Copyright (C) 2001-2007, 2009-2011, 2016 Nikolay Nikolov (nickysn@users.sourceforge.net) Original C++ version by Glenn Fiedler (ptc@gaffer.org) This library is free software; you can redistribute it and/or @@ -27,18 +27,44 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type {todo TPTCMouseCursor = (PTCMouseCursorDefault, PTCMouseCursorAlwaysVisible, PTCMouseCursorAlwaysInvisible);} - TPTCMouseButton = (PTCMouseButton1, { left mouse button } - PTCMouseButton2, { right mouse button } - PTCMouseButton3, { middle mouse button } - PTCMouseButton4, - PTCMouseButton5); + TPTCMouseButton = (PTCMouseButton1, { left mouse button } + PTCMouseButton2, { right mouse button } + PTCMouseButton3, { middle mouse button } + PTCMouseButton4, { mouse wheel rotated forward (scroll up) } + PTCMouseButton5, { mouse wheel rotated backward (scroll down) } + PTCMouseButton6, { mouse horizontal scroll wheel rotated left } + PTCMouseButton7, { mouse horizontal scroll wheel rotated right } + PTCMouseButton8, { "back" button ("X button 1") } + PTCMouseButton9, { "forward" button ("X button 2") } + PTCMouseButton10, + PTCMouseButton11, + PTCMouseButton12, + PTCMouseButton13, + PTCMouseButton14, + PTCMouseButton15, + PTCMouseButton16, + PTCMouseButton17, + PTCMouseButton18, + PTCMouseButton19, + PTCMouseButton20, + PTCMouseButton21, + PTCMouseButton22, + PTCMouseButton23, + PTCMouseButton24, + PTCMouseButton25, + PTCMouseButton26, + PTCMouseButton27, + PTCMouseButton28, + PTCMouseButton29, + PTCMouseButton30, + PTCMouseButton31); TPTCMouseButtonState = set of TPTCMouseButton; IPTCMouseEvent = interface(IPTCEvent) ['{4D093608-6F27-4578-B41E-3492A4C7FEED}'] diff --git a/packages/ptc/src/core/mouseeventi.inc b/packages/ptc/src/core/mouseeventi.inc index aff688ff72..507b77193d 100644 --- a/packages/ptc/src/core/mouseeventi.inc +++ b/packages/ptc/src/core/mouseeventi.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/openglattributesd.inc b/packages/ptc/src/core/openglattributesd.inc index d47f83f4bb..8257b7ff99 100644 --- a/packages/ptc/src/core/openglattributesd.inc +++ b/packages/ptc/src/core/openglattributesd.inc @@ -26,7 +26,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/openglattributesi.inc b/packages/ptc/src/core/openglattributesi.inc index eaf0a4e21b..ad341fc7a1 100644 --- a/packages/ptc/src/core/openglattributesi.inc +++ b/packages/ptc/src/core/openglattributesi.inc @@ -26,7 +26,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/paletted.inc b/packages/ptc/src/core/paletted.inc index 479292033f..7e025791a2 100644 --- a/packages/ptc/src/core/paletted.inc +++ b/packages/ptc/src/core/paletted.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/palettei.inc b/packages/ptc/src/core/palettei.inc index 322da209bd..510f15b4a9 100644 --- a/packages/ptc/src/core/palettei.inc +++ b/packages/ptc/src/core/palettei.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/resizeeventd.inc b/packages/ptc/src/core/resizeeventd.inc index 66a6edb706..053ac8b349 100644 --- a/packages/ptc/src/core/resizeeventd.inc +++ b/packages/ptc/src/core/resizeeventd.inc @@ -26,7 +26,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/resizeeventi.inc b/packages/ptc/src/core/resizeeventi.inc index 7c8cc6ded9..6b581bdd25 100644 --- a/packages/ptc/src/core/resizeeventi.inc +++ b/packages/ptc/src/core/resizeeventi.inc @@ -26,7 +26,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/surfaced.inc b/packages/ptc/src/core/surfaced.inc index b22e1512af..fd39a155c9 100644 --- a/packages/ptc/src/core/surfaced.inc +++ b/packages/ptc/src/core/surfaced.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/surfacei.inc b/packages/ptc/src/core/surfacei.inc index b51f7e7beb..73b590e21e 100644 --- a/packages/ptc/src/core/surfacei.inc +++ b/packages/ptc/src/core/surfacei.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/timerd.inc b/packages/ptc/src/core/timerd.inc index 9de79eb7a0..210652ae3b 100644 --- a/packages/ptc/src/core/timerd.inc +++ b/packages/ptc/src/core/timerd.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type diff --git a/packages/ptc/src/core/timeri.inc b/packages/ptc/src/core/timeri.inc index e63d91e996..ef48bbebd2 100644 --- a/packages/ptc/src/core/timeri.inc +++ b/packages/ptc/src/core/timeri.inc @@ -27,7 +27,7 @@ You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA } type |