From: Peter T. <pe...@us...> - 2002-06-03 22:15:08
|
Update of /cvsroot/jvcl/jvcl/source In directory usw-pr-cvs1:/tmp/cvs-serv4929/source Modified Files: JvTimeLineEdit.pas JvTipProperty.pas Log Message: removed protected as the visibilty of methods are public in ancestor Index: JvTimeLineEdit.pas =================================================================== RCS file: /cvsroot/jvcl/jvcl/source/JvTimeLineEdit.pas,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** JvTimeLineEdit.pas 30 May 2002 17:38:48 -0000 1.1 --- JvTimeLineEdit.pas 3 Jun 2002 22:15:05 -0000 1.2 *************** *** 36,43 **** { a component editor that by default opens the editor for the Items property in TTimeline } TTimeLineEditor = class(TDefaultEditor) ! protected procedure ExecuteVerb(Index:integer);override; procedure EditProperty(const Prop: IProperty; var Continue: Boolean); override; - public function GetVerb(Index: Integer): string; override; function GetVerbCount: Integer; override; --- 36,42 ---- { a component editor that by default opens the editor for the Items property in TTimeline } TTimeLineEditor = class(TDefaultEditor) ! public procedure ExecuteVerb(Index:integer);override; procedure EditProperty(const Prop: IProperty; var Continue: Boolean); override; function GetVerb(Index: Integer): string; override; function GetVerbCount: Integer; override; Index: JvTipProperty.pas =================================================================== RCS file: /cvsroot/jvcl/jvcl/source/JvTipProperty.pas,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** JvTipProperty.pas 30 May 2002 17:38:48 -0000 1.1 --- JvTipProperty.pas 3 Jun 2002 22:15:05 -0000 1.2 *************** *** 38,45 **** { a component editor that by default opens the editor for the Items property in TTimeline } TJvTipPropertyEditor = class(TComponentEditor) ! protected procedure ExecuteVerb(Index:integer);override; procedure Edit;override; - public function GetVerb(Index: Integer): string; override; function GetVerbCount: Integer; override; --- 38,44 ---- { a component editor that by default opens the editor for the Items property in TTimeline } TJvTipPropertyEditor = class(TComponentEditor) ! public procedure ExecuteVerb(Index:integer);override; procedure Edit;override; function GetVerb(Index: Integer): string; override; function GetVerbCount: Integer; override; |