月のパス:
国暦と旧暦が交互に現れる単位です。
年はすべて中華民国年ですので、ご自身で変換してください（1911年＝中華民国年）。
※中国旧暦対応表の説明：※
* 最初の 2 桁 = 閏月、13 の場合は閏月はありません*
※3桁目～6桁目＝12ヶ月の大きさの2進数コード→10進数※
* 例えば： *
* 101010101010 = 2730 *
* 1: 大きい月 (30 日) を表します。 0: 小さい月 (29 日) を表します ==> 生後 1 か月、小さい月 2 か月、生後 3 か月... *
*7桁目は閏月の日数*
* 0: 閏月を含まない日数*
※1：閏月とは小月（29日）のことです※
※2：閏月は大きな月（30日）※
※下2桁は新暦1月1日と旧暦1月1日の日数の差を表します※
************************************************* * *****
このマッピングテーブルは中華民国元年から中華民国元年までをカバーしていますが、これだけでは不十分な場合は、上記の方法に従って追加してください。
入力された年、月、日が正しいかどうかはこのプログラムでは判断できませんのでご自身で判断してください。
変換された太陰月が閏月の場合、渡される値は ***負の数*** になります。
旧暦を国暦に変換する場合、閏月の場合は***負の数***を入力してください
このバージョンはフリーウェアです バージョン: 0.1
自分で変更することもできますが、変更したプログラムのコピーを電子メールで送信することをお勧めします。
営利目的で使用する場合は、その目的と理由をメールでお知らせください。
著者: 彭宏傑 電子メール: [email protected]
//国暦から旧暦に変換します（中華民国の年、月、日、var 旧年、旧月、旧日）
プロシージャ Solar2Lunar(Syear, SMonth, SDay : 整数; Var Lyear, LMonth, LDay : Integer);
//太陰暦から国民暦（太陰年、太陰月、太陰日、中華民国年、月、日）に変換します。
プロシージャ Lunar2Solar(Lyear, LMonth, LDay : 整数; Var Syear, SMonth, SDay : Integer);
//旧暦を入力して60年名を変換します
関数 YearName(L Year : 整数) : 文字列;
// 旧暦の月の日数を取得します
関数 DaysPerLunarMonth(Lyear, LMonth : Integer) : 整数;
カロリーパス:
国暦と太陰暦を 1 つに組み合わせた月次カレンダー (Delpi 3.0 中国語アプリケーション コンポーネントは必要ありません)。
(範囲:中華民国1年から民国100年)
新しいプロパティ:
Lyear: 中華民国の旧暦の年 LMonth: 旧暦の月 (負の数は閏月)
LDay: 太陰暦の日数 LyearName: 太陰暦の 60 年間の名前 (読み取り専用)
著者: 彭宏傑 電子メール: [email protected]
このバージョンはフリーウェアであり、自由に配布できますが、バグがある場合は、その整合性を維持するように努めてください。
変更したい場合は、コピーをメールで送ってください:)
