mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-17 14:49:28 +02:00
lcl: publish BorderStyle for more components
git-svn-id: trunk@19032 -
This commit is contained in:
parent
7223e0c0d8
commit
17b9b92756
@ -91,7 +91,7 @@ type
|
||||
|
||||
{ TEditButton }
|
||||
|
||||
TEditButton = Class(TCustomEditButton)
|
||||
TEditButton = class(TCustomEditButton)
|
||||
Public
|
||||
property Button;
|
||||
published
|
||||
@ -100,6 +100,7 @@ type
|
||||
property Align;
|
||||
property Anchors;
|
||||
property BorderSpacing;
|
||||
property BorderStyle;
|
||||
property ButtonOnlyWhenFocused;
|
||||
property ButtonWidth;
|
||||
property ButtonHint;
|
||||
@ -152,7 +153,7 @@ type
|
||||
TAcceptFileNameEvent = procedure (Sender : TObject; Var Value : String) of Object;
|
||||
TDialogKind = (dkOpen,dkSave,dkPictureOpen,dkPictureSave);
|
||||
|
||||
TFileNameEdit = Class(TCustomEditButton)
|
||||
TFileNameEdit = class(TCustomEditButton)
|
||||
private
|
||||
FDialogOptions: TOpenOptions;
|
||||
FFileName : String;
|
||||
@ -198,6 +199,7 @@ type
|
||||
property Anchors;
|
||||
property AutoSelect;
|
||||
property BorderSpacing;
|
||||
property BorderStyle;
|
||||
property AutoSize;
|
||||
property Color;
|
||||
property DragCursor;
|
||||
@ -236,7 +238,7 @@ type
|
||||
|
||||
{ TDirectoryEdit }
|
||||
|
||||
TDirectoryEdit = Class(TCustomEditButton)
|
||||
TDirectoryEdit = class(TCustomEditButton)
|
||||
private
|
||||
FDialogTitle: String;
|
||||
FRootDir: String;
|
||||
@ -272,6 +274,7 @@ type
|
||||
property AutoSize;
|
||||
property AutoSelect;
|
||||
property BorderSpacing;
|
||||
property BorderStyle;
|
||||
property Color;
|
||||
property DragCursor;
|
||||
property DragMode;
|
||||
@ -357,6 +360,7 @@ type
|
||||
property AutoSize;
|
||||
property AutoSelect;
|
||||
property BorderSpacing;
|
||||
property BorderStyle;
|
||||
property Color;
|
||||
property Constraints;
|
||||
property CharCase;
|
||||
@ -433,6 +437,7 @@ type
|
||||
property Align;
|
||||
property Anchors;
|
||||
property BorderSpacing;
|
||||
property BorderStyle;
|
||||
property AutoSize;
|
||||
property AutoSelect;
|
||||
property Color;
|
||||
|
@ -960,6 +960,7 @@ type
|
||||
property AutoSelect;
|
||||
property AutoSize;
|
||||
property BorderSpacing;
|
||||
property BorderStyle;
|
||||
property CharCase;
|
||||
property Color;
|
||||
property Constraints;
|
||||
|
Loading…
Reference in New Issue
Block a user