Code:
Type
TObj = class
Function FF : String; // must be class function
Begin
Result := 'test';
End;
Class Property Func : Function : String Read (FF);
End;
PrintLn(TObj.Func());
Output:
Runtime Error: Could not convert variant of type (Int64) into type (Unknown)
[line: 16, column: 1]
Original issue reported on code.google.com by kazantse...@mail.ru on 7 Apr 2013 at 6:12
Original issue reported on code.google.com by
kazantse...@mail.ru
on 7 Apr 2013 at 6:12