paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 16:19:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

Propedits: remove a test version of TCoolBarControlPropertyEditor.CheckNewValue

Browse Source 
git-svn-id: trunk@42832 -
This commit is contained in:
juha 2013-09-16 05:06:27 +00:00
parent 6add6ca3ca
commit dbf7469826
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/ideintf/propedits.pp
View File

@ -636,8 +636,6 @@ type
{ TCoolBarControlPropertyEditor } { TCoolBarControlPropertyEditor }
TCoolBarControlPropertyEditor = class(TComponentPropertyEditor) TCoolBarControlPropertyEditor = class(TComponentPropertyEditor)
protected
function CheckNewValue(APersistent: TPersistent): boolean; override;
public public
constructor Create(Hook: TPropertyEditorHook; APropCount: Integer); override; constructor Create(Hook: TPropertyEditorHook; APropCount: Integer); override;
end; end;
@ -4382,12 +4380,6 @@ begin
fIgnoreClass := TCustomCoolBar; fIgnoreClass := TCustomCoolBar;
end; end;
function TCoolBarControlPropertyEditor.CheckNewValue(APersistent: TPersistent): boolean;
begin
Result:=false;
raise Exception.Create('TCoolBarControlPropertyEditor.CheckNewValue is called after all!');
end;
{ TComponentAllPropertyEditor } { TComponentAllPropertyEditor }
function TComponentAllPropertyEditor.GetComponentReference: TComponent; function TComponentAllPropertyEditor.GetComponentReference: TComponent;