From 40b39e30fa2e7119963e0cadd141c95688f3f739 Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Sat, 24 Aug 2024 13:24:32 +0000 Subject: [PATCH] NiceSidebar: Remove non-default font name in demo1 git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9421 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/nicesidebar/Demo1/common/Unit1.lfm | 185 ++++++++---------- 1 file changed, 82 insertions(+), 103 deletions(-) diff --git a/components/nicesidebar/Demo1/common/Unit1.lfm b/components/nicesidebar/Demo1/common/Unit1.lfm index ae094e007..e10426253 100644 --- a/components/nicesidebar/Demo1/common/Unit1.lfm +++ b/components/nicesidebar/Demo1/common/Unit1.lfm @@ -1,128 +1,111 @@ object Form1: TForm1 Left = 290 - Height = 726 + Height = 484 Top = 140 - Width = 937 + Width = 625 BorderStyle = bsNone Caption = 'NiceSideBar Demo - priyatna.org' - ClientHeight = 726 - ClientWidth = 937 + ClientHeight = 484 + ClientWidth = 625 Color = clWhite - DesignTimePPI = 144 Position = poDesktopCenter LCLVersion = '3.99.0.0' object Shape1: TShape Left = 0 - Height = 170 + Height = 113 Top = 0 - Width = 937 + Width = 625 Align = alTop Brush.Color = 11626823 Pen.Color = 11626823 end object Shape2: TShape Left = 0 - Height = 12 - Top = 170 - Width = 937 + Height = 8 + Top = 113 + Width = 625 Align = alTop Brush.Color = clBlack end object Label1: TLabel - Left = 184 - Height = 90 - Top = 36 - Width = 725 + Left = 123 + Height = 59 + Top = 24 + Width = 483 Alignment = taRightJustify Anchors = [akTop, akRight] Caption = 'NiceSideBar Demo' Font.Color = 16766894 - Font.Height = -80 + Font.Height = -53 Font.Name = 'Bookman Old Style' ParentFont = False end object Label2: TLabel - Left = 556 - Height = 50 - Top = 108 - Width = 348 + Left = 375 + Height = 36 + Top = 72 + Width = 228 Alignment = taRightJustify Anchors = [akTop, akRight] Caption = 'priyatna.org' Font.Color = clWhite - Font.Height = -48 + Font.Height = -32 Font.Name = 'Courier New' ParentFont = False end object Label3: TLabel - Left = 324 - Height = 25 - Top = 648 - Width = 113 + Left = 216 + Height = 15 + Top = 432 + Width = 75 Caption = 'Hovered Item:' end object Label4: TLabel - Left = 324 - Height = 25 - Top = 672 - Width = 111 + Left = 216 + Height = 15 + Top = 448 + Width = 74 Caption = 'Selected Item:' end object Label5: TLabel - Left = 324 - Height = 25 - Top = 276 - Width = 402 + Left = 216 + Height = 15 + Top = 184 + Width = 268 Caption = 'Click on red button in the right top corner to close.' end object Label6: TLabel - Left = 324 - Height = 25 - Top = 300 - Width = 371 + Left = 216 + Height = 15 + Top = 200 + Width = 248 Caption = 'Click on green button to maximize and restore.' end object Label7: TLabel - Left = 324 - Height = 25 - Top = 324 - Width = 278 + Left = 216 + Height = 15 + Top = 216 + Width = 188 Caption = 'Click on yellow button to minimize.' end object NiceSideBar1: TNiceSideBar Left = 0 - Height = 534 - Top = 182 - Width = 290 + Height = 356 + Top = 121 + Width = 193 ItemStyle.NormalFont.Color = clWindowText - ItemStyle.NormalFont.Height = -17 - ItemStyle.NormalFont.Name = 'Arial' ItemStyle.NormalFont.Style = [fsBold] ItemStyle.HoverFont.Color = clRed - ItemStyle.HoverFont.Height = -17 - ItemStyle.HoverFont.Name = 'Arial' ItemStyle.HoverFont.Style = [fsBold] ItemStyle.SelectedFont.Color = clWindowText - ItemStyle.SelectedFont.Height = -17 - ItemStyle.SelectedFont.Name = 'Arial' ItemStyle.SelectedFont.Style = [fsBold] ItemStyle.DisabledFont.Color = clGrayText - ItemStyle.DisabledFont.Height = -17 - ItemStyle.DisabledFont.Name = 'Arial' ItemStyle.DisabledFont.Style = [fsBold] ItemStyle.NormalColor = 14145495 SubItemStyle.NormalFont.Color = clWindowText - SubItemStyle.NormalFont.Height = -17 - SubItemStyle.NormalFont.Name = 'Arial' SubItemStyle.HoverFont.Color = clRed - SubItemStyle.HoverFont.Height = -17 - SubItemStyle.HoverFont.Name = 'Arial' SubItemStyle.SelectedFont.Color = clWindowText - SubItemStyle.SelectedFont.Height = -17 - SubItemStyle.SelectedFont.Name = 'Arial' SubItemStyle.DisabledFont.Color = clGrayText - SubItemStyle.DisabledFont.Height = -17 - SubItemStyle.DisabledFont.Name = 'Arial' SubItemStyle.NormalColor = 14145495 Items = < item @@ -166,11 +149,7 @@ object Form1: TForm1 end> ItemIndex = 1 SubItemIndex = 2 - ItemHeight = 48 - SubItemHeight = 27 - Margin = 12 - GroupSeparator = 15 - Indent = 15 + ItemHeight = 32 AlwaysExpand = False Images = ImageList2 HoverImages = ImageList1 @@ -186,10 +165,10 @@ object Form1: TForm1 end object Panel1: TPanel Cursor = crHandPoint - Left = 807 - Height = 26 - Top = 24 - Width = 26 + Left = 539 + Height = 17 + Top = 16 + Width = 17 Anchors = [akTop, akRight] BevelOuter = bvNone Color = 8454143 @@ -200,10 +179,10 @@ object Form1: TForm1 end object Panel2: TPanel Cursor = crHandPoint - Left = 843 - Height = 26 - Top = 24 - Width = 26 + Left = 563 + Height = 17 + Top = 16 + Width = 17 Anchors = [akTop, akRight] BevelOuter = bvNone Color = 8454016 @@ -214,10 +193,10 @@ object Form1: TForm1 end object Panel3: TPanel Cursor = crHandPoint - Left = 879 - Height = 26 - Top = 24 - Width = 26 + Left = 587 + Height = 17 + Top = 16 + Width = 17 Anchors = [akTop, akRight] BevelOuter = bvNone Color = clRed @@ -228,9 +207,9 @@ object Form1: TForm1 end object Panel4: TPanel Left = 0 - Height = 10 - Top = 716 - Width = 937 + Height = 7 + Top = 477 + Width = 625 Align = alBottom BevelOuter = bvNone Caption = ' ' @@ -240,45 +219,45 @@ object Form1: TForm1 TabOrder = 4 end object Button1: TButton - Left = 324 - Height = 38 - Top = 396 - Width = 314 + Left = 216 + Height = 25 + Top = 264 + Width = 209 Caption = 'Toggle Item "Enable" Property' - OnClick = Button1Click TabOrder = 5 + OnClick = Button1Click end object Button2: TButton - Left = 324 - Height = 38 - Top = 444 - Width = 314 + Left = 216 + Height = 25 + Top = 296 + Width = 209 Caption = 'Toggle Sub Item "Enable" Property' - OnClick = Button2Click TabOrder = 6 + OnClick = Button2Click end object Button3: TButton - Left = 324 - Height = 38 - Top = 492 - Width = 314 + Left = 216 + Height = 25 + Top = 328 + Width = 209 Caption = 'Toggle Item "Visible" Property' - OnClick = Button3Click TabOrder = 7 + OnClick = Button3Click end object Button4: TButton - Left = 324 - Height = 38 - Top = 540 - Width = 314 + Left = 216 + Height = 25 + Top = 360 + Width = 209 Caption = 'Toggle Sub Item "Visible" Property' - OnClick = Button4Click TabOrder = 8 + OnClick = Button4Click end object ImageList2: TImageList Scaled = True - Left = 630 - Top = 203 + Left = 420 + Top = 135 Bitmap = { 4C7A070000001000000010000000690600000000000078DAD5586B6C1455143E F8C0F723C657A21235BE4DD4687C454934F1D1C45754445B1F80A0F12DBFAAA2 @@ -541,8 +520,8 @@ object Form1: TForm1 end object ImageList1: TImageList Scaled = True - Left = 444 - Top = 204 + Left = 296 + Top = 136 Bitmap = { 4C7A070000001000000010000000A70B00000000000078DAED99795C94D51AC7 A7D29BA2956DA2220C9A77516FB698968A0B5C48C0502BC9DC50732BCD2DBD19