なぜかフォームのサブクラス化コードが無くなっていたので再度追加。
Merge branch 'master' of https://github.com/freeonterminate/delphi