Przeglądaj źródła

Publish Anchors.

Martijn Laan 6 lat temu
rodzic
commit
a708b983b9

+ 1 - 0
Components/BitmapImage.pas

@@ -43,6 +43,7 @@ type
     destructor Destroy; override;
     destructor Destroy; override;
   published
   published
     property Align;
     property Align;
+    property Anchors;
     property AutoSize: Boolean read FAutoSize write SetAutoSize default False;
     property AutoSize: Boolean read FAutoSize write SetAutoSize default False;
     property BackColor: TColor read FBackColor write SetBackColor default clBtnFace;
     property BackColor: TColor read FBackColor write SetBackColor default clBtnFace;
     property Center: Boolean read FCenter write SetCenter default False;
     property Center: Boolean read FCenter write SetCenter default False;

+ 3 - 1
Components/FolderTreeView.pas

@@ -2,7 +2,7 @@ unit FolderTreeView;
 
 
 {
 {
   Inno Setup
   Inno Setup
-  Copyright (C) 1997-2015 Jordan Russell
+  Copyright (C) 1997-2018 Jordan Russell
   Portions by Martijn Laan
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
   For conditions of distribution and use, see LICENSE.TXT.
 
 
@@ -74,6 +74,7 @@ type
     function GetItemImageIndex(const Item: HTREEITEM;
     function GetItemImageIndex(const Item: HTREEITEM;
       const NewItem, SelectedImage: Boolean): Integer; override;
       const NewItem, SelectedImage: Boolean): Integer; override;
   published
   published
+    property Anchors;
     property TabOrder;
     property TabOrder;
     property TabStop default True;
     property TabStop default True;
     property Visible;
     property Visible;
@@ -97,6 +98,7 @@ type
     procedure SetPaths(const AUserPrograms, ACommonPrograms,
     procedure SetPaths(const AUserPrograms, ACommonPrograms,
       AUserStartup, ACommonStartup: String);
       AUserStartup, ACommonStartup: String);
   published
   published
+    property Anchors;
     property TabOrder;
     property TabOrder;
     property TabStop default True;
     property TabStop default True;
     property Visible;
     property Visible;

+ 1 - 0
Components/NewCheckListBox.pas

@@ -153,6 +153,7 @@ type
     property State[Index: Integer]: TCheckBoxState read GetState;
     property State[Index: Integer]: TCheckBoxState read GetState;
   published
   published
     property Align;
     property Align;
+    property Anchors;
     property BorderStyle;
     property BorderStyle;
     property Color;
     property Color;
     property Ctl3D;
     property Ctl3D;

+ 1 - 0
Components/NewNotebook.pas

@@ -40,6 +40,7 @@ type
   published
   published
     property ActivePage: TNewNotebookPage read FActivePage write SetActivePage;
     property ActivePage: TNewNotebookPage read FActivePage write SetActivePage;
     property Align;
     property Align;
+    property Anchors;
     property Color;
     property Color;
     property DragCursor;
     property DragCursor;
     property DragMode;
     property DragMode;

+ 3 - 5
Components/NewProgressBar.pas

@@ -2,19 +2,16 @@ unit NewProgressBar;
 
 
 {
 {
   Inno Setup
   Inno Setup
-  Copyright (C) 1997-2006 Jordan Russell
+  Copyright (C) 1997-2018 Jordan Russell
   Portions by Martijn Laan
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
   For conditions of distribution and use, see LICENSE.TXT.
 
 
-  TNewProgressBar component - a smooth TProgressBar for Delphi 2 and a 32 bit
-  TProgressBar for Delphi 2 and all platforms
+  TNewProgressBar component - a smooth TProgressBar 32 bit TProgressBar
 
 
   Note: themed Vista and newer animate progress bars and don't immediately show changes.
   Note: themed Vista and newer animate progress bars and don't immediately show changes.
   This applies both to Position and State. For example if you set State while the
   This applies both to Position and State. For example if you set State while the
   progress bar is still moving towards a new Position, the new State doesnt show until
   progress bar is still moving towards a new Position, the new State doesnt show until
   the moving animation has finished.
   the moving animation has finished.
-
-  $jrsoftware: issrc/Components/NewProgressBar.pas,v 1.10 2010/10/27 09:45:06 mlaan Exp $
 }
 }
 
 
 interface
 interface
@@ -46,6 +43,7 @@ type
   public
   public
     constructor Create(AOwner: TComponent); override;
     constructor Create(AOwner: TComponent); override;
   published
   published
+    property Anchors;
     property Min: LongInt read FMin write SetMin;
     property Min: LongInt read FMin write SetMin;
     property Max: LongInt read FMax write SetMax;
     property Max: LongInt read FMax write SetMax;
     property Position: LongInt read FPosition write SetPosition default 0;
     property Position: LongInt read FPosition write SetPosition default 0;

+ 1 - 0
Components/NewStaticText.pas

@@ -50,6 +50,7 @@ type
     function AdjustHeight: Integer;
     function AdjustHeight: Integer;
   published
   published
     property Align;
     property Align;
+    property Anchors;
     property AutoSize: Boolean read FAutoSize write SetAutoSize default True;
     property AutoSize: Boolean read FAutoSize write SetAutoSize default True;
     property Caption;
     property Caption;
     property Color;
     property Color;

+ 3 - 4
Components/PasswordEdit.pas

@@ -2,13 +2,11 @@ unit PasswordEdit;
 
 
 {
 {
   Inno Setup
   Inno Setup
-  Copyright (C) 1997-2007 Jordan Russell
+  Copyright (C) 1997-2018 Jordan Russell
   Portions by Martijn Laan
   Portions by Martijn Laan
   For conditions of distribution and use, see LICENSE.TXT.
   For conditions of distribution and use, see LICENSE.TXT.
 
 
-  This unit provides a true password edit for Delphi 2.
-
-  $jrsoftware: issrc/Components/PasswordEdit.pas,v 1.3 2007/12/10 18:28:53 jr Exp $
+  This unit provides a true password edit.
 }
 }
 
 
 interface
 interface
@@ -26,6 +24,7 @@ type
   public
   public
     constructor Create(AOwner: TComponent); override;
     constructor Create(AOwner: TComponent); override;
   published
   published
+    property Anchors;
     property AutoSelect;
     property AutoSelect;
     property AutoSize;
     property AutoSize;
     property BorderStyle;
     property BorderStyle;