fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2020-04-19 16:32 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* contrib/hbct/dattime2.c
    % minor optimization

  * src/rdd/dbsql.c
    ; added somment with syntax info

  * include/inkey.ch
  * src/rtl/hbgtcore.c
    + added support for mouse wheel left and right events to base GT code
This commit is contained in:
Przemysław Czerpak
2020-04-19 16:32:11 +02:00
parent dc8fbceefe
commit e2ebc916a9
5 changed files with 22 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
ChangeLog.txt
View File

@@ -7,6 +7,17 @@
Entries may not always be in chronological/commit order.
See license at the end of file. */
2020-04-19 16:32 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* contrib/hbct/dattime2.c
% minor optimization
* src/rdd/dbsql.c
; added somment with syntax info
* include/inkey.ch
* src/rtl/hbgtcore.c
+ added support for mouse wheel left and right events to base GT code
2020-04-19 16:00 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* src/vm/dynsym.c
* src/vm/task.c

4
contrib/hbct/dattime2.c
View File

@@ -62,8 +62,8 @@
static HB_BOOL ct_isleap( int iYear )
{
return iYear != 0 && ( ( ( iYear & 3 ) == 0 && iYear % 100 != 0 ) ||
iYear % 400 == 0 );
return iYear != 0 && ( iYear & 3 ) == 0 &&
( iYear % 100 != 0 || iYear % 400 == 0 );
}
static int ct_daysinmonth( int iMonth, HB_BOOL bLeap )

2
include/inkey.ch
View File

@@ -88,6 +88,8 @@
#define K_MWFORWARD 1014 /* Mouse Wheel Forward */
#define K_MWBACKWARD 1015 /* Mouse Wheel Backward */
#define K_NCMOUSEMOVE 1016 /* Non-Client Area Mouse Movement */
#define K_MWLEFT 1017 /* Mouse Wheel Left */
#define K_MWRIGHT 1018 /* Mouse Wheel Right */
#define K_MINMOUSE 1001
#define K_MAXMOUSE 1016

3
src/rdd/dbsql.c
View File

@@ -343,6 +343,9 @@ static HB_ULONG hb_db2Sql( AREAP pArea, PHB_ITEM pFields, HB_MAXINT llNext,
return ulRecords;
}
/* __dbSQL( .T., <cFileName>, <cTable>, [<bFor>], [<bWhile>], ;
[<nNext>], [<nRec>], [<lRest>], [<lAppend>], [<lInsert>], ;
[<lRecNo>], [<cSep>], [<cDelim>], [<cEsc>] ) -> <nRecords> */
HB_FUNC( __DBSQL )
{
AREAP pArea = ( AREAP ) hb_rddGetCurrentWorkAreaPointer();

4
src/rtl/hbgtcore.c
View File

@@ -2679,6 +2679,8 @@ static int hb_gt_def_InkeyFilter( PHB_GT pGT, int iKey, int iEventMask )
break;
case K_MWFORWARD:
case K_MWBACKWARD:
case K_MWLEFT:
case K_MWRIGHT:
iMask = INKEY_MWHEEL;
break;
default:
@@ -2720,6 +2722,8 @@ static int hb_gt_def_InkeyFilter( PHB_GT pGT, int iKey, int iEventMask )
break;
case K_MWFORWARD:
case K_MWBACKWARD:
case K_MWLEFT:
case K_MWRIGHT:
iMask = INKEY_MWHEEL;
break;
case HB_K_RESIZE: