summaryrefslogtreecommitdiff
path: root/src/gui
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2013-07-15 15:02:09 +0100
committerGraeme Geldenhuys <graemeg@gmail.com>2013-07-15 15:02:09 +0100
commitc0e97a8f456af182bd16d563e8e712c12ade2e06 (patch)
tree4a61ae2f24bc622558fecfe5b800238ecfef0311 /src/gui
parent3b0c0ee0057f95bd09806c85a215a0ac5f0b1513 (diff)
downloadfpGUI-c0e97a8f456af182bd16d563e8e712c12ade2e06.tar.xz
tabs: ensures that scroll buttons are not visible
Diffstat (limited to 'src/gui')
-rw-r--r--src/gui/fpg_tab.pas5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/gui/fpg_tab.pas b/src/gui/fpg_tab.pas
index 0837171f..6db30580 100644
--- a/src/gui/fpg_tab.pas
+++ b/src/gui/fpg_tab.pas
@@ -630,6 +630,11 @@ begin
if FTabPosition = AValue then
Exit; //==>
FTabPosition := AValue;
+ if FTabPosition = tpNone then
+ begin
+ FLeftButton.Visible := False;
+ FRightButton.Visible := False;
+ end;
RePaint;
end;