名前
題名
▼ snailさん > アプリを起動中に Hyper-V 環境を切断すると必ず発生する > エラーを調べるため、いつか読んだ DEKO さんのアプリを探していたら > こんな記事を発見。 > > http://ht-deko.minim.ne.jp/delphiforum/?vasthtmlaction=viewtopic&t=1252 > ＞しかしながら、XE2 以降だと BCD 演算が手軽に行えるようになっています。 > ＞演算子のオーバーロードにより演算子が普通に使えるのです。 > ＞実際のコードは以下のようになります。 > > ＞var > ＞ i: Integer; > ＞//Value1, Value2: Currency; > ＞ Value1, Value2: TBCD; > ＞begin > ＞ Value1 := 1.2345; > ＞ Value2 := 0.12345; > ＞ for i:=1 to 10 do > ＞ Value1 := Value1 - Value2; > ＞ if Value1 = 0 then > ＞ ShowMessage('Zero') > ＞ else > ＞ ShowMessage('Non Zero'); > ＞end; > > 今までわざわざ関数使っていたのに、 > 知らないというのは悲しい。
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link