Hello!
Hello!
Anyone's got a clue on this?
I have a comparer:
CompareFrequencies : TComparison;
then I initialise it:
CompareFrequencies := function( Left,Right: TCharFrequency ): Integer
begin
Result := Left.Frequency - Right.Frequency;
end;
Berlin doesn't like this and spits out:
[dcc32 Error] AR.BApp.Encryption.pas(137): E2010 Incompatible types: 'System.Generics.Defaults.TComparison' and 'Procedure'
Which clearly seems a lie to me.
Opinions?
Anyone's got a clue on this?
I have a comparer:
CompareFrequencies : TComparison
then I initialise it:
CompareFrequencies := function( Left,Right: TCharFrequency ): Integer
begin
Result := Left.Frequency - Right.Frequency;
end;
Berlin doesn't like this and spits out:
[dcc32 Error] AR.BApp.Encryption.pas(137): E2010 Incompatible types: 'System.Generics.Defaults.TComparison
Which clearly seems a lie to me.
Opinions?
TComparison expects const parameters.
ReplyDeleteAs Primož Gabrijelčič says, expects const parameters.
ReplyDelete