diff options
Diffstat (limited to 'examples/gui/tabtest')
| -rw-r--r-- | examples/gui/tabtest/tabtest.lpr | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/examples/gui/tabtest/tabtest.lpr b/examples/gui/tabtest/tabtest.lpr index 3675e29a..75d23dfe 100644 --- a/examples/gui/tabtest/tabtest.lpr +++ b/examples/gui/tabtest/tabtest.lpr @@ -106,6 +106,7 @@ begin pcMain.Width := Width - 20; pcMain.Height := 300; pcMain.Anchors := [anLeft, anTop, anRight, anBottom]; + pcMain.ActiveTabColor:= clOrangeRed; // pcMain.FixedTabWidth:=150; // Tab One @@ -124,6 +125,8 @@ begin // Tab Three tsThree := TfpgTabSheet.Create(pcMain); tsThree.Text := 'Tab Three'; + tsThree.BackgroundColor:= clWheat; + tsThree.TabColor:= clLightBlue; CreateLabel(tsThree, 80, 50, 'TabSheet Three'); // Tab Four |