TEditの高さをコンポーネントで設定するには？

ミーミー 2005-05-27 04:42:43 No: 15110

いつもお世話になっています。
今TEditを継承したコンポーネントTNewEditを作成しています。
TNewEdit.Create手続きでHeightを設定するようにしていますが、
実行時にデフォルトの値に戻ってしまします。
他の設定はうまく反映されているようです。
原因もしくは解決方法などご存知の方いらっしゃいましたら
ご教授お願いします。

とおりすがらない 2005-05-27 05:05:22 No: 15111

たぶん、コレ。

consturctor TNewEdit.Create(AOwner: TComponent)
begin
inherited;
ControlStyle := ControlStyle - [csFixedHeight];
end;

うまくいったら報告求む(^^ゞ

通りすがちゃった人 2005-05-27 06:29:44 No: 15112

答えになるかどうかわかりませんが．．．
TEditの拡張は通常はTCustomEditから行うのですが、その実例としてTMemoがありますのでTMemoのソースをご覧になるとよろしいのではないでしょうか？
(AutoSize := Falseではだめなんでしょうか)

ピンクレディー２ 2005-05-27 14:39:45 No: 15113

文字列の位置は、一番上でいいんですか？
単純に、TEditの大きさが見た目で思い通りになればいいのかな・・・？
自分が、文字位置を中央にこだわりつつ、似たような悩みがありました。
たぶん、TEditにこだわる理由があるんですよね？