diff options
-rw-r--r-- | src/corelib/fpg_main.pas | 5 | ||||
-rw-r--r-- | src/corelib/x11/fpg_x11.pas | 1 | ||||
-rw-r--r-- | src/gui/fpg_basegrid.pas | 2 |
3 files changed, 3 insertions, 5 deletions
diff --git a/src/corelib/fpg_main.pas b/src/corelib/fpg_main.pas index 366867f2..b49006e5 100644 --- a/src/corelib/fpg_main.pas +++ b/src/corelib/fpg_main.pas @@ -1522,9 +1522,8 @@ begin // vertical alignment if (txtBottom in AFlags) then ny := y + l + h - htxt - else - if (txtVCenter in AFlags) then - ny := y + l + (h - htxt) div 2 + else if (txtVCenter in AFlags) then + ny := y + l + ((h - htxt) div 2) else // txtTop is default ny := y + l; diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index 4556d4ff..3d3d3df9 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -1718,7 +1718,6 @@ destructor TfpgFontResourceImpl.Destroy; begin if HandleIsValid then XftFontClose(xapplication.Display, FFontData); - inherited; end; diff --git a/src/gui/fpg_basegrid.pas b/src/gui/fpg_basegrid.pas index c67f7b9d..7c9e757f 100644 --- a/src/gui/fpg_basegrid.pas +++ b/src/gui/fpg_basegrid.pas @@ -633,7 +633,7 @@ begin Include(drawstate, gdFocused); if (row = FFocusRow) and (col = FFocusCol) then Include(drawstate, gdSelected); - + if DoDrawCellEvent(row, col, r, drawstate) then DrawCell(row, col, r, drawstate); |