Delphi
function GetAsBCD: Currency;
C++
System::Currency __fastcall GetAsBCD();
パラメータの値を TBcd 値として返す protected メソッドです。