fix for prev revision

git-svn-id: http://code.remobjects.com/svn/pascalscript@79 5c9d2617-0215-0410-a2ee-e80e04d1c6d8
This commit is contained in:
ek 2008-09-30 07:29:33 +00:00
parent 7e2eca2280
commit 38e4616033

View File

@ -1862,8 +1862,6 @@ Begin
with Cl.Add(TLOOKUPLIST) do
begin
RegisterConstructor(@TLOOKUPLIST.CREATE, 'CREATE');
RegisterMethod(@TLOOKUPLIST.ADD, 'ADD');
RegisterMethod(@TLOOKUPLIST.CLEAR, 'CLEAR');
{$IFDEF DELPHI2009UP}
RegisterVirtualAbstractMethod(TDefaultLookupList, @TDefaultLookupList.ADD, 'ADD');
RegisterVirtualAbstractMethod(TDefaultLookupList, @TDefaultLookupList.CLEAR, 'CLEAR');