paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* Remove unnecessary virtual methods

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1445 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum 2011-01-13 20:49:57 +00:00
parent 0044f972e6
commit 106cd2b6c3
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
components/smnetgradient/smnetgradient.pas
View File

@ -73,11 +73,11 @@ type
procedure OnFontChanged(Sender: TObject); procedure OnFontChanged(Sender: TObject);
protected protected
{ Protected declarations } { Protected declarations }
procedure SetCaption(const Value: TCaption); virtual; procedure SetCaption(const Value: TCaption);
procedure SetFont(Value: TFont); virtual; procedure SetFont(Value: TFont);
procedure SetMarginLeft(Value: Integer); virtual; procedure SetMarginLeft(Value: Integer);
procedure SetMarginTop(Value: Integer); virtual; procedure SetMarginTop(Value: Integer);
procedure SetVisible(Value: Boolean); virtual; procedure SetVisible(Value: Boolean);
public public
{ Public declarations } { Public declarations }
constructor Create(AOwner: TCustomNetGradient); overload; constructor Create(AOwner: TCustomNetGradient); overload;