mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-13 10:29:29 +02:00
fixed update on changing package usage options
git-svn-id: trunk@3222 -
This commit is contained in:
parent
15b83f20c6
commit
73e74d5d4c
@ -658,6 +658,7 @@ type
|
|||||||
procedure Paint; override;
|
procedure Paint; override;
|
||||||
function ParentColorIsStored: boolean;
|
function ParentColorIsStored: boolean;
|
||||||
public
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); override;
|
||||||
property Alignment: TAlignment read FAlignment write SetAlignment default taCenter;
|
property Alignment: TAlignment read FAlignment write SetAlignment default taCenter;
|
||||||
property BevelInner: TPanelBevel read FBevelInner write SetBevelInner default bvNone;
|
property BevelInner: TPanelBevel read FBevelInner write SetBevelInner default bvNone;
|
||||||
property BevelOuter: TPanelBevel read FBevelOuter write SetBevelOuter default bvRaised;
|
property BevelOuter: TPanelBevel read FBevelOuter write SetBevelOuter default bvRaised;
|
||||||
@ -667,7 +668,6 @@ type
|
|||||||
property Color default clBtnFace;
|
property Color default clBtnFace;
|
||||||
property Caption read GetText write SetText;
|
property Caption read GetText write SetText;
|
||||||
property ParentColor stored ParentColorIsStored;
|
property ParentColor stored ParentColorIsStored;
|
||||||
constructor Create(TheOwner: TComponent); override;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -754,6 +754,9 @@ end.
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.65 2003/06/19 22:38:21 mattias
|
||||||
|
fixed update on changing package usage options
|
||||||
|
|
||||||
Revision 1.64 2003/06/19 09:26:58 mattias
|
Revision 1.64 2003/06/19 09:26:58 mattias
|
||||||
fixed changing unitname during update
|
fixed changing unitname during update
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user