TEditは基本的なコントロールで、よく使います。
ただ、以前から不満点が一つありまして、「右寄せ表示できない」というものでした。
右寄せ表示したい(数値専用テキストボックスなど)場合は、TMemoで代用したりしていたのですが、マルチライン入力させないようにするのが面倒とか、これはこれでいろいろ不満がありました。
そんな中、うまい手を見つけました。
TFormのOnShowイベントの中等で、右寄せ表示したいTEditに対して、
::SetWindowLong(Edit1->Handle, GWL_STYLE, ::GetWindowLong(Edit1->Handle, GWL_STYLE) | ES_RIGHT);
としてやるだけです。
こんな簡単なことで右寄せ表示のコントロールになるのでした。
※ただし、一説ではWindowsXPでしか有効でないとか…