名前
題名
▼ Mr.XRAYさん > > 春分の日の計算式 > > 1851-1899年 : int(19.8277+0.242194*(年-1980)-int((年-1980)/4)) > > 1900-1979年 : int(20.8357+0.242194*(年-1980)-int((年-1980)/4)) > > 1980-2099年 : int(20.8431+0.242194*(年-1980)-int((年-1980)/4)) > > 2100-2150年 : int(21.8510+0.242194*(年-1980)-int((年-1980)/4)) > > > > 秋分の日の計算式 > > 1851-1899年 : int(22.2588+0.242194*(年-1980)-int((年-1980)/4)) > > 1900-1979年 : int(23.2588+0.242194*(年-1980)-int((年-1980)/4)) > > 1980-2099年 : int(23.2488+0.242194*(年-1980)-int((年-1980)/4)) > > 2100-2150年 : int(24.2488+0.242194*(年-1980)-int((年-1980)/4)) > > int 関数を Delphi の Floor 関数に置き換えればそのまま使用できます． > > int(19.8277+0.242194*(年-1980)-int((年-1980)/4)) > ↓ > dDay := Floor(19.8277 + 0.242194 * (AYear - 1980) - Floor((AYear - 1980) / 4)); > > [System.Math.Floor - RAD Studio API Documentation] > http://docwiki.embarcadero.com/Libraries/Tokyo/ja/System.Math.Floor
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link