毎年憂鬱になるこの時期。

今年もいつもの如く、2日前から作業を開始しました。何が面倒って、とにかく入力作業が面倒。会計事務所の方を尊敬します。

13日17時時点で完了率 50%というところ。通帳関連の入力は済んだので、あとは手元にある領収書類の入力。そして最後の難儀が用紙への転記。

ああ、面倒だ。

いまだ現役の Delphi 6。

2001年発売で、リリース直後から使っているので 22年弱使い続けています。懐かしの Windows 2000から最新の Windows 11まで動作するプログラムが作れるというのは本当に凄い。未だに未習得のところがあり、時々　おお！　となる事もしばしば。

Delphiは毎年アップデートがされていますが、受託案件の 99%は Delphi 6で作成しています。あと何年現役で使えるかわかりませんが、Win32APIが使える間は大丈夫だと思います。

しんぴの水晶が欲しいのですが、ジェムを使って引く前にチケット 50連分を引いてみた。

そしたらなんと！　最初の30連で次々とピックアップ武器が当たりました。チケットだけで「頭・上・下」が揃ったのです。

これでジェムで狙うのは武器の「しんぴの水晶」だけ。幸先いいなぁ。

いつかは使うだろうと思って残しておいた使えそうな Aランクの心珠。

実際にはほとんど使う機会が無かったので、一気に整理することにしました。300個ぐらいある心珠のロックを解除する作業に1時間ぐらいかかりましたよ。

これらを種にして Sランクを作ります。4個しかないデインの Sが欲しい。

Delphiで扱うレコード型の話。

これまでレコード型の初期化には赤枠で囲った様な初期化専用の関数を作って文字列型には空値、数値型は0を代入して初期化していました。

簡単な方法は無いかとググってみると、FillChar関数でレコード全体を一気に初期化できるとのこと。まじか・・・。

で、青枠の様な関数を作ってテストしたところ、綺麗に初期化できました。はぁ～　これまでなんて無駄なコーディングをしていたんだろう・・・。

しんぴの水晶に全振りしようと思ってガチャの準備をしていたら。

4.5周年のイベントで「らいめいのけん」という、なんとも魅力的な武器が登場してしまいました。「しんぴの水晶」への全振りは取りやめです。現在 11.3万ジェムあるので、全てつぎ込めば両方ともゲットできるはず。1年貯めたジェムを今回の武器 2種で吐き出そうかと思っています。

目標は「らいめいのけん 4個」「しんぴの水晶 2個」です。まずは「しんぴの水晶」を 2個当たるまで引き、残ったジェムで「らいめいのけん」が 4個に達するまで引く予定なり。