personalだと.dcuが作れなくてピンチ。

>>887
ありがとうございます。
それで、Layoutも追加したかったのでAligmmentを真似て
↓
procedure TCEdit.SetLayout(const Value: TTextLayout);
begin
　if FLayout <> Value then
　begin
　　FLayout := Value;
　　RecreateWnd;
　end;
end;

こんなのも作ってみたのですが、CreateParamsに何入れたら
値が反映されてくれるのかがわからません。
StyleにFLayoutを入れればよいのですか？