Wikia

Delphi Programming

Internal Error L681

2,918pages on
this wiki
Talk2

Although this specific example doesn't reproduce the problem in a small project, this caused the problem in a larger project. The function was defined as follows:

 interface
 
 function CompareItemEqualStatus(const Value1: TSomeEnumeratedType;
                                 const Value2: TSomeEnumeratedType): Integer;
 
 implementation
 
 function CompareItemEqualStatus(const Value1: TSomeEnumeratedType;
                               const Value2: TSomeEnumeratedType): Integer;
   overload;
 begin
   ...
 end;
 

SolutionEdit

The function was defined with overload but there was no second function that was overloaded. Removing "overload" fixed the problem.

See alsoEdit

Around Wikia's network

Random Wiki