mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-14 02:19:39 +02:00
cleanup
git-svn-id: trunk@8027 -
This commit is contained in:
parent
d2e8adeb39
commit
9dc5379f89
@ -913,7 +913,6 @@ type
|
||||
procedure AdjustClientRect(var Rect: TRect); override;
|
||||
procedure RealSetText(const Value: TCaption); override;
|
||||
procedure Paint; override;
|
||||
function ParentColorIsStored: boolean;
|
||||
Function CanTab: Boolean; override;
|
||||
public
|
||||
constructor Create(TheOwner: TComponent); override;
|
||||
|
@ -115,11 +115,6 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
function TCustomPanel.ParentColorIsStored: boolean;
|
||||
begin
|
||||
Result:=not ParentColor;
|
||||
end;
|
||||
|
||||
function TCustomPanel.CanTab: Boolean;
|
||||
begin
|
||||
Result:=false;
|
||||
|
Loading…
Reference in New Issue
Block a user