Ignore:
Timestamp:
Mar 7, 2011, 1:32:07 PM (13 years ago)
Author:
george
Message:
  • Fixed: Docking popupmenu action Close and Rename.
  • Added: Partialy implemented tab hiding.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • Docking/CoolDocking/Demo/UMainForm.lfm

    r103 r176  
    1111  OnDestroy = FormDestroy
    1212  OnShow = FormShow
    13   LCLVersion = '0.9.29'
     13  LCLVersion = '0.9.31'
    1414  object Button1: TButton
    1515    Left = 10
    … …  
    2828    Align = alBottom
    2929    Anchors = [akTop, akLeft, akRight, akBottom]
     30    ClientHeight = 368
     31    ClientWidth = 576
    3032    DockSite = True
    3133    TabOrder = 1
     34    object PageControl1: TPageControl
     35      Left = 80
     36      Height = 160
     37      Top = 50
     38      Width = 256
     39      ActivePage = TabSheet2
     40      MultiLine = True
     41      TabIndex = 1
     42      TabOrder = 0
     43      OnChange = PageControl1Change
     44      Options = [nboMultiLine]
     45      object TabSheet1: TTabSheet
     46        Caption = 'TabSheet1'
     47      end
     48      object TabSheet2: TTabSheet
     49        Caption = 'TabSheet2'
     50      end
     51      object TabSheet3: TTabSheet
     52        Caption = 'TabSheet3'
     53      end
     54      object TabSheet4: TTabSheet
     55        Caption = 'TabSheet4'
     56      end
     57    end
     58    object TabControl1: TTabControl
     59      Left = 344
     60      Height = 150
     61      Top = 144
     62      Width = 200
     63      MultiLine = True
     64      TabIndex = 2
     65      TabOrder = 1
     66      Tabs.Strings = (
     67        'ggdfg'
     68        'gfgdfgfdgd'
     69        'gdfgdfgdf'
     70        'dfsdfs'
     71        'dd'
     72        'dddd'
     73        'ddd'
     74      )
     75      TabStop = False
     76    end
    3277  end
    3378  object Button2: TButton
Note: See TracChangeset for help on using the changeset viewer.