200204041 when compiling safecall method with currency result
Original Reporter info from Mantis: carlokok
-
Reporter name: Carlo Kok
Original Reporter info from Mantis: carlokok
- Reporter name: Carlo Kok
Description:
program test;
{$MODE DELPHI}
type
TDADataTable =class(TObject)
public
function GetAsCurrency(Index: integer): Currency;safecall;
end;
function TDADataTable.GetAsCurrency(Index: integer): Currency;
begin
Result:=0;
end;
begin
end;
Mantis conversion info:
- Mantis ID: 8523
- Version: 2.2.0
- Fixed in version: 2.2.0
- Fixed in revision: 7740 (#2fc115ba)