物議だらけだった女子競技へのトランスジェンダー参加問題。

パリ五輪では参加要件が厳しくなり、まともと言える内容になるようです。女子にとっては不公平なことでしたからね。

「差別だ！」という声が出てくるはずですが、これは差別ではなく区別ですよ。

特定アジア、略して特亜。

日本を敵視し、反日政策をしている三国のことで、大嫌いな国です。三国とも経済が大変なことになっていますが、自業自得としか思いません。

嘘にまみれて誠実さのかけらもないこの三国は一度無くなって作り直したほうがいい。日本のみならず、世界の為です。

7週間続いたドラクエウォークのイベントもやっと終わり。

いや、もう、全然面白くなかった。50日近くのイベントが終わることにホッとしているところです。

新しい要素で楽しませたいってのは伝わっているのですが、その新要素がつまらない笑。中の人、もうちょっと考えようぜ。

暑すぎてエアコンを使い始めたので、恐怖だった電気料金の請求書。

恐る恐る開封すると　え？　と思うほど安かった。思っていたよりも使用量が少ない。なんでだ？

エアコンをほとんど使っていない前月のほうが多いし、なんなら前年同月よりもかなり少ない。思い当たる事が無いのが不気味です。

昨日の散歩のときに撮れた雲の画。

曇りだけど曇りじゃない、青空も見えているなんとも絶妙なバランス。こんな空が好きです。

パステルっぽい色がいいですね。

古（いにしえ）の制御文である goto。

過去の遺物で現在の開発ツールでは使えないと思っていたのですが、Free Pascal について調べていると goto が出てきたのです。

ひょっとして Delphi でも使えるのか？　と思い、簡単なコードを書いて試したところ・・・

1
2
3
4
5
6
7
8
9
10
11
12
13
14

procedure TForm1.Button6Click(Sender: TObject);
label
  aa;
begin
 
  goto aa;
 
  ShowMessage('in');
 
aa:
 
  ShowMessage('in aa');
 
end;

なんということでしょう！エラーなく普通に使えました。

goto文を多用すると追うのが困難なプログラムになるので使うことはないでしょうが、多重ループから一気に抜け出す用途には使えそうですね。