summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-10-04 16:52:19 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-10-04 16:52:19 +0200
commit9b64729973ee8ab2d8bcf4a757007ec006ebf3ab (patch)
tree01ba3d8ad311f59de213043578c601d4a6132b8f
parent2e1ddf6255060348ea1f31b064497e22e0156b00 (diff)
downloadfpGUI-9b64729973ee8ab2d8bcf4a757007ec006ebf3ab.tar.xz
Splitter more visible in designer mode
Add extra border painting so it will be more visible in the UI Designer.
-rw-r--r--src/gui/fpg_splitter.pas10
1 files changed, 9 insertions, 1 deletions
diff --git a/src/gui/fpg_splitter.pas b/src/gui/fpg_splitter.pas
index 61ecbb6d..bf5410f0 100644
--- a/src/gui/fpg_splitter.pas
+++ b/src/gui/fpg_splitter.pas
@@ -339,7 +339,15 @@ var
begin
Canvas.SetColor(clWindowBackground);
Canvas.FillRectangle(GetClientRect);
-
+
+ { just to make it's borders more visible in the designer }
+ if csDesigning in ComponentState then
+ begin
+ Canvas.SetColor(clInactiveWgFrame);
+ Canvas.SetLineStyle(1, lsDash);
+ Canvas.DrawRectangle(0, 0, Width, Height);
+ end;
+
case Align of
alRight,
alLeft: