Skip to content
Commits on Source (4)
......@@ -7,7 +7,7 @@ Component=gb.image
Component=gb.gui
Arguments=[["-style=oxygen"],["-style=qtcurve"]]
CurrentArgument=0
Environment="GB_GUI=gb.qt5\nLIBOVERLAY_SCROLLBAR=0\nGB_REVERSE=0"
Environment="GB_GUI=gb.gtk3\nLIBOVERLAY_SCROLLBAR=0\nGB_REVERSE=0"
TabSize=2
Language=fr
Type=Component
......
......@@ -49,7 +49,7 @@ Public Sub Run(sIcon As String, sText As String, aButton As String[]) As Integer
hButton.W = Max(Desktop.Scale * 14, hButton.Font.TextWidth(hButton.Text) + Desktop.Scale * 2)
H = Max(H, hButton.Font.TextHeight(hButton.Text))
WB += hButton.W + Desktop.Scale
If I = 0 Then hButton.Default = True
If I = 0 Then hButton.SetFocus()
If I = aButton.Max Then hButton.Cancel = True
Next
panButton.H = Max(H, Desktop.Scale * 4)
......@@ -79,3 +79,17 @@ Public Sub Button_Click()
End
Public Sub Form_KeyPress()
Dim hButton As Button
If Key.Code = Key.Return Or If Key.Code = Key.Enter Then
Try hButton = Application.ActiveControl
If hButton Then
hButton.Value = True
Stop Event
Endif
Endif
End
......@@ -335,8 +335,10 @@ static GB_TYPE conv_type(Oid type)
case FLOAT8OID:
return GB_T_FLOAT;
#ifdef ABSTIMEOID
case ABSTIMEOID:
case RELTIMEOID:
#endif
case DATEOID:
case TIMEOID:
case TIMESTAMPOID:
......@@ -418,8 +420,10 @@ static void conv_data(const char *data, int len, GB_VARIANT_VALUE *val, Oid type
break;
#ifdef ABSTIMEOID
case ABSTIMEOID:
case RELTIMEOID:
#endif
case DATEOID:
case TIMEOID:
case TIMESTAMPOID:
......@@ -439,8 +443,10 @@ static void conv_data(const char *data, int len, GB_VARIANT_VALUE *val, Oid type
switch(type)
{
#ifdef ABSTIMEOID
case ABSTIMEOID:
case RELTIMEOID:
#endif
case DATEOID:
sscanf(data, "%4d-%2d-%2d", &date.year, &date.month, &date.day);
......
......@@ -1252,7 +1252,7 @@ static int find(CARRAY *_object, int mode, void *value, int start)
}
#define IMPLEMENT_find_fast(_type, _gtype, _ctype) \
static int find_##_ctype(CARRAY *_object, int value, int start) \
static int find_##_ctype(CARRAY *_object, _ctype value, int start) \
{ \
int count = THIS->count; \
_ctype *data; \
......
## Package version and e-mail for bugs are defined here
m4_define([GB_VERSION], [3.14.1])
m4_define([GB_VERSION], [3.14.2])
m4_define([GB_MAIL], [gambas@users.sourceforge.net])
m4_define([GB_URL], [http://gambas.sourceforge.net])
m4_define([GB_VERSION_MAJOR], [3])
m4_define([GB_VERSION_MINOR], [14])
m4_define([GB_VERSION_RELEASE], [1])
m4_define([GB_VERSION_RELEASE], [2])
m4_define([GB_VERSION_FULL], [0x03140001])
m4_define([GB_VERSION_FULL], [0x03140002])
m4_define([GB_PCODE_VERSION], [0x03080000])
m4_define([GB_PCODE_VERSION_MIN],[0x03000000])