mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 01:39:31 +02:00
Propedits: remove a test version of TCoolBarControlPropertyEditor.CheckNewValue
git-svn-id: trunk@42832 -
This commit is contained in:
parent
6add6ca3ca
commit
dbf7469826
@ -636,8 +636,6 @@ type
|
||||
{ TCoolBarControlPropertyEditor }
|
||||
|
||||
TCoolBarControlPropertyEditor = class(TComponentPropertyEditor)
|
||||
protected
|
||||
function CheckNewValue(APersistent: TPersistent): boolean; override;
|
||||
public
|
||||
constructor Create(Hook: TPropertyEditorHook; APropCount: Integer); override;
|
||||
end;
|
||||
@ -4382,12 +4380,6 @@ begin
|
||||
fIgnoreClass := TCustomCoolBar;
|
||||
end;
|
||||
|
||||
function TCoolBarControlPropertyEditor.CheckNewValue(APersistent: TPersistent): boolean;
|
||||
begin
|
||||
Result:=false;
|
||||
raise Exception.Create('TCoolBarControlPropertyEditor.CheckNewValue is called after all!');
|
||||
end;
|
||||
|
||||
{ TComponentAllPropertyEditor }
|
||||
|
||||
function TComponentAllPropertyEditor.GetComponentReference: TComponent;
|
||||
|
Loading…
Reference in New Issue
Block a user