Changeset 89 for Docking/CoolDocking/UCoolDockCustomize.pas

Timestamp:

Nov 4, 2010, 7:14:07 AM (14 years ago)

Author:

george

Message:

• Modified: Tabs auto hide function moved to separated class TCoolDockAutoHide.
• Added: Empty dock style units.

File:

• Docking/CoolDocking/UCoolDockCustomize.pas (modified) (3 diffs)

Docking/CoolDocking/UCoolDockCustomize.pas

@@ -7 +7 @@
 uses
   Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
-  ComCtrls, StdCtrls;
+  ComCtrls, StdCtrls, Spin;
 
 type
@@ -19 +19 @@
     Label1: TLabel;
     Label2: TLabel;
+    Label3: TLabel;
+    Label4: TLabel;
     ListBox1: TListBox;
     PageControl1: TPageControl;
+    SpinEdit1: TSpinEdit;
     TabSheetSetting: TTabSheet;
     TabSheetLayouts: TTabSheet;
     procedure ButtonCloseClick(Sender: TObject);
+    procedure FormShow(Sender: TObject);
   private
     { private declarations }
@@ -39 +43 @@
 end;
 
+procedure TCoolDockCustomizeForm.FormShow(Sender: TObject);
+begin
+
+end;
+
 initialization
   {$I UCoolDockCustomize.lrs}