見つけにくいミス

FPathAnimation := TPathAnimation(aParent);

64bit 32Bit　環境の差によって、範囲チェックを行っていると、Integer, Cardinalなどの型宣言がらみで　範囲チェックエラーがでる。

 

ユニット名　命名規則

フォーム　　untFormXXXXX

プログラム部品　　untMyXXXXXYYMM

汎用的なプログラムの構成について

TFileNameInfo　・・・　画像・音声などのリソースのパス、ファイル名情報を提供する

TScreenInfo　・・・　表示に関わる定数やTImage などのサイズ情報を提供する

TViewer　・・・　すべての描画を行う

TModel　・・・いわゆるモデル、ロジック部分

TXXXXManager　・・・　各マネージャー群、レコードの集まり＝リストの構造を持つことが多く、TModel によって利用される。描画は、Model から直接行うのではなく XXXManager を通して描画を行うほうがよい？それとも逆？逆だな。マネージャーは描画しないほうがいいような気がする。

＿＿TConfigManager

＿＿TScoreManager

＿＿THighScoreManager

＿＿TSoundManager

＿＿TImageManager　など

TXXXXForm　・・・　フォーム。イベントにより Model に通知、Viiewer から描画の対象とされる

XXXUtil　・・・　特定の目的のためにグループ化された関数群、原則クラス化しなくてもよい