Delphi Internal Error L681

標籤：class   ext   com   問題   cti   type   

Delphi Internal Error L681

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;overload問題